This is my favorite node on Perl Monks because I have found it so useful, since I work in a dual Unix/Windows environment and have the ^M problem frequently. It's an easy way to remove the ^M.