Select Code to Download

#!/usr/bin/env perl

...
else {
    print "The key '$k' doesn't exist.\n";
}

$ pm_hash_search.pl
Enter the key you want to search for: 37
...
$ pm_hash_search.pl
Enter the key you want to search for: 101
The key '101' has the value: f