$str =~ s#\n##gsi;