Perl uses by default the array @INC as include path when searching for modules to load. This path is compiled into the perl binary when building it from source and can be printed by running perl -V, which will show something like:<\/p>\n
$ perl -V\r\n...\r\nCompiled at Jun 22 2012 13:27:28\r\n@INC:\r\n\u00a0\u00a0\u00a0 \/usr\/local\/lib64\/perl5\r\n\u00a0\u00a0\u00a0 \/usr\/local\/share\/perl5\r\n\u00a0\u00a0\u00a0 \/usr\/lib64\/perl5\/vendor_perl\r\n\u00a0\u00a0\u00a0 \/usr\/share\/perl5\/vendor_perl\r\n\u00a0\u00a0\u00a0 \/usr\/lib64\/perl5\r\n\u00a0\u00a0\u00a0 \/usr\/share\/perl5<\/pre>\n1. Using the module lib<\/h1>\n
The standard module lib can be used to specify an explicit path to include. It must be stated at the top of the script:<\/p>\n
#!\/usr\/bin\/perl\r\n#\r\nuse lib \"\/opt\/special\/plib\";\r\nuse strict;\r\nuse warnings;\r\n..<\/pre>\n2. Using the switch \u00adI at the command line<\/h1>\n
The switch \u00adI can be used to specify additional library locations when invoking the interpreter.<\/p>\n
perl -I \/opt\/special\/plib script.pl<\/pre>\n3. Using the switch \u00adI in the first line of the script<\/h1>\n
The same \u00adI switch can be added to the interpreter specification.<\/p>\n
#!\/usr\/bin\/perl -I \/opt\/special\/plib\r\n#\r\nuse strict;\r\nuse warnings;\r\n..<\/pre>\n4. Manipulating @INC directly<\/h1>\n
The array @INC can be manipulated directly using array operations<\/p>\n
#!\/usr\/bin\/perl\r\n#\r\nBEGIN {\r\nunshift(@INC, \"\/opt\/special\/plib\");\r\n}\r\nuse strict;\r\nuse warnings;<\/pre>\nThis is the same as using the module lib, which in fact does something like this.<\/p>\n
5. Using the environment variable PERL5LIB<\/h1>\n
The environment variable PERL5LIB can be used to specify additional include directories when running a perl script.<\/p>\n
> export PERL5LIB=\/opt\/special\/plib #Adding this sequnce to \r\n\/etc\/profile, then the @INC would be changed persistently.\r\n> \/path\/to\/script.pl<\/pre>\n6. Changing @INC at compile time<\/h1>\n","protected":false},"excerpt":{"rendered":"
Perl uses by default the array @INC as i … \u7ee7\u7eed\u9605\u8bfb