perl @$
my @array = ( 1, 2, 3 ); my $array_ref = \@array; print "REF: ", $array_ref,"\n"; print "VALUES: ", join " ", @$array_ref;
Source: stackoverflow.com
my @array = ( 1, 2, 3 ); my $array_ref = \@array; print "REF: ", $array_ref,"\n"; print "VALUES: ", join " ", @$array_ref;