iandeth. - FindBin module を使って use lib 記述をシンプルにする

iandeth. Perl, Flash ActionScript, MySQL, Movable Type, システム開発 - そんなテーマのサイトdeth. 下記のようなディレクトリ構成の Perl コードがあった場合、 /root/www/cgi-bin/fuga.cgi /root/www/lib/*.pm /root/www/lib/*/*.pm CGIスクリプトの冒頭で /root/www/lib 下を use lib する記述を書きますが、僕は今まで use lib '/root/www/lib'; と、おもむろにフルパスで書いておくものの、後でリソース全部を /root/newdir なんかに移動させたあげく、use lib 記述を修正するの忘れた状態で Can't locate *.pm in @INC なんて怒られて「何故？」と途方にくれてみたり、 BEGIN { #

[pero_0104]

“use lib "$FindBin::RealBin/../lib";”

[kanetann]

ちなみに $FindBin::Bin と $FindBin::RealBin の違いは symbolic link 等のパス解決をするかしないかの違いです。

[dribble13]

use lib記述をシンプルにする方法

[mtsuyugu]

テスト用と本番用でパス替えなくて良いし。便利。