General hint: If you're not sure what's in your data, print it.

use Data::Dumper;
local $Data::Dumper::Useqq = 1; # will also show you \r, \n and other 
+things
print Dumper $string;
[download]

If you actually see what you've got it's much easier to handle it =)
in HTML forms you usually get \r\n.