Select Code to Download

my @words = qw(john mary ted larry wendel);
my %dict; 
...
print "larry exists \n" if exists $dict{'larry'};
print "bill exists \n" if exists $dict{'bill'};
print "bill doesn't exist \n" unless exists $dict{'bill'};