$textarea = "Line1\015\012Line3\015\012Line3\015\012";
chomp $textarea;
print $textarea.'----';

print "\n";
$textarea =~ s/[\015\012]/ /g;
print $textarea;