perl -we"$a=1;$a=${a}.pl;print $a"
Unquoted string "pl" may clash with future reserved word at -e line 1.