perl 中的push (@INC 问题

qiusk

我的 A.pm 放在 另外一个目录下 ，比如/home/pm

我的当前目录是/home/test/

#!/usr/bin/perl

push (@INC, "/home");

use A;

可是运行的时候报错

Can't locate Channel.pm in @INC (@INC contains: /usr/lib/perl5/5.8.5/i386....

而如果吧A.pm 放在本目录/home/test/下时，则没有问题
难道 push(@INC,"/home");没起到作用？

兰花仙子

原帖由 qiusk 于 2006-8-25 14:42 发表
我的 A.pm 放在 另外一个目录下 ，比如/home/pm

我的当前目录是/home/test/

#!/usr/bin/perl

push (@INC, "/home");

use A;

可是运行的时候报错

Can't locate Channel.pm in @INC (@ ...

BEGIN {
    push (@INC,"/home");
}

or

use lib '/home';