Sub::Identify - точно работает:
perl -we 'use Sub::Identify qw(stash_name); $sub = Foo->getsub; print(
stash_name($sub)); package Foo; sub getsub { return sub { print "ok" } }'
2013/10/11 Konstantin S. Uvarin <[email protected]>
> Приветствую.
>
> https://metacpan.org/module/Sub::Information
>
> Не оно? (сам не тестил)
>
>
> 2013/10/11 Гришаев Анатолий <[email protected]>
>
>> Есть ли какой-нибудь модуль на CPAN с помощью которого можно узнать в
>> каком пакете/файле была определена/создана конкретная подпрограмма/CODEREF?
>>
>> Можно ли определить ещё и его имя?
>>
>> --
>> С уважением Анатолий.
>> --
>> Moscow.pm mailing list
>> [email protected] | http://moscow.pm.org
>>
>
>
--
Moscow.pm mailing list
[email protected] | http://moscow.pm.org
