my $string = "12\n34";
$string =~ s/.*/go/gs;