Help for this page

Select Code to Download


  1. or download this
    system ("lockfile -2 -r 5 $base_dir/.lock" ) == 0 or diehtml("Lock
error: ", $? >> 8, "\n" ); # TODO stop stderr of system
  2. or download this
    #!/usr/bin/perl -wT

...
# resource limits
$CGI:DISABLE_UPLOADS = 1;
$CGI::POST_MAX = 1024;