programming-examples/perl/Hash/Using each to get key and value pair from hash.pl

$hash2{A} = F;
$hash2{B} = E;
$hash2{'C'} = D;

while(($key, $value) = each(%hash)) {
    print "$key => $value\n";
}