$text_area =~ tr/\r\n/ /s;