Re: [rt.cpan.org #61484] missing results with Win32::EventLog
[email protected] ("Paul Faulstich via RT")
| Newsgroups | perl.libwin32 |
|---|---|
| Message-ID | <[email protected]> |
Tue Sep 21 10:04:50 2010: Request 61484 was acted upon. Transaction: Correspondence added by [email protected] Queue: Win32-EventLog Subject: Re: [rt.cpan.org #61484] missing results with Win32::EventLog Broken in: (no value) Severity: (no value) Owner: Nobody Requestors: [email protected] Status: open Ticket <URL: https://rt.cpan.org/Ticket/Display.html?id=61484 > Thanks! I was working off the example in the O'Reilly perl sysadm book http://oreilly.com/catalog/perlsysadm/chapter/ch09.html Good catching the bug. Worth noting in the module documentation, since others may miss it. Thanks for your help. I will use your approach of manually counting backwards through the entries. Paul 2010/9/21 Olivier 'dolmen' Mengué via RT <[email protected]>: > <URL: https://rt.cpan.org/Ticket/Display.html?id=61484 > > > My solution above was a workaround. > > However there is a real bug in the Win32::EventLog code. > The lpEvtLog->CurEntryNum member is incorrectly incremented in > ReadEventLog. It should be incremented by just 1 instead of LogBuf->Length. > > See > http://code.google.com/p/libwin32/source/browse/trunk/Win32-EventLog/EventLog.xs#351 > > -- > Olivier Mengué - http://search.cpan.org/~dolmen/ http://github.com/dolmen/ >