前ページ

特殊変数

　$_ default 変数


プログラム中で、操作対象の変数を指定しない場合、暗黙のうちに、この変数が指定されたとみなされます。

# 省略されている状態
foreach ( @lines ) {
  chomp;
  s/>/>/g;
  s/</&lt;/g;
  print;
}

# 省略されているけど、実はこういうこと。
foreach $_ ( @lines ) {
  chomp( $_ );
  $_ =~ s/>/&gt;/g;
  $_ =~ s/</&lt;/g;
  print $_;
}

　$_　の使用方法　sample
@alpha = ('a', 'b', c', d', 'e', 'f', g');

　foreach ( @alpha ){ # $_ それぞれ代入

　print ; # $_ の内容を出力
　print "\n";

　}


［　出力結果　］
　a
　b
　c
　d
　e
　f
　g