perl - 如何要求一个文件并使用它的子程序

Question

当子程序必须获取变量时，如何在所需文件中使用子程序：

文件.pl：

...
sub func{
  my ($var) = @_;
  ..

}

主要.pl：

..
require "file.pl";
func(1);
..

这对我不起作用，我收到一个错误说Undefined subroutine &main::func..

Answer 1

Perl 告诉你不main::func存在（main是默认包），所以你需要在你的函数前面加上合格的包名，

require "file.pl";
Naming::func(1);