use strict; sub foo(\@;@) { shift; print @_, "\n"; }; my @arr1 = ( [1, 2], 2, 3 ); my @arr2 = (1, 2, 3); foo( @arr1, @arr2 ); &foo( @arr1, @arr2 ); __END__ 123 23123