gistfile1.txt

use v6;
use Test;

my @foo = ^10;

sub do_test  (@expect) {
    is_deeply([1,2], @expect, "direct");
    }
sub do_test2 (@expect) {
    my @exp = @expect;
    is_deeply([1,2], @exp,    "copy");
    }

do_test(@foo[1,2]);
do_test([1,2]);
do_test2(@foo[1,2]);
do_test2([1,2]);

done;


=>

not ok 1 - direct

# Failed test 'direct'
# at t.pl line 7
# expected: $(1, 2)
#      got: [1, 2]
ok 2 - direct
ok 3 - copy
ok 4 - copy
1..4
# Looks like you failed 1 tests of 4