print "This is a test\n";

##</code><code>##

assoc .pl
.pl=Perl_program_file

##</code><code>##

ftype Perl_program_file
Perl_program_file="\strawberry\perl\bin\perl.exe" "%1" %*

##</code><code>##

test

##</code><code>##

Windows cannot access the specified device, path or file.
You may not have the appropriate permissions to access them.

##</code><code>##

\strawberry\perl\bin\perl test.pl