Select Code to Download

 --THIS IS THE POSTIT.PL----

my $q = new CGI;
...
flock (LOG, 2) || Error ('lock', 'file');
print LOG $string, "\n";
close LOG;

use strict; 

...
}
 
close LOG;