Neatest way to remove linebreaks in Perl

Question

I\'m maintaining a script that can get its input from various sources, and works on it per line. Depending on the actual source used, linebreaks might be Unix-style, Windows

Answer 1

$line =~ s/[\r\n]+//g;