Select Code to Download

use strict;   # or die
use warnings; # or die
...
}
 
print "Keys in the hash: ", join(" :: ", keys %hash), "\n";

/usr/bin/perl -w /home/lanx/tst.pl 
Absum doesn't exist.
Keys in the hash: cogito :: absum