open FILE, "c:\sample.java"; while() { s/\r/\n/g; print "$_\n"; } close FILE;