#!/usr/local/bin/perl
#
# nukems- a perl script ripped off from Matt's Script Archives and modified
#			http://www.worldwidemart.com/scripts/ 
#
#		nukems removes ^M's from the EOL's for DOS to UNIX Xlation.
while (<>) {
   $_ =~ s/\cM\n/\n/g;
   print $_;
}