c:\>type test\junk.pl
print $^X, "\n", $0;

c:\>perl test\junk.pl
C:\Perl64\bin\perl.exe
test\junk.pl