sub test { my $number = shift; my @array1 = @{+shift}; # Shift off the reference, and dereference it my @array2 = @{+shift}; # Do your stuff } test (2, \@a, \@b);