Select Code to Download

#!perl 
$program = "c:\\progdir\\bin\\proggie.exe"; 
...
} 
close (LF); 
close (PRG);

#!perl 
use strict; # ALWAYS! (Why? Helps catch typos before run time... among
+ other things)
...
} 
close(LF) or die $!; 
close(PRG) or die $!;

C:\>perl -we "$i=0;$stop=time +2;while(1){print $i++, qq!\n!; last if 
+time > $stop}"