C:\test>subst p: c:\perl\bin

C:\test>p:perl -le" print $^X"
P:\perl.exe