>assoc .pl=PerlProgram
>ftype PerlProgram="Path/to/perl.exe" "%1" %*