Perl -e 并打印 $_

Question

我有一个类似于以下的循环:

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

我虽然 $_ 会引用“-e”的参数，但事实并非如此。我可以在这里使用任何特殊变量吗？

Answer 1

您可以在测试中分配给变量:

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

如果没有给出参数，

-e 将测试 $_，但不会将其参数分配给 $_。要了解有关 filetest 运算符的更多信息，请阅读 perlfunc entry .