Select Code to Download

#!/usr/bin/perl
use strict;
...
print $h{key} ? $h{key} : "nokey";

print "\n", Dumper (\%h);

#!/usr/bin/perl
use strict;
...
#key: d is not true
#key: d is not defined
#key: d is not existing