$VAR1 = {
           'key' => {
                      'innerkey2' => [
                                       'here'
                                     ],
                      'innerkey3' => [
                                       'there'
                                     ],
                      'innerkey1' => [
                                       'hello',
                                       'world'
                                     ]
                    }
         };

print Dumper $VAR1;

##</code><code>##

use warnings;
use strict;

use Data::Dump qw(dd);

my $something_else = {
    ...,
    };
dd $something_else;