The arrays and hashes behave the same with respect to being parameters of subroutines. Use references for both:

sub func {
    my ($scalar, $array_ref, $hash_ref) = @_;
}

func($scalar, \@array, \%hash);
[download]