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

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

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