my $x = f(); my $y = $x; #### my $y = my $x = f(); #### my $copy = $str; $copy =~ s/\\/\\\\/g; #### ( my $copy = $str ) =~ s/\\/\\\\/g;
## my $y = my $x = f(); ##
## my $copy = $str; $copy =~ s/\\/\\\\/g; ##
## ( my $copy = $str ) =~ s/\\/\\\\/g;