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