http://www.perlmonks.org?node_id=16360


in reply to fixing what textareas do to input

Perhaps: $data =~ s/(\r\n|\n\r|\r)/\n/g This converts CR's, LF's, and any combination of the two into a single newline (I hope... haven't tested it).