Re: Filters within a filter...

[fauria]

Hi!

When using perl, you can pipe in your commands by using this:

while(<STDIN>){
   print "Current line is storaged in: ".$_;
   chop;
   print "Current line without new line character: ".$_."\n";
}

For example: cat /etc/services | perl foo.pl

STDIN can be changed to STDERR. Whitout input, acts like read in bash (i think its the same in ksh).

There is also an operator called "diamond operator", which is represented by "<>", and means "whatever file passed as an argument, or whatever is piped into":

while(<>){
 chop;
 print "I have $_ as input\n";
}

For example: perl foo.pl /etc/services /etc/hosts

From here, you can operate $_ (current line) in any way you like, using regex, awk like operations, etc. You can save your converted text by redirecting output to a file from command line, or inside your perl script.

Tip: Syntax used for regex in sed is very similar than the one used in perl.

For a translation from awk to perl, you can try "a2p" (man a2p).