如何在Perl中获取正在读取的文件名?

$ARGV

perldoc perlvar

• $ARGV

但是,如果您从STDIN输入,您将只获得“-”

在中还对null文件句柄进行了更多讨论 perldoc perlop

如果您使用的是linux,那么可以查看 /proc/self/fd/0 .

编辑: 为了清楚起见,对答案进行了修改:上面的内容很有用,但是 只有 在从中读取perl脚本的输入的情况下 stdin . 这可以通过阅读来确定 $ARGV ,如上述答复所述。