...
sub something {
 my ($ary_ref1, $ary_ref2, $ary_ref3) = @_;
...
}

...
something( \@ary1, \@ary2, \@ary3 );
...