スクリプトパスの取得
FindBinモジュールで取得できます。
use FindBin; print $FindBin::Bin, "\n";あるいは、
use FindBin qw($Bin); print $Bin, "\n";libモジュールと併用することで、スクリプトのあるディレクトリをスクリプト検索パスに追加することができます。
use FindBin qw($Bin); use lib "$Bin";
use FindBin; print $FindBin::Bin, "\n";あるいは、
use FindBin qw($Bin); print $Bin, "\n";libモジュールと併用することで、スクリプトのあるディレクトリをスクリプト検索パスに追加することができます。
use FindBin qw($Bin); use lib "$Bin";