NAME
Data::Utilities - General utilities for nested perl data structures.
SYNOPSIS
use Data::Utilities;
my $tree
= {
a1 => {
a1 => '-a11',
a2 => '-a12',
},
a2 => {
a1 => '-a21',
a2 => '-a22',
},
};
my $expected_data
= {
a1 => {
a2 => '-a12',
},
};
my $transformation
= Data::Transformator->new
(
apply_identity_transformation => {
a1 => {
a2 => 1,
},
},
contents => $tree,
name => 'test_transform5',
);
my $transformed_data = $transformation->transform();
use Data::Dumper;
print Dumper($transformed_data);
my $differences = data_comparator($transformed_data, $expected_data);
if ($differences->is_empty())
{
print "$0: extraction ok\n";
}
else
{
print "$0: extraction failed\n";
}
DESCRIPTION
Data::Utilities contains general tools to transform, merge, compare nested perl data structures.
USAGE
There are more documentation comments in Data::Transformator, for the moment I have no time to write better documentation than this. The best way to learn how to use it, is to take a look at the test cases.
The Neurospaces project (http://www.neurospaces.org/) makes heavy use of these utilities. So you can find some examples overthere to, especially in the test framework.
BUGS
Many. I make it work for me, and share the result. I am happy to incorporate fixes for other people. I have little time to support everything.
AUTHOR
Hugo Cornelis
CPAN ID: CORNELIS
Neurospaces Project
hugo.cornelis@gmail.com
http://www.neurospaces.org/
COPYRIGHT
This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself.
The full text of the license can be found in the LICENSE file included with this module.
SEE ALSO
perl(1).