$ perl -le 'my $a; defined $a->{b}{c}; print ref $a'
HASH