Select Code to Download

#/usr/bin/perl -w
use strict;

...
if ($hash{key2} eq "") { # true
  print "key2 empty!\n";
}