NAME

Win32::FirewallParser - Microsoft Windows XP SP2 Firewall Log Parser

SYNOPSIS

use Win32::FirewallParser;

my $obj = new Win32::FirewallParser;

$obj->setHandler(\&printLine);
$obj->parseFile();

sub printLine
{
     my $data = shift;

     for my $key (keys %{$data})
     {
          printf "%10s => %s\n", $key, $data->{$key};
     }

     print "\n";
}

DESCRIPTION

Module for parsing Microsoft Windows XP SP2 Firewall log files.

CONSTRUCTOR

new ()

No constructor parameters required.

METHODS

setHandler ( HANDLER )

This method sets a handler in which a subroutine can be called per line in the log file.

The handler subroutine takes one parameter, a hash reference, which contains the data of the current line that the parser is up to.

parseFile ( [FILENAME] )

Start parsing a file. If no parameter is specified, the default log file path using the environmental variable SystemRoot, %SystemRoot%/pfirewall.log, will be used.

AUTHOR

Luke Triantafyllidis <triple@aeoth.net>

COPYRIGHT

Copyright (C) 2005 Luke Triantafyllidis

This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself.

CHANGELOG

2005-11-07 0.01 Beta release.