As always the devil is in the detail. Consider for example:

{
    $s = ".....X.....";
    $s =~ s/X/Y/;
    $x = eval q{ "[ $`$& $' ]" };
}
[download]

You can't rely on PL_sawampersand.

Dave.