print "$SERVER{$key}{one} == 1 && $SERVER{$key}{two} == 1\n"; no warnings 'uninitialized'; if($SERVER{$key}{one} == 1 && $SERVER{$key}{two} == 1){ ... } use warnings 'all'; # I think it's a nice warning, I never want it off for very long... ymmv