sub subroutine { my ($array_ref1, $array_ref2) = @_; your code here }