[perl #61662] implicit binding of matches to $_

[Patrick R. Michaud via RT]

On Wed Dec 24 08:44:36 2008, dwh...@nvidia.com wrote:
> (rakudo 34337)
> 
> >>> $_ = "a"; say /a/ ?? "yes" !! "no"
> yes
> >>> $_ = "a"; say /b/ ?? "yes" !! "no"
> Yes --- WRONG!

This now works as of fc01cda:

pmich...@orange:~/rakudo$ ./perl6
> $_ = "a";  say /a/ ?? 'yes' !! 'no';
yes
> $_ = "a";  say /b/ ?? 'yes' !! 'no';
no
> $_ = "a";  say $_ ~~ /a/ ?? 'yes' !! 'no';
yes
> $_ = "a";  say $_ ~~ /b/ ?? 'yes' !! 'no';
no

Closing ticket, thanks!

Pm