[LON-CAPA-cvs] cvs: loncom /localize/localize dosunix.pl

www lon-capa-cvs@mail.lon-capa.org
Thu, 23 Oct 2003 23:29:51 -0000


www		Thu Oct 23 19:29:51 2003 EDT

  Added files:                 
    /loncom/localize/localize	dosunix.pl 
  Log:
  Stupid little utility to convert DOS linebreaks in translation files.
  
  

Index: loncom/localize/localize/dosunix.pl
+++ loncom/localize/localize/dosunix.pl
$fn=shift;
system ("cp $fn $fn.original");
open(IN,"$fn.original");
open(OUT,">$fn");
while ($line=<IN>) {
    $line=~s/[\n\r]+$/\n/;
    print OUT $line;
}
close(IN);
close(OUT);