NAME
Audit::DBI::Utils - Utilities for the Audit::DBI distribution.
VERSION
Version 1.4.1
SYNOPSIS
use Audit::DBI::Utils;
my $ip_address = Audit::DBI::Utils::integer_to_ipv4( $integer );
my $integer = Audit::DBI::Utils::ipv4_to_integer( $ip_address );
my $differences = Audit::DBI::Utils::diff_structures(
$data_structure_1,
$data_structure_2,
comparison_function => sub { my ( $a, $b ) = @_; $a eq $b; }, #optional
);
FUNCTIONS
integer_to_ipv4()
Convert a 32-bits integer representing an IP address into its IPv4 form.
my $ip_address = Audit::DBI::Utils::integer_to_ipv4( $integer );
ipv4_to_integer()
Convert an IPv4 address to a 32-bit integer.
my $integer = Audit::DBI::Utils::ipv4_to_integer( $ip_address );
diff_structures()
Return the differences between the two data structures passed as parameter.
If provided, the "equality_function" parameter provides a coderef to an alternative equality function for comparison of the scalars in the leaf nodes of the data structures. By default, 'eq' is used, but by providing a function that takes two parameters, diff_structures will perform any equality test.
my $differences = Audit::DBI::Utils::diff_structures(
$data_structure_1,
$data_structure_2,
comparison_function => sub { my ( $a, $b ) = @_; $a eq $b; }, #optional
);
AUTHOR
Guillaume Aubert, <aubertg at cpan.org>
.
BUGS
Please report any bugs or feature requests to bug-audit-dbi at rt.cpan.org
, or through the web interface at http://rt.cpan.org/NoAuth/ReportBug.html?Queue=Audit-DBI. I will be notified, and then you'll automatically be notified of progress on your bug as I make changes.
SUPPORT
You can find documentation for this module with the perldoc command.
perldoc Audit::DBI::Utils
You can also look for information at:
RT: CPAN's request tracker
AnnoCPAN: Annotated CPAN documentation
CPAN Ratings
Search CPAN
ACKNOWLEDGEMENTS
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 & LICENSE
Copyright 2012 Guillaume Aubert.
This program is free software; you can redistribute it and/or modify it under the terms of the Artistic License.
See http://dev.perl.org/licenses/ for more information.