Select Code to Download

my $array = Array::AsHash->new({array => \@array});
my $value = $array->get($some_reference);

my $aref = [1,2,3];
my $array = Array::AsHash->new({
  array => [ $aref => 'Ovid' ]
});
print $array->get($aref);   # prints "Ovid"
print $array->get([1,2,3]); # fails