Help for this page

Select Code to Download


  1. or download this
    se strict;
    use warnings;
    ...
            $_=~s/\//\\/g;
        }
    }
    
  2. or download this
    sub handlefix {
        my @return;
    ...
        return @return;
    }
    ($infile,$outfile) = handlefix($infile,$outfile); #more obvious what i
    +s happening