chomp $line;

##</code><code>##

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