>36
ｽﾏｿ。訂正＆追加。

呼び出すperlソース(?)と同じ場所に置くなら、

use FindBin;
use lib $FindBin::Bin

(perl クックブックより)