my %modHash #It holds values getHash({"pdtName"=>"$pdtName","modHash"=>\%modHash}); sub getHash{ my $pdtName= $_[0]{pdtName}; my %moduleHash= $_[0]{modHash}; while (($key, $value) = each(%moduleHash)){ print "key +:".$key.",Value:".$value."\n"; } }
Let me know if anyone knows to retrieve the hash value in subroutine
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |