my @foo = ( 1, 2, 3 );
my $arrayref = \@foo;