Select Code to Download

#!/usr/local/bin/perl

...
my %hash;
push @{$hash{q{first}}}, \@array1, \@array2;
print Dumper \%hash;

$VAR1 = {
  'first' => [
...
    ]
  ]
};