use Data::Dumper;
my %stopper;
$x = 'stopper';
exists $x->{'y'}->{'z'};
print Dumper $x;

print Dumper \%stopper;

##</code><code>##

$VAR1 = 'stopper';
$VAR1 = {};

##</code><code>##

$VAR1 = 'stopper';
$VAR1 = {
          'y' => {}
        };