[perl #60008] @array ~~ / regexp / do not work properly, look like array stratification there

[[EMAIL PROTECTED] via RT]

On Mon Oct 20 06:11:17 2008, ihrd wrote:
> my @a = ('a', 'b' );
> say @a ~~ / 'b' /        ?? ':)' !! ':(';  # :)
> say @a ~~ / ^ 'b' /    ?? ':)' !! ':(';  # :(
> say @a ~~ / ^ 'a' /    ?? ':)' !! ':(';  # :)
> say @a ~~ / ^ 'a' $ / ?? ':)' !! ':(';  # :(
> 
They're all smiling as of r32328.

Spasibo,

Jonathan