Как я узнаю название файла, который был require
'd, из того файла? Я могу изучить %INC
найти названия всех файлов, которые были загружены, но я ищу что-то как $0
это служило бы ключом в %INC
.
простой
my $filename=__FILE__;
print __FILE__;
должен сделать ...
также посмотрите здесь (do-a-perl-module-know-here-it-is-installed) и здесь ( perldoc on Special-Literals ) для получения дополнительных идей
.