Dpuiu Perl

POD

• POD; pod2html pod2latex pod2man pod2text pod2usage

In place editing

• Edit a file in place: -i

 perl -i.bck script.pl xxx
 => xxx(new), xxx.bck(old)

BEGIN/END blocks

 perl -ane 'BEGIN { print "sum\n"}  END { print $sum,"\n" } $sum += $F[0]; '

Regular Expressions

• Maximal match (default)

 echo $PERLLIB | perl -ane '/^(.+):/; print $1,"\n"'

• Minimal match

 echo $PERLLIB | perl -ane '/^(.+?):/; print $1,"\n"'
 /fs/sz-user-supported/Linux-x86_64/lib

• Translation: $_ =~ tr/abc/ABC/

Search directories

• -Idir : same as "use lib dir_name"

 default: /usr/include & /usr/lib/perl
 add dirs to PERLLIB 

Modules

• -M moldule: same as "use module_name"

 perl -MLWP::Simple -e' print head "http://www.example.com"'
 perl -e 'use LWP::Simple; print head "http://www.example.com"'

Variables

• $. : input line number

Files

• open(IN, '-') # Open standard input
• open(IN, '>-') # Open standard output
• @lines = <IN> # read all lines in the file
• $line = <IN> # read one line