2015-06-20から1日間の記事一覧
無名配列 そういうことなんですか!と my $ref; { my @skipper = qw(blue_shirt hat jacket preserver sunscreen); $ref = \@skipper; print "$ref->[2]\n"; # jacket\nを表示 } print "$ref->[2]\n"; # ここでもまだjacket\nを表示、参照カウントは1 ほ…
無名配列 そういうことなんですか!と my $ref; { my @skipper = qw(blue_shirt hat jacket preserver sunscreen); $ref = \@skipper; print "$ref->[2]\n"; # jacket\nを表示 } print "$ref->[2]\n"; # ここでもまだjacket\nを表示、参照カウントは1 ほ…