How to pass a hash to a subroutine?
#!/usr/bin/perl
use strict;
my %MyHash;
# ...
# Call subroutine
MySubroutine( %MyHash );
# ...
sub MySubroutine
{my %ThisHash = @_; # ...
}
#!/usr/bin/perl
use strict;
my %MyHash;
# ...
# Call subroutine
MySubroutine( %MyHash );
# ...
sub MySubroutine
{my %ThisHash = @_; # ...
}