05-21-2009
the "-c" option with grep will provide a count of the lines that match the search criteria.
Maybe I don't understand your question. I was assuming that "number of lines in a command" meant "number of lines of output resulting from an executed command".
Last edited by Padow; 05-21-2009 at 04:37 PM..
Reason: changed with to will
10 More Discussions You Might Find Interesting
1. Shell Programming and Scripting
Hello,
AIM: Need to test for the presence of some files (*.F) in a certain directory.
having a problem with this line is ksh:
if test `ls $SOMEDIR/dir/*.F \
2>/dev/null|wc -w` -eq 0
Basically testing for the presence of *.F files in the specified directory. If the return... (4 Replies)
Discussion started by: enoch
4 Replies
2. UNIX for Dummies Questions & Answers
Hi
If my ls -l results in 1000 lines and i just want to see the last few lines in the list what arguments do i pass
eg lets say i want to see only the last 5 lines of 'ls -l' result (2 Replies)
Discussion started by: zomboo
2 Replies
3. Shell Programming and Scripting
Sorry for the duplicate thread this one is similar to the one in
https://www.unix.com/shell-programming-scripting/88132-awk-sed-script-read-values-parameter-files.html#post302255121
Since there were no responses on the parent thread since it got resolved partially i thought to open the new... (4 Replies)
Discussion started by: rajan_san
4 Replies
4. Shell Programming and Scripting
HI
I have a text file named docs with 100 filenames with full directory path one by one. I want to perform an action on all of them, the action i want to do this chown bin:bin <filename>. The <filename> should be each line in the docs text file. Please give the code. Somebody told to use for... (2 Replies)
Discussion started by: PrasannaKS
2 Replies
5. Shell Programming and Scripting
Hi All,
I was testing for blank lines and I want to use the cat command only
for groupline in `cat /home/test/group`
do
if
then
echo "blank found"
fi
done
I want to check if the current line read is a blank line.
I have tested with $groupline="\n" ,... (11 Replies)
Discussion started by: datkan
11 Replies
6. Shell Programming and Scripting
i hav a text file(abc.txt) in which it have 2 lines as shown
Number of agencies didnt send the file= 0
sum of reject files= 0
######
to get one line from the text file ... i use grep command
grep 'Number of agencies didnt send the file= 0' abc.txt
... (7 Replies)
Discussion started by: nani1984
7 Replies
7. Shell Programming and Scripting
I have been doing a lot more bash on LINUX RedHat and Ubuntu lately, and one thing keeps cropping up intermittently. If I do a $( some-commands ) Command Substitution, the some-commands are logged onto my screen each time they are evaluated. Did I turn on some odd option? It seems to happen just... (13 Replies)
Discussion started by: DGPickett
13 Replies
8. Shell Programming and Scripting
I am writing a script and my command is long so it goes down to the next line, but it does not run properly, the pipe is missing the wc -l. how do i fix this problem.
find ${ARCHIVE}/${dir} -type f -name "${TEMP2}*" | awk -F/ '{print $NF}' | wc -l (8 Replies)
Discussion started by: football12345
8 Replies
9. UNIX for Advanced & Expert Users
Hi,
I have a requirement like, I have a list of pattens in a file say pattern.txt,
PHC111
PHC113
and in another file called master.lst i have entries like,
PHC111
a
b
PHC112
a
PHC113
b
c
PHC114
d
e (5 Replies)
Discussion started by: rbalaj16
5 Replies
10. UNIX for Dummies Questions & Answers
Hello,
I have an encoded file and I wish to see what is written inside.
The first line is given below:
eval "$(dd if=$0 bs=1 skip=69 2>/dev/null|gpg -d 2>/dev/null)"; exit
PS: When I google above code, it says that command is use for encryption...
Following lines include many strange... (2 Replies)
Discussion started by: baris35
2 Replies
LEARN ABOUT DEBIAN
padre::document::perl::beginner
Padre::Document::Perl::Beginner(3pm) User Contributed Perl Documentation Padre::Document::Perl::Beginner(3pm)
NAME
Padre::Document::Perl::Beginner - naive implementation of some beginner specific error checking
SYNOPSIS
use Padre::Document::Perl::Beginner;
my $beginner = Padre::Document::Perl::Beginner->new;
if (not $beginner->check($data)) {
warn $beginner->error;
}
DESCRIPTION
This is a naive implementation. It needs to be replaced by one using PPI.
In Perl 5 there are lots of pitfalls the unaware, especially the beginner can easily fall in. While some might expect the Perl compiler
itself would catch those it does not (yet ?) do it. So we took the initiative and added a beginners mode to Padre in which these extra
issues are checked. Some are real problems that would trigger an error anyway we just make them a special case with a more specific error
message. (e.g. "use warning;" without the trailing s) Others are valid code that can be useful in the hands of a master but that are
poisonous when written by mistake by someone who does not understand them. (e.g. "if ($x = /value/) { }" ).
This module provides a method called "check" that can check a Perl script (provided as parameter as a single string) and recognize
problematic code.
Examples
See <http://padre.perlide.org/ticket/52> and <http://www.perlmonks.org/?node_id=728569>
Cases
o
split /,/, @data;
Here @data is in scalar context returning the number of elements. Spotted in this form:
split /,/, @ARGV;
o
use warning;
s is missing at the end.
o
map { $_; } (@items),$extra_item;
is the same as
map { $_; } (@items,$extra_item);
but you usually want
(map { $_; } (@items)),$extra_item;
which means: map all @items and them add $extra_item without mapping it.
o Warn about Perl-standard package names being reused
package DB;
o
$x = chomp $y;
print chomp $y;
o
map { s/foo/bar/; } (@items);
This returns an array containing true or false values (s/// - return value).
Use
map { s/foo/bar/; $_; } (@items);
to actually change the array via s///.
o
<@X>
o
if ($x = /bla/) {
}
o Pipe | in open() not at the end or the beginning.
o
open($ph, "| something |");
o Regular expression starting with a quantifier such as
/+.../
o
} else if {
o
} elseif {
o
close;
HOW TO ADD ANOTHER ONE
Please feel free to add as many checks as you like. This is done in three steps:
Add the test
Add one (or more) tests for this case to t/75-perl-beginner.t
The test should be successful when your supplied sample fails the check and returns the correct error message. As texts of error messages
may change, try to match a good part which allows identification of the message but don't match the very exact text.
Tests could use either one-liners written as strings within the test file or external support files. There are samples for both ways in the
test script.
Add the check
Add the check to the check-sub of this file (Document/Perl/Beginner.pm). There are plenty samples here. Remember to add a sample (and maybe
short description) what would fail the test.
Run the test script to match your test case(s) to the new check.
Add the configuration option
Go to Config.pm, look for the beginner error checks configuration and add a new setting for your new check there. It defaults to 1 (run the
check), but a user could turn it off by setting this to 0 within the Padre configuration file.
COPYRIGHT & LICENSE
Copyright 2008-2012 The Padre development team as listed in Padre.pm.
This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself.
The full text of the license can be found in the LICENSE file included with this module.
perl v5.14.2 2012-06-27 Padre::Document::Perl::Beginner(3pm)