my $arrayref;
{
   my @array = (1, 2, 3);
   $arrayref =  \@array;
}