Help for this page

Select Code to Download

Select or download this

if (!$ARGV[0]){
    print "Input File:\n";
    $fn = ;
    chop($fn);
    }

Select or download this

if (!$ARGV[0]){
    print "Input File:\n";
    chomp($fn = <STDIN>);
    }