Select Code to Download

use warnings;
use strict;
...
push @{$hoh{'this'}->{'that'}->{'theOther'} }, ['eggs', 'bacon', 'chee
+se'];

print Dumper (\%hoh);

$VAR1 = {
          'this' => {
...
                                }
                    }
        };