perl-5.22.1
$ARGV

Contains the name of the current file when reading from <>.

<> から読込みを行なっているとき、その時点のファイル名を示します。