Audit::DBI::Event - An event as logged by the Audit::DBI module.
Version 1.7.1
use Audit::DBI::Event; my $audit_event = Audit::DBI::Event->new( data => $data, #mandatory ); my $audit_event_id = $audit_event->get_id(); my $information = $audit_event->get_information(); my $diff = $audit_event->get_diff(); my $ipv4_address = $audit_event->get_ipv4_address();
Create a new Audit::DBI::Event object.
my $audit_event = Audit::DBI::Event->new( data => $data, #mandatory );
Note that you should never have to instantiate Audit::DBI::Event objects directly. They are normally created by the Audit::DBI module.
Return the audit event ID.
my $audit_event_id = $audit_event->get_id();
Retrieve the extra information stored, if any.
my $information = $audit_event->get_information();
Retrieve the diff information stored, if any.
my $diff = $audit_event->get_diff();
Return the size in bytes of all the text changes recorded inside the diff information stored for the event.
This method can use two comparison types to calculate the size of the changes inside a diff:
Relative comparison (by default):
In this case, a string change from 'TestABC' to 'TestCDE' is a 0 bytes change (since there is the same number of characters).
my $diff_bytes = $audit_event->get_diff_string_bytes();
Absolute comparison:
In this case, a string change from 'TestABC' to 'TestCDE' is a 6 bytes change (3 characters removed, and 3 added).
my $diff_bytes = $audit_event->get_diff_string_bytes( absolute => 1 );
Note that absolute comparison requires String::Diff to be installed.
Return the IPv4 address associated with the audit event.
my $ipv4_address = $audit_event->get_ipv4_address();
Guillaume Aubert, <aubertg at cpan.org>.
<aubertg at cpan.org>
Please report any bugs or feature requests through the web interface at https://github.com/guillaumeaubert/Audit-DBI/issues/new. I will be notified, and then you'll automatically be notified of progress on your bug as I make changes.
You can find documentation for this module with the perldoc command.
perldoc Audit::DBI::Event
You can also look for information at:
GitHub's request tracker
https://github.com/guillaumeaubert/Audit-DBI/issues
AnnoCPAN: Annotated CPAN documentation
http://annocpan.org/dist/Audit-DBI
CPAN Ratings
http://cpanratings.perl.org/d/Audit-DBI
MetaCPAN
https://metacpan.org/release/Audit-DBI
Thanks to ThinkGeek (http://www.thinkgeek.com/) and its corporate overlords at Geeknet (http://www.geek.net/), for footing the bill while I write code for them!
Copyright 2010-2013 Guillaume Aubert.
This program is free software: you can redistribute it and/or modify it under the terms of the GNU General Public License version 3 as published by the Free Software Foundation.
This program is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for more details.
You should have received a copy of the GNU General Public License along with this program. If not, see http://www.gnu.org/licenses/
To install Audit::DBI, copy and paste the appropriate command in to your terminal.
cpanm
cpanm Audit::DBI
CPAN shell
perl -MCPAN -e shell install Audit::DBI
For more information on module installation, please visit the detailed CPAN module installation guide.