while (<>) { ($Fld1,$Fld2) = split(/[:\n]/, $_, 9999); print $Fld2; }
while (<>) { chomp; s/foo/bar/g; print if $printit; }
When invoked as psed, it behaves as a sed implementation, written in Perl.
sub wanted { my ($dev,$ino,$mode,$nlink,$uid,$gid); (($dev,$ino,$mode,$nlink,$uid,$gid) = lstat($_)) && $uid == $uid{'root'}) && (($mode & 0777) == 04000); print("$name\n"); }
As well as these filters for converting other languages, the pl2pm utility will help you convert old-style Perl 4 libraries to new-style Perl5 modules.
xsubpp will compile XS code into C code by embedding the constructs necessary to let C functions manipulate Perl values and creates the glue necessary to let Perl access those functions.
perl -MCPAN -e shell