Perl別のパッケージから私のパッケージをインポートするには？

Question

これは私のフォルダ構造です：package2.plで

XFolder/ 
XFolder/YFolder/ 
XFolder/YFolder/package1.pl 
XFolder/package2.pl 

、私が持っている：package1.p1で

package X::Pa2 

を、私が持っている：package1.plで

package X::Y::Pa1 

を、私はこれを行うとき：

use X::Pa2; 

私はそれをしてください修正する方法

Can't locate X/PA2.pm in @INC (you may need to install the X::Pa2 module) 

を取得しますか？問題がどこにある

は、私が知っていると私は助けるためにGoogleを使用しようとしましたが、私は追加できませんでした私にX::Pa2私@INCとPerlの専門家

Answer 1

モジュールからのより標準的な解決策があるかどうかはわかりません.pmの拡張子を持つ必要があります。ファイル名はパッケージ名と一致する必要があります。

修正するには：

mkdir -p X 
mv XFolder/package2.pl X/Pa2.pm 

mkdir -p X/Y 
mv XFolder/YFolder/package1.pl X/Y/Pa1.pm 

---

をこれらのパスは、@INCで見つかったいくつかのパスからの相対である必要があります。

これらのモジュールは私の複数のスクリプトを使用している場合は、ログインスクリプトに以下を追加します。これらのモジュールは一つだけのスクリプトによって使用されている場合

export PERL5LIB=/path/to/lib 

を、ベースディレクトリはスクリプトが置かれているディレクトリです、スクリプトに次の行を追加します。

use FindBin 1.51 qw($RealBin); 
use lib $RealBin;     # Or maybe: use lib "$RealBin/lib"; 

または

use Cwd qw(abs_path); 
use File::Basename qw(dirname); 
use lib dirname(abs_path($0));  # Or maybe: use lib dirname(abs_path($0))."/lib";