Select Code to Download

my %hash = (
    key1 => [\@a1_ref, \@a2_ref],
    key2 => [\@a3_ref, \@a4_ref],
);

#!/usr/bin/perl
use strict;
use warnings;
...
);

print "hoffentlich eine acht: ", $hash{key1}->[1]->[1], "\n";