スクリプトを実行している perl の実行パスを調べる変数 print $0; だと, スクリプト名になってしまうので print $^X; # $ + 制御文字 0x18 とします。 例: foo.pl #!/usr/bin/perl print “script name: $0\n”; print “perl: $^X\n”; 実行コマンド: ./foo.pl 結果: script name: ./foo.pl perl: /usr/bin/perl