perl - perl スクリプトから同じディレクトリにあるスクリプトを呼び出すにはどうすればよいですか

Question

perl スクリプト内からスクリプトを呼び出そうとしています。私はこれを行う2つの方法を見ることができます..

./somescript を使用するか、完全なディレクトリパスを指定します。どちらも理想的ではありません。"./" は、呼び出し元がディレクトリに移動している間だけ機能するからです。フルパスは相対パスではなく絶対パスです。とにかくこのあたり？ありがとう

score 1 · Accepted Answer

これを行う 1 つの方法は、スクリプトが属するディレクトリを特定することです。それを使用して、実行中の Perl スクリプトへのフルパスを取得するにはどうすればよいですか?

これを実現する 2 つの方法を提供します。

score 1 · Accepted Answer

FindBin元のスクリプトがあるディレクトリを見つけたい場合はモジュールを使用しCwd、現在の作業ディレクトリを見つけたい場合は使用します。

score 0 · Accepted Answer

現在実行中のスクリプトへのフルパスを取得するには、PerlMonksの次のコードチャンクのいずれかを使用できます。ファイル::ベース名:

#!/usr/bin/perl -w
use strict;
use File::Spec::Functions qw(rel2abs);
use File::Basename;
print dirname(rel2abs($0));

またはCWDをこの目的に使用できます。CWD の例:

use Cwd;
my $dir = getcwd;

ベースディレクトリに加えて、最初のスクリプトと呼び出したい 2 番目のスクリプトの相対的な配置に関する知識を使用して、フルパスを作成できるはずです。そうすれば、絶対パスを使用して 2 番目のスクリプトを呼び出すことができますが、相対パスをハードコーディングしているだけですか?

3 に答える 3