3 use warnings FATAL => 'all';
6 use Function::Parameters;
8 fun test_array ( $foo, @bar ) {
12 fun test_hash ( $foo, %bar ) {
13 return { foo => $foo, %bar };
16 is_deeply( test_array( 1, 2 .. 10 ), [ 1, 2 .. 10 ], '... slurpy array worked' );
17 is_deeply( test_hash( 1, ( two => 2, three => 3 ) ), { foo => 1, two => 2, three => 3 }, '... slurpy hash worked' );