$textarea =~ s,\r\n?|\n\r?,<br />\n,g;