in reply to dos2unix problem

perl -i -pe 's/\cM*$//' foo bar baz

[download]

In Section Seekers of Perl Wisdom