Select Code to Download

#!/usr/bin/perl

...
use Getopt::Std;

printf STDERR "%s %s Hello World!\n", scalar localtime;

 
443 stream tcp nowait portal /portal/bin/testportal.pl

# pp --version
PAR Packager, version 1.008 (PAR version 1.002)
#pp -o testportal testportal.pl