Perl

ActiveState has a free Win32 version of Perl.
Perl Core Documentation, including PerlFunc
Quickies:
- my ($progname) = $0 =~ m{^(?:.*/)?(.*)$};
- Base 64 decoder
  perl -MMIME::Decoder -e '(new MIME::Decoder "base64")->decode(\*STDIN, \*STDOUT)'
- Print up to 10 entries from call stack
  print map {caller $_ && sprintf(" %s called from %s %s\n", (caller $_)[3,1,2])} 0..9;
- Get modules from CPAN interactively with
  perl -MCPAN -e shell
  Note: If behind a firewall, then use:
  export FTP_PASSIVE=1 perl -MCPAN -e shell
- Perl profiling with the DProf module:
    perl -d:DProf prog.pl
    dprofpp -u
  or combined:
    dprofpp -u -p prog.pl
- Generate all permutations of a list:
  sub perm{@_?map{my$e=$_[$_];map[$e,@{$_}],perm(@_[0..$_-1,$_+1..$#_])}0..$#_:[]}
- Generate a random permutation of a list:
  sub random_perm{my@r;push(@r,splice(@_,int(rand()*@_),1))while(@_);@r}
- Generate all subsets of a list:
  sub subsets {map{my$n=$_;[@_[grep{$n&1<<$_}0..$#_]]}(1..2**($#_+1));}
  sub nonempty_subsets{map{my$n=$_;[@_[grep{$n&1<<$_}0..$#_]]}(1..2**($#_+1)-1);}
- Remove and return a random element from an array ref (undef if empty list):
  sub remove_random_elt{my$r=@_[0];@$r?splice(@$r,int(rand()*@$r),1):undef}
mirror.aarnet.edu.au - an Australian CPAN site
Ivan Kurmanov's advice on dealing with Unicode-processing issues in Perl
Phil Hazel's PCRE library makes Perl regular expressions available to C/C++ programs
Liraz Siri has a Perl Obfuscation Service that will obfuscate your precious scripts.
Beginner's tutorials:
- Picking Up Perl, Edition 0.12, A Freely Redistributable Perl Tutorial Book - can be downloaded as Postscript / PDF / TeX source / one huge HTML file
The Perl Quiz of the Week provides thought-provoking perl problems for amateurs and experts.
Perl humour: Perl module Lingua::Romana::Perligata -- write Perl code in Latin
Malcolm Beattie's web page (http://users.ox.ac.uk/~mbeattie/) may be extinct, but his Perl Compiler (which may be several versions out of date) can still be downloaded. Download the Perl Compiler Kit from a UK FTP server.

	This page last changed: 31 Jan 2007
[Validate HTML]

Donate free
food & land

Feedback by email
or Web form