$line =~ s/ +$//;

##</code><code>##

$line =~ s/\s+$//;