Perlで配列を初期化するときにいろいろ試したので、そのログ
@始まりの変数に()で配列リストを作成して初期化する。
my @hoge = (1, 2, 3);
# 3<>1 2 3
print @hoge."<>@hoge\n";
配列変数をそのまま呼び出した場合は配列の長さが、文字列にするとスペース区切りになったものが出てくる。
@始まりの変数に配列以外を入れて初期化する。
my @hoge = 3;
# 1<>3<>3
print @hoge."<>@hoge<>$hoge[0]\n";
この場合は暗黙的に配列が作成され、ゼロ番目の要素にその値が入る。
前項の応用。参考までに無名配列で初期化した場合、[0]に無名配列が入り、二重配列になる。
my @hoge = [1, 2, 3];
# 1<>ARRAY(0x55e45749d860)<>ARRAY(0x55e45749d860)<>1<>2<>3
print @hoge."<>@hoge<>$hoge[0]<>$hoge[0][0]<>$hoge[0][1]<>$hoge[0][2]\n";
スカラ値にキャストされ、配列長が入る。これは配列変数をそのまま使った場合同様の振る舞い。
my $hoge = (1, 2, 3);
# 3
print $hoge."\n";
そのままでは配列として扱うことができず、配列として扱うためには@{ $var }形式にする必要がある。
my $hoge = [1, 2, 3];
# ARRAY(0x5596ea845de0)<>ARRAY(0x5596ea845de0)<>3<>1 2 3
print $hoge."<>$hoge<>".@{ $hoge }."<>@{ $hoge }\n";
またハッシュを配列として扱う場合は、この形式になり@{ $hash->{hoge} }のようにして扱う。
配列が分解されてハッシュになるため、意図した値が入らない
my $hash = { hoge => (1, 2, 3) };
# 1<>1
print $hash->{hoge}."<>$hash->{hoge}\n";
実際にできる構造
$VAR1 = {
'hoge' => 1,
'2' => 3
}
基本的にはこれで初期化するといい。使い方は「スカラ変数を無名配列で初期化」と同様
my $hash = { hoge => [1, 2, 3] };
# ARRAY(0x55599ba8dd08)<>3<>1 2 3
print $hash->{hoge}."<>".@{ $hash->{hoge} }."<>@{ $hash->{hoge} }\n";
@{ $var }構文でやると上手く入る。普通に代入するとスカラ値になるので配列長が入る
my $hash = { hoge => undef };
@{ $hash->{hoge} } = (1, 2, 3);
# ARRAY(0x564efec0e4e8)<>3<>1 2 3
print $hash->{hoge}."<>".@{ $hash->{hoge} }."<>@{ $hash->{hoge} }\n";
my $hash = { hoge => undef };
$hash->{hoge} = [1, 2, 3];
# ARRAY(0x55844312a4e8)<>3<>1 2 3
print $hash->{hoge}."<>".@{ $hash->{hoge} }."<>@{ $hash->{hoge} }\n";
配列は配列の実体そのもので、無名配列は参照らしい。
恐らくスカラ変数に無名配列を入れた場合、変数そのものには配列への参照が入るので、ARRAY(0x5596ea845de0)的な値が出てくるが、@{ $var }とすると参照先の実体が見れるので、配列として扱うことができるようになるのだと思う。
反対に配列変数の場合は、基本的に配列の実体を見るようになっていて、文字列化するときのみ参照が取れるようになっているように見える。
詳しくは以下の資料を参照するとわかる気がするので、また暇なときにでも見てみようと思う。
最近は値と参照の境界が分かりづらくなっている気もするので、Perlのこう言った書き口は少し面白いなと思った。要するにポインタを明示的に扱える訳だ。