Hypnotoad和主命名空间

Question

如何处理Hypnotoad下的主命名空间？

我有这个小服务器：

use Modern::Perl;

package extmod;

sub put
{
  say ">>put:";
  ::hello();
}

1;

...和这个模块：

Select Job_Type
FROM Shift
WHERE Start_Time IN (SELECT DISTINCT CAST(Start_Time AS DATE) As Start_Time
                     FROM Shift)

模块中的子例程尝试调用主命名空间中的sub;

这在标准mojo服务器下可以正常工作。但不是在Hypnotoad下：

  

    

put：[Tue May 30 14:20:37 2017] [error]未定义的子例程＆amp; main :: hello在extmod.pm第8行调用。

  

这是一个功能吗？如何在模块中查看全局命名空间？