- or download this
if ($foo){...}
- or download this
if ($myHash{"unknown_if_this_key_exists_yet_or_not"}){...}
- or download this
if ($myHash{unknown}{if}{this}{key}{combination}{exists}{yet}{or}{not}
+){...}
- or download this
my %myHash = ();
if ($myHash{unknown}{if}{this}{key}{combination}{exists}{yet}{or}{not}
+){print "Nothing prints here; Good!"}
if ($myHash{unknown}{if}{this}{key}{combination}{exists}{yet}{or}
+){print "This will print, although we'd like it not to...";}
- or download this
if (exists($myHash{unknown}{if}{this}{key}{combination}{exists}{yet}{o
+r}{not}) and $myHash{unknown}{if}{this}{key}{combination}{exists}{yet
+}{or}{not}){...}
- or download this
if ($myHash{"this_key_does_not_exist"){...}
- or download this
Readonly::Hash $myHash => ("key1" = "val1",);
$myTempValue = $myHash{"this_key_does_not_exist"};
- or download this
no autovivification;
my %myHash = ();
if ($myHash{unknown}{if}{this}{key}{combination}{exists}{yet}{or}{not}
+){print "Nothing prints here; Good!"}
if ($myHash{unknown}{if}{this}{key}{combination}{exists}{yet}{or}
+){print "This will NOT print! That is exactly what we want!";}
- or download this
cpan
> notest install autovivification
> q