Re: passing multiple hashes to a subroutine

[itsscott]

I asked the same thing once too here's the answer I used to great success. http://www.perlmonks.org/?node_id=903429 And a small snippet from my working code.

sub report {
    our %hash1; local *hash1 = $_[0];
    our %hash2; local *hash2 = $_[1];
    our %hash3; local *hash3 = $_[2];
    
    my $othervar1 = $_[3];
    my $othervar2 = $_[4];
... do stuff ...
}

# call it
report(\%hash1, \%hash2, \%hash3, $othervar1, $othervar2);

Hope that helps