自作モジュールを認識しない

質問

Perl 5.8
自作モジュールのあるフォルダをFOLDER、モジュールの名前をMODULEとして以下のコードを実行してもモジュールが見つからない旨のメッセージが表示されます。
モジュールの拡張子は.pmを使用しています。
また、モジュールを標準の拡張モジュールのおき場所に置いた場合は適切に動作しました。

#! /usr/local/bin/perl
push (@INC ,FOLDER);
use MODULE;

回答No.1

BLUEPIXY · ベストアンサー

BEGIN {
push (@INC ,FOLDER);
#あるいは、
#unshift (@INC ,FOLDER);
}
してやればいいです。
どっちかというと
use lib FOLDER;
してやる方が簡単です。

お礼

回答ありがとうございます。
use lib FOLDER;
の方法を使用することにしました。

なるほど、BEGINを使用するということは、useはコンパイル時に実行されるのですね。
単純な勘違いでした。

回答No.2

SE-1

これでもいいかと思います。

package MODULE;

use Exporter;
@ISA = (Exporter);
@EXPORT = qw(subroutine);

sub subroutine{
...
}

return 1;

これを、MODULE.pm として、メインのスクリプトで use MODULE; &subroutine();

参考URL：

http://www.rfs.jp/sb/perl/04/01.html

お礼

回答ありがとうございます。
お教えいただいた方法は、幾分助長なため、今回は簡単に使用できる#1の方の方法で実装する事にしました。