Einfacher wäre es wenn du wie auf Crians Seite gezeigt mit assoc und ftype die Dateiendung .ptk für den Aufruf mit wperl.exe einstellen würdest.

assoc .ptk=Perl-Tk
ftype Perl-Tk="c:\perl\bin\wperl.exe" "%1" %*

MfG. Matze