最奇怪的是 - 无论如何对我来说。
我有一个模块lesenfantsterribles.pm,它包含站点的所有常见子例程。
一个名为" Blacklist"的子程序被定义为由其他程序通过@EXPORT =
以及大多数子例程使用,除了那些仅在模块中使用的子例程。
突然,当从模块中的另一个子例程调用(&Blacklist;
)时,我收到错误消息" Undefined subroutine& lesenfantsterribles :: Blacklist在lesenfantsterribles.pm第681行调用。"
有几种可能的呼叫"黑名单"在子程序中,只有一个导致此错误。
有什么想法吗?
相关的片段就是这样:
my $rc = &isSpamText($string);
&debugLog('isSpam',"return code from isSpamText <$rc>");
if ($rc)
{
&errorLog('isSpam',"Probable spam comment '$string' - spam assumed");
&Blacklist;
return 1;
}
在调用此内部子程序失败之前,会成功调用三个内部子程序。