Help for this page

Select Code to Download

Select or download this

defined(my $infile  = shift) || die usage();
defined(my $outfile = shift) || die usage();