Help for this page

Select Code to Download

Select or download this


$logfile = "tempfile.tmp";
...
    close (LOGFILE);
    rename $logfile, $logfileOrig if $linenumber;
}

Select or download this

       print OUTFILE "<FORM NAME=\"FORM\" METHOD=\"POST\" ACTION=\"del
+ete.cgi\">";
       print OUTFILE "<input type='hidden' name='linenumber' value='$l
+inenumber'>";
       print OUTFILE "<INPUT TYPE=SUBMIT VALUE=\"DELETE THIS RECORD\">
+</FORM><br>\n";