Mega Code Archive

 
Categories / Perl / Hash
 

Using the each operator to extract a keyvalue pair as a list from the hash

#!/usr/bin/perl -w # Associative array or hash access with each. $hash{"Name"} = "G "; $hash{"Address"} = "1"; $hash{"City"} = "W"; # Access each element with each. while ( ($key,$value) = each(%hash) ) {     print "Key: $key \t Value: $value\n"; }