Lines Matching refs:array2
494 sub array2 : lvalue { @array2 } # This is a global.
497 @array2 = qw(foo bar);
503 (array2()) = qw(ok 55);
504 is("@array2", "ok 55");
517 @array2 = qw(a B c d);
518 sub aslice2 : lvalue { @array2[0,2] };
520 is("@array2", "ok B already d");
801 @array2 = qw 'one two free';
802 is join(',', map $_, sub:lvalue{@array2}->()), 'one,two,free',
804 is join(',', map $_, sub:lvalue{@{\@array2}}->()), 'one,two,free',