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