Data::Visitor::Callback - A Data::Visitor with callbacks.
version 0.30
use Data::Visitor::Callback; my $v = Data::Visitor::Callback->new( # you can provide callbacks # $_ will contain the visited value value => sub { ... }, array => sub { ... }, # you can also delegate to method names # this specific example will force traversal on objects, by using the # 'visit_ref' callback which normally traverse unblessed references object => "visit_ref", # you can also use class names as callbacks # the callback will be invoked on all objects which inherit that class 'Some::Class' => sub { my ( $v, $obj ) = @_; # $v is the visitor ... }, ); $v->visit( $some_perl_value );
This is a Data::Visitor subclass that lets you invoke callbacks instead of needing to subclass yourself.
Construct a new visitor.
The options supported are:
When this is true (off by default) the return values from the callbacks are ignored, thus disabling the fmapping behavior as documented in Data::Visitor.
This is useful when you want to modify $_ directly
Whether ot not to visit the "tied" in perlfunc of a tied structure instead of pretending the structure is just a normal one.
See "visit_tied" in Data::Visitor.
Use these keys for the corresponding callbacks.
The callback is in the form:
sub { my ( $visitor, $data ) = @_; # or you can use $_, it's aliased return $data; # or modified data }
Within the callback $_ is aliased to the data, and this is also passed in the parameter list.
Any method can also be used as a callback:
object => "visit_ref", # visit objects anyway
Called for all values
Called for non objects, non container (hash, array, glob or scalar ref) values.
Called after value, for references to regexes, globs and code.
value
Called after value for non references.
Called for blessed objects.
Since "visit_object" in Data::Visitor will not recurse downwards unless you delegate to visit_ref, you can specify visit_ref as the callback for object in order to enter objects.
visit_ref
object
It is reccomended that you specify the classes (or base classes) you want though, instead of just visiting any object forcefully.
You can use any class name as a callback. This is colled only after the object callback.
If the object isa the class then the callback will fire.
isa
These callbacks are called from least derived to most derived by comparing the classes' isa at construction time.
Called for every object that did not have a class callback.
The last callback called for objects, useful if you want to post process the output of any class callbacks.
Called for array references.
Called for hash references.
Called for glob references.
Called for scalar references.
Called on the return value of tied for all tied containers. Also passes in the variable as the second argument.
tied
Called for a reference value encountered a second time.
Passes in the result mapping as the second argument.
Yuval Kogman <nothingmuch@woobling.org>
Marcel Grünauer <marcel@cpan.org>
This software is copyright (c) 2013 by Yuval Kogman.
This is free software; you can redistribute it and/or modify it under the same terms as the Perl 5 programming language system itself.
To install Data::Visitor, copy and paste the appropriate command in to your terminal.
cpanm
cpanm Data::Visitor
CPAN shell
perl -MCPAN -e shell install Data::Visitor
For more information on module installation, please visit the detailed CPAN module installation guide.