Select Code to Download

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

<event time='1234' type='this'>
<detail>blah</detail><detail>blahblah</detail>
...
<event time='2234' type='that'>
<detail>weeble</detail><detail>blahblah</detail>
</event>