Select Code to Download

print "Case 4: stopper scalar\n";
$x = 'stopper';
exists $x->{'y'}->{'z'};
print Dumper $x;