perl - Perl -e と print $_

Question

次のようなループがあります。

if ( -e "$hash->{'key'}/filename" ) {
    print $_
}

$_ は「-e」の引数を参照すると思いますが、そうではありません。ここで使用できる特別な変数はありますか?

Answer 1

テスト内の変数に割り当てることができます：

if ( -e (my $_ = "...")) {
  print;
}

-e$_は、引数が指定されていない場合にテストしますが、その引数を に代入しません$_。filetest 演算子の詳細については、perlfuncエントリをお読みください。