如何在Perl中找到require'd文件的文件名？

Question

如何从该文件中找到require'd文件的名称？我可以查看%INC以查找已加载的所有文件的名称，但我正在寻找$0之类的内容，作为%INC的密钥。

Answer 1

一个简单的

my $filename=__FILE__;
print __FILE__;

应该做..

还可以查看here (does-a-perl-module-know-where-it-is-installed)和here ( perldoc on Special-Literals )以获取更多想法