http://www.perlmonks.org?node_id=997603


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
    haha.. yes, lesson just learned! Thank you very much! =)