Perl　カレントディレクトリ取得

use File::Basename;
実行ファイルのフルパスが$0に入るので
dirname($0);
で取得できる

Thank you for reading this post, don't forget to subscribe!