Return to dosunix.pl CVS log

Up to [LON-CAPA] / loncom / localize / localize

Annotation of loncom/localize/localize/dosunix.pl, revision 1.1

1.1     ! www         1: $fn=shift;
        !             2: system ("cp $fn $fn.original");
        !             3: open(IN,"$fn.original");
        !             4: open(OUT,">$fn");
        !             5: while ($line=<IN>) {
        !             6:     $line=~s/[\n\r]+$/\n/;
        !             7:     print OUT $line;
        !             8: }
        !             9: close(IN);
        !            10: close(OUT);