Blob

Date:
Message:
Start of a library set for accessing data on ircnow network servers Current version connects to an botnow database and the parses the znc log file. It can create a database table for the znc log and read the last line from the database table. The test application parseznc.pl does a simple dump of the parsed data file. It can skip the records from the dump based on a passed record. Working to abstract some of the code into a IRCNOW::ParseLog and IRCNOW::Database library to make future log parsing tasks easier.
Actions:
History | Blame | Raw File
1 #!/usr/bin/perl

2 #

4 use strict;

5 use warnings;

7 use lib qw(./lib);

8 use IRCNOW::ParseLog::Znc;

10 my $znclog = IRCNOW::ParseLog::Znc->new(

11 	database=>'/var/www/botnow/botnow.db',

12 	zncLog=>'/home/znc/home/znc/.znc/moddata/adminlog/znc.log',

13 );

15 use Data::Dumper;

17 my $lastRecord=$znclog->dbLastRecord() || [];

19 print Dumper($znclog->parseLog($lastRecord->[1],$lastRecord->[3],$lastRecord->[4]));

21 #$znclog->createTable();