use strict;
use warnings;

my @array=(1,2,3);
my %hash = ();

$hash{'string'} = \@array;

print $hash{'string'}[0];
print $hash{'string'}[1];
print $hash{'string'}[2];