从不同的perl脚本访问perl子例程

Question

我有1个perl脚本,我们在其中写了几个子程序.例:

# Try_1.pl

main();

sub main{
---
---
 check();
}

check {
--
--}

现在,我写了另一个脚本Try_2.pl,我想在其中调用perl脚本的check子例程Try_1.pl.

Answer 1

听起来你想要创建一个模块.Try_1.pm(编辑:注释扩展名)应具有以下形式:

package Try_1;
use base 'Exporter';
our @EXPORT = qw(check);

sub check {
}

1;

然后Try_2.pl需要获取该代码:

use Try_1 qw(check);

那你在寻找什么？

Answer 2

如果您不使用模块(扩展名.pm),而是使用库(扩展名.pl):

require 'Try_1.pl';
check();

确保这两个文件Try_1.pl,并Try_2.pl在同一个目录下.