Re^6: var comparison

in reply to Re^5: var comparison
in thread var comparison

Nice hash slice, thanks!

Just let me polish up your code so other newbies don't get confused:

my %option;
@option{qw/a b c/}=();

# my %option = (
#  'a' => undef,
#  'b' => undef,
#  'c' => undef
# );

exists $option{a} and print 'true';

exists $option{d} or print 'false';
[download]

PS: what the h**l is DB <...> ?

In Section Seekers of Perl Wisdom