Here is part of code that responsible(supposedly)for database works expiration, how to configure it that it work constantly?(not expired)

<form name=\"form3\" action=\"$cgilocation\" method=post>
Enter your code:<input name=\"box1\" type=text size=15>
<input name=\"cgifunction\" type=hidden value=\"cache\">
<input type=submit value=\"submit registration\">
</form>
";
if($num<0) {foreach (@parse) {print (chr($_))};$iCache=1;exit;}


} else {
    @parse=(84,104,101,114,101,32,105,115,32,97,32,112,114,111,98,108,
+101,109,32);
    push(@parse,119,105,116,104,32,116,104,101,32,114,101,103,105,115,
+116,114,97,116,105,111,110,32,99,111,100,101);
    foreach (@parse) {print (chr($_))};
    exit;
};
};
    print "<script>document.cookie=\"admin=$password\"</script>\n";
    print "

";
@fields=();
@types=();
open(FIELDS,"<$fieldnames") or &error("Could not open $fieldnames");
@fieldsData=<FIELDS>;
close FIELDS;
$usemulti=0;
foreach (@fieldsData) {
    ($field,$type)=split(/::/);
    push(@fields,"$field\n");
    push(@types,"$type");
 $usemulti=1 if $type=~/upload/;
};
shift(@fields);
shift(@types);
local $tmp=eval("\$k"."ey/307");
local $tmp2=eval("\$n"."um");
if ($tmp2>0) {if ($tmp2 != int(30-((time()-($b/307))/86400))) {$tmp=1.
+25}};
if ($tmp != int($tmp)) {
  @parse=(84,104,101,114,101,32,105,115,32,97,32,112,114,111,98,108,10
+1,109,32);
  push(@parse,119,105,116,104,32,116,104,101,32,114,101,103,105,115,11
+6,114,97,116,105,111,110,32,99,111,100,101);
  foreach (@parse) {print (chr($_))};
  exit;
};
if ($num>30) {die "Invalid Date function"};
print "
[download]

20040414 Edit by Corion: Added formatting. The code seems to be cut off here...