<div dir="ltr">Sub::Identify - точно работает:<br><div><br>perl -we 'use Sub::Identify qw(stash_name); $sub = Foo->getsub; print( stash_name($sub)); package Foo; sub getsub { return sub { print "ok" } }'<br>
<br></div></div><div class="gmail_extra"><br><br><div class="gmail_quote">2013/10/11 Konstantin S. Uvarin <span dir="ltr"><<a href="mailto:khedin@gmail.com" target="_blank">khedin@gmail.com</a>></span><br><blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex">
<div dir="ltr"><div>Приветствую. <br><br><a href="https://metacpan.org/module/Sub::Information" target="_blank">https://metacpan.org/module/Sub::Information</a><br><br></div>Не оно? (сам не тестил)<br></div><div class="HOEnZb">
<div class="h5"><div class="gmail_extra"><br><br>
<div class="gmail_quote">2013/10/11 Гришаев Анатолий <span dir="ltr"><<a href="mailto:0body0@rambler.ru" target="_blank">0body0@rambler.ru</a>></span><br><blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex">

Есть ли какой-нибудь модуль на CPAN с помощью которого можно узнать в каком пакете/файле была определена/создана конкретная подпрограмма/CODEREF?<br>
<br>
Можно ли определить ещё и его имя?<span><font color="#888888"><br>
<br>
-- <br>
С уважением Анатолий.<br>
-- <br>
Moscow.pm mailing list<br>
<a href="mailto:moscow-pm@pm.org" target="_blank">moscow-pm@pm.org</a> | <a href="http://moscow.pm.org" target="_blank">http://moscow.pm.org</a><br>
</font></span></blockquote></div><br></div>
</div></div></blockquote></div><br></div>