# New Ticket Created by Moritz Lenz
# Please include the string: [perl #66824]
# in the subject line of all future correspondence about this issue.
# <URL: http://rt.perl.org/rt3/Ticket/Display.html?id=66824 >
21:03 <@moritz_> rakudo: my @a = 1, 2, 4; sub f($a) { say $a };
f(|@a[*-1..*-1])
21:03 < p6eval> rakudo 1b06df: OUTPUT«argument doesn't arrayin sub f
(/tmp/2x4tmnOO68:1)called from Main (/tmp/2x4tmnOO68:2)»
OTOH, this works:
21:01 <@moritz_> rakudo: my @a = 1, 2, 4; sub f($a, $b) { say "$a|$b" };
f(|@a[*-2..2])
21:01 < p6eval> rakudo 1b06df: OUTPUT«2|4»
Cheers,
Moritz