perlmod问题

例如：假设您在非标准库目录(例如/ tmp)中有一个模块Foo.pm.你知道你可以让perl通过修改@INC来包含/ tmp来找到模块??.但是,这不起作用：

unshift(@INC,'/tmp');
use Foo;    # perl reports Foo.pm not found

问题是use语句是在编译时执行的,而unshift语句是在运行时执行的,所以当perl查找Foo.pm时,include路径尚未被修改(尚未).

实现这一目标的正确方法是：

BEGIN { unshift(@INC,'/tmp') };
use Foo;

现在,unshift语句在编译时和使用Foo语句之前执行.

绝大多数脚本不需要BEGIN块.您可以通过使用其他模块获得BEGIN块中所需的许多内容.例如,在这种情况下,我们可以通过使用lib.pm模块确保/ tmp在@INC中：

use lib '/tmp';
use Foo;