sironekotoroの日記

Perl で楽をしたい

2015-06-20から1日間の記事一覧

続・はじめてのPerl 第2版 第5章 リファレンスとスコープ

無名配列 そういうことなんですか!と 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 ほ…