モジュールの最新版や不安定版を使うときに検索パスを指定したい。こんなときはuse lib qw()を使う。例えば、hoge::fugaが2つの場所にインストールされている場合に、どちらか一方が使いたい。そんなときはuse libを使って以下のようにする。@INCの先頭に/home/**********/libが追加されるので、/home/*********/lib/hoge/fuga.pmが読み込まれるはずだ。正しく読み込まれたかの確認は%INCの中味で行う。
#!/usr/bin/perl
use lib qw(/home/****************/lib);
use hoge::fuga;
map{print "$_\n"} @INC;
while (my ($key, $val) = each %INC){
print "$key\t$val\n";
}