- or download this
say (exists $fs4->{_structure}{'/Users/dotfiles/perl5/my_modules'}{BLA
+H}{Crap}); # BLAH and its parent do not exist
d $fs4; # dumps the object
- or download this
### Dump from: 01-FSO_basic.t line: 35
$VAR1 = {
'/Users/dotfiles/perl5/my_modules' => {
'BLAH' => {}
},
- or download this
perl -MData::Dump -E ' my $fs4 = {'_structure' => {}}; exists $fs4->{_
+structure}{BLAH}{TEST}{Crap}; dd $fs4->{_structure} '