Select Code to Download

use strict;
use warnings;
...
        print "It exists!\n"
}
print Dumper(\%hash);

$VAR1 = {
          'foo' => {
                     'bar' => {}
                   }
        };

use strict;
use warnings;
...
}
print Dumper(\%hash);

$VAR1 = {};