
Data::Trans - Simple data transformer

use Data::Trans;
my $tr = Data::Trans->new({
array => sub {
my ($tr, $data) = @_;
[ map { $_ * 2 } @$data ]
}
});
$tr->trans([0..9]); # [ 0, 2, 4, 6, 8, 10, 12, 14, 16, 18 ]

version 0.01


Constructor. The each keys are callback names. The each value is callback sub routine.

Toru Yamaguchi, <zigorou@cpan.org>

Please report any bugs or feature requests to bug-data-trans@rt.cpan.org, or through the web interface at http://rt.cpan.org. I will be notified, and then you'll automatically be notified of progress on your bug as I make changes.

Copyright 2008 Toru Yamaguchi, All Rights Reserved.
This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself.