我想从我的系统上可用的任意Perl模块动态获取函数名称(作为字符串)或函数引用的列表.这将包括可能具有或不具有的模块,例如其命名空间中的全局@EXPORT_OK阵列.这样的壮举有可能吗？如果是这样的话怎么把它拉下来？
编辑：从阅读perlmod,我看到％Some :: Module ::用作Some :: Module的符号表.这是正确的地方吗？如果是这样,我怎样才能将表格缩小到Some :: Module中的函数名称？
解决方法
你走在正确的轨道上.为了将整个符号表简化为sub,可以完成类似的事情(Hat tip“Mastering Perl”,第8章,主要包版本)：
use strict; # need to turn off refs when needed
package X;
sub x {1;};
sub y {1;};
our $y = 1;
our $z = 2;
package main;
foreach my $entry ( keys %X:: ) {
no strict 'refs';
if (defined &{"X::$entry"}) {
print "sub $entry is defined\n" ;
}
}
# OUTPUT
sub y is defined
sub x is defined