I would improve MyEventLog for Win32::EventLog with some read-only Win32::TieRegistry stuff and that article referenced by NetWallah to re-turn a Category object, or maybe a http://search.cpan.org/perldoc/Scalar::Util#dualvar , or probably just a string :)