# New Ticket Created by "Carl Mäsak" # Please include the string: [perl #95504] # in the subject line of all future correspondence about this issue. # <URL: https://rt.perl.org:443/rt3/Ticket/Display.html?id=95504 >
<masak> rakudo: $_ = "open"; my @verbs = "open", "close"; say $_ ~~ /^ @verbs/ <p6eval> rakudo 922500: OUTPUT«» <masak> rakudo: $_ = "open"; my @verbs = "open"; say $_ ~~ /^ @verbs/ <p6eval> rakudo 922500: OUTPUT«open» <masak> ah, seems array interpolation isn't correctly implemented after all. (the array stringifies instead of acting like any(@verbs)). that's too bad. [11:38] <moritz> rakudo: $_ = "open"; my @verbs = <open close>; say $_ ~~ /^ @verbs/ <p6eval> rakudo 922500: OUTPUT«» <masak> maybe an appropriate change to src/Perl6/Actions.pm:3109 would fix things. <masak> huh. that's odd. <masak> looking at the commit for that area of code, the !MAKE_REGEX routine in src/glue/regex.pir seems to be *specifically* made for handling arrays interpolated into regexes. <masak> but I don't see it applying any infix:<|> semantics. <masak> S05:1139: "An interpolated array [...] is matched as if it were an alternation of its elements." * masak submits rakudobug
