while (<MYFILE>) {
   s/\r\n$/\n/g;
   ...
}