<!-- Hide from JavaScript-Impaired Browsers
// Script by Riverdrift 2003
function makeit(form){
var txt ='#!/usr/bin/perl\n'
+'print "Content-type: text/html\\n\\n";\n';
if(document.hitt.n1.value != "")          
txt+='open(HITS,"'+document.hitt.n1.value+'.txt");\n'
+'$hits = <HITS>;\nclose(HITS);\n++$hits;\n'
+'open(HITS,">'+document.hitt.n1.value+'.txt");\n';
if(document.hitt.n2.value != "")          
txt+='print HITS $hits;\nclose(HITS);\n'
+'print "<font color=\\"'+document.hitt.n2.value+'\\"';
if(document.hitt.n3.value != "")          
txt+=' size=\\"'+document.hitt.n3.value+'\\">$hits'
+'</font>";\nexit;';
document.hitt.cnt.value=txt;
}
function doit() {
temp=document.hitt.cnt.value;
}
function copy()  {
document.hitt.cnt.focus();
document.hitt.cnt.select();
}
// End Hiding -->
