$string =~ s/\n//g;