# New Ticket Created by "Carl Mäsak"
# Please include the string: [perl #95500]
# in the subject line of all future correspondence about this issue.
# https://rt.perl.org:443/rt3/Ticket/Display.html?id=95500 >
I found a bug. :)
rakudo: subset Foo of Str where any(); for { when Foo { say "$
# New Ticket Created by "Carl Mäsak"
# Please include the string: [perl #95504]
# in the subject line of all future correspondence about this issue.
# https://rt.perl.org:443/rt3/Ticket/Display.html?id=95504 >
rakudo: $_ = "open"; my @verbs = "open", "close"; say $_ ~~ /^ @verbs/
rakudo 922
# New Ticket Created by "Carl Mäsak"
# Please include the string: [perl #95514]
# in the subject line of all future correspondence about this issue.
# https://rt.perl.org:443/rt3/Ticket/Display.html?id=95514 >
rakudo: role R { method foo { self.bar(42) }; method bar($x) {
say "OH HAI" } }; c
