Perl プログラミングの基本的な事柄のメモ。
ハッシュのリファレンスのリストをコピーしても
リファレンスの中身は同じ。
後で一瞬で説明するためにテストコードで実証。
ソースコード：
my @foos;
push @foos, {num => 2};
push @foos, {num => 1};
print join(", ", map {$_->{num}} @foos), " (foos)\n";
my @bars = @foos;
$bars[0]->{num} = 3;
$bars[1]->{num} = 4;
print join(", ", map {$_->{num}} @bars), " (bars)\n";
print join(", ", map {$_->{num}} @foos), " (foos)\n";
実行結果：
2, 1 (foos) 3, 4 (bars) 3, 4 (foos)
