in reply to How do you check if a key exists without creating it ?
You're just falling into autovivification. Check for existence of the lower level first if you don't want it autocreated:
use Data::Dumper; $x = {}; 1 if ( $x->{Y} && exists $x->{Y}{X} ) ; 1 if ( $x->{Z} && defined $x->{Z}{A} ); print Dumper $x;
|
---|
Replies are listed 'Best First'. | |
---|---|
Re^2: How do you check if a key exists without creating it ?
by exilepanda (Friar) on Oct 06, 2012 at 11:34 UTC |
In Section
Seekers of Perl Wisdom