1、关于@INC
perl中的INC变量中包含了所有的perl module的查找路径。
可以使用perl -V 来查看INC的值。
查看是否安装某Perl模块: perl -MShell
1)默认地INC如下:
@INC:
C:/Perl/site/lib
C:/Perl/lib
2)设置环境变量PERL5LIB来增加到INC,例如:
set perl5lib=c:\perllibs
在设置perl5lib后如下,
%ENV:
PERL5LIB="c:\perllibs"
@INC:
c:\perllibs
C:/Perl/site/lib
C:/Perl/lib
.
3)在perl程序中修改INC, 例如:
#!/usr/bin/perl -w
push(@INC,"/home/test");
或者
#!/usr/bin/perl -w
BEGIN{push(@INC,"/home/test")};
或者
#!/usr/bin/perl -w
use lib '/home/test';
4、路径设置
BEGIN { unshift @INC,'/opt/perl/lib'; }
或者
use lib '/opt/perl/lib';
使用绝对路径比较麻烦,如果将程序迁移到另外的安装目录,就需要去更改所有的脚本。而直接在use lib中使用相对路径,如use lib ‘../lib’;,测试发现手动执行bin目录下的perl脚本是可以的,但是放到crontab里去跑就找不到模块了。于是想先找到bin目录的路径,然后通过相对路径跳转到lib目录,在《Perl Cookbook》终于找到了我想要的,使用FindBin模块就能实现梦想了:
use FindBin qw($Bin); use lib "$Bin/../lib";
5、Perl use和require,这两个函数都是一个意思,加载和引用Perl的模块,或者是子程序,区别在于Perl use是在当前默认的里面去寻找,一旦模块不在指定的区域内的化,用Perl use是不可以引入的。
第一、Perl use引入的名称不需要后缀名,而require需要
第二、Perl use语句是编译时引入的,require是运行时引入的
第三,Perl use引入模块的同时,也引入了模块的子模块。而require则不能引入,要在重新声明
比如:
Perl use MyModule;
实际上,编译器将从@INC指定的目录下去寻找MyModule.pm模块。如果模块名称中包含::双冒号,该双冒号将作为路径分隔符,相当于Unix下的/或者Windows下\
的。如:
Perl useMyDirectory::MyModule;
编译器将从@INC指定的目录下的MyDirectory子目录去寻找MyModule模块,类似