Help for this page

Select Code to Download


  1. or download this
    if ($cgi->param('CHECKPOINT')) {
        local *STATE;
    ...
        $cgi->save(*STATE);
        close STATE;
      }
    
  2. or download this
      my $cgi;
      if ($ENV{'CHECKPOINT'}) {
    ...
      } else {
        $cgi = CGI->new();
      }
    
  3. or download this
      CHECKPOINT=1 perl -d MyScript.cgi