明解Ｃ言語 入門編 > 5. 配列 > 配列のコピー Perl @va = (1, 2, 3, 4, 5); @vb = @va; $vb[4] = 6; print " va vb\n"; print "-------\n"; for (0..4) { printf("%3d %3d\n", $va[$_], $vb[$_]); } 実行結果 L:\>perl lesson_05_033.pl va vb - 1 1 2 2 3 3…