try to fix error-on-first-report

git-svn-id: svn://10.0.0.236/trunk@109345 18797224-902f-48f8-a5cc-f745e15eee43
This commit is contained in:
mcafee%netscape.com 2001-11-30 07:57:19 +00:00
parent 6d4c956f3f
commit 3b00003c68

View File

@ -39,9 +39,14 @@ die "No 'value' parameter supplied"
die "No 'data' parameter supplied"
unless $data;
# If file doesn't exist, try creating empty file.
unless (-f "db/$tbox") {
open(FILE, "> db/$tbox") || die "Can't create new file db/$tbox: $!";
}
# record data
open(FILE, ">> db/$tbox") ||
die "Can't open $tbox: $!";
die "Can't open db/$tbox: $!";
print FILE "$time\t$value\t$data\t$ip\t$tbox\t$ua\n";
close(FILE);