my %h;
   if( $h{"isn't there"} ) { 1 }
   print "$_\n" for keys %h; # does not print anything