C:\test>perl -E"say $^X"
C:\Perl64\bin\perl.exe

##</code><code>##

@echo off
for %%i in (%1) do @echo %%~$PATH:i

##</code><code>##

C:\test>pf perl.exe
C:\Perl64\bin\perl.exe

C:\test>pf msinfo32.exe
C:\Windows\System32\msinfo32.exe

C:\test>pf nmake.exe
c:\Program Files (x86)\Microsoft Visual Studio 9.0\VC\bin\amd64\nmake.exe

C:\test>pf tp.cmd
C:\Perl64\bin\tp.cmd