配列のリファレンス

リファレンスの作り方
 @array = qw(alpha beta gamma);
 $a_ref = \@array;

デリファレンス
 @v = @$a_ref;
 for $i (@$a_ref)
 push(@$a_ref, ...);
 $a_ref->[0]