sub x{ 
    my( @a, @b ) = @_; 
    print "a:[@a]\nb:[@b]"; 
};

@x = 1..10; 
@y = 'a'..'f';;
print "x:[@x]\ny:[@y]";;
x:[1 2 3 4 5 6 7 8 9 10]
y:[a b c d e f]

x( @x, @y );;
a:[1 2 3 4 5 6 7 8 9 10 a b c d e f]
b:[]