func do {(my $tmp = $string) =~ s/foo/blah; $tmp};