It truly is horrid code. No CGI.pm, no strict, no warnings. My guess is this will be a nightmare to hack.

BTW, here's that locking sub lifted from the freeware version. Yikes!

sub Lock {
 local ($lockname) = @_;
 local ($endtime);
 $endtime = 15;
 $endtime = time + $endtime;
 while (-e $lockname && time < $endtime) {
 open (LOCKFILE, ">$lockname");
}
[download]