open (LOGFILE,">>$logfn");
print LOGFILE, $eventinfo;
close (LOGFILE);