从模块调用函数时，为什么会收到错误消息“Undefined subroutine”？

Question

我有一个模块名为Helpers.pm：

use warnings; 
use 5.012; 

package Helpers; 
use Exporter qw(import); 
our @EXPORT_OK = qw(my_function); 

sub my_function { 
    return { one => 1, two => 2 }; 
} 

1; 

的调用它的脚本：

#!/usr/bin/env perl 
use warnings; 
use 5.012; 
use Data::Dumper; 
use FindBin qw($RealBin); 

use lib $RealBin; 
use Helpers qw(my_function); 

my $ref = my_function(); 
say Dumper $ref; 

和我没有得到任何错误的消息。 但是，当我把模块的目录TestDir的修改这样的脚本：

#!/usr/bin/env perl 
use warnings; 
use 5.012; 
use Data::Dumper; 
use FindBin qw($RealBin); 

use lib $RealBin; 
use TestDir::Helpers qw(my_function); 

my $ref = my_function(); 
say Dumper $ref; 

我收到此错误消息：

Undefined subroutine &main::my_function called at ./perl.pl line 10. 

为什么我会收到此错误消息？

Answer 1

你可能忘了包声明从

package Helpers; 

改变：

package TestDir::Helpers; 

Answer 2

我认为这是因为它无法在lib路径找到你的模块，http://perldoc.perl.org/lib.html。

use lib 'TestDir'; 
use Helpers qw(my_function);