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

##</code><code>##

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