Select Code to Download

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

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