имеется некая функция, скажем foo. как можно узнать из какого пакета данная функция?
пример:
package Ap;
use base 'Exporter';
our @EXPORT=qw(foo);
sub foo
{
return 'blah';
}
package main;
use Ap;
sub foo1
{
return 'blah2';
}
# вот тут имеем функцию
# main::foo, нужно имея ссылку на \&main::foo узнать
# что это на самом деле Ap::foo
# а так же имея ссылку на \&main::foo1, узнать что она
# и есть main::foo1
--
... mpd is off
. ''`. Dmitry E. Oboukhov
: :’ : email: [email protected] jabber://[email protected]
`. `~’ GPGKey: 1024D / F8E26537 2006-11-21
`- 1B23 D4F8 8EC0 D902 0555 E438 AB8C 00CF F8E2 6537
signature.asc
Description: Digital signature
-- Moscow.pm mailing list [email protected] | http://moscow.pm.org
