未定义的子程序虽然已定义

时间:2017-08-07 16:33:34

标签: perl module undefined subroutine

最奇怪的是 - 无论如何对我来说。 我有一个模块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;   
}   

在调用此内部子程序失败之前,会成功调用三个内部子程序。

0 个答案:

没有答案