my @arr      = (1, 2, 3);
my $ref      = \@arr;