【Perl】リファレンスとデリファレンスのサンプル

雄大です。

リファレンスとデリファレンスのサンプルコードを書いてみました。
use strict; use warnings;

my @array =(1,2,3);
print $array[1].”\n”;

#配列変数の@の前に、\をつけると、配列のリファレンスが取得。
my $array_ref = \@array;

print $array_ref.”\n”;

#デリファレンスの書き方は2種類
print $$array_ref[1].”\n”;
print $array_ref->[1].”\n”;