$ perl -E 'my @name = qw{a b c}; my $name_ref = \@name; say for @$name_ref' a b c