【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”;

参考URL:http://d.hatena.ne.jp/chaichanPaPa/20100206/1265436393

コメント