use strict; use LogFile::Base; use LogFile::Apache; use LogFile::NCSA; my $log = new Logfile::NCSA File => 'C:\\nc030805.log', Group => [qw(Host User Date )]; $log->report(Group => 'Host User Date');