K:\Perl\temp>type bar.pl
use Cwd;
print "Hello World\n";

K:\Perl\temp>pp -o bar.exe bar.pl

K:\Perl\temp>bar.exe
Hello World