in reply to How to pass multidimensional hashed arrays as reference to a subroutine?
mysub(\@arrofhash); sub mysub { my @aoh=@{$_[0]}; $aof[0]->{somekey}++; ... }
And, obviously, you can do the same with your hash, if you mysub will be passed is that hash, like this:mysub(@arrofhash); sub mysub { my @aoh=@_; $aof[0]->{somekey}++; ... }
mysub(%hash); sub mysub { my %args=@_; print $args{somekey},"\n"; ... }
|
|---|