Perl再入門 | アルパカ本に学ぶリファレンス入門 2 配列リファレンスをデリファレンス

2008/06/26

use strict;

my @list = ("a", "b", "c");
my $ref = \@list;

# 配列全体を取り出す
print "$ref\n";      # 出力：　ARRAY(0x1829884)
print "@{$ref}\n";   # 出力： a b c
print "@$ref\n";     # 出力： a b c

# 配列の要素を取り出す
print "${$ref}[0]\n";    # 出力： a
print "$$ref[0]\n";      # 出力： a
print "$ref->[0]\n";     # 出力： a

ご欄のように、同じことをするのに書き方が何通りがあります。

カテゴリ: Perl_retry Perl