Select Code to Download

use Data::Dumper;
my %hash2 = (
...
    complicated => ["hash", ["structure"]]
);
print Data::Dumper->Dump([\%hash2], ['*hash2']);

%hash2 = (
           'some' => 'really',
...
                              ]
                            ]
         );