perlで今実行しているファイル名を調べる

実行中のプログラム名(ファイル名)
を参照する特殊変数は?
$0っていう変数で出来るお

#!/usr/bin/perl
print $0,"\n";