Beefy Boxes and Bandwidth Generously Provided by pair Networks
Perl-Sensitive Sunglasses
 
PerlMonks  

Re: How do you check if a key exists without creating it ?

by wind (Priest)
on Oct 06, 2012 at 08:43 UTC ( [id://997603]=note: print w/replies, xml ) Need Help??


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! =)

Log In?
Username:
Password:

What's my password?
Create A New User
Domain Nodelet?
Node Status?
node history
Node Type: note [id://997603]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this?Last hourOther CB clients
Other Users?
Others having an uproarious good time at the Monastery: (4)
As of 2024-03-28 22:34 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    No recent polls found