s/\r\n/\n/g;
s/\r/\n/g;

##</code><code>##

split(/\r\n|\r|\n/,$s)