| Path-Resolver documentation | Contained in the Path-Resolver distribution. |
Path::Resolver::CustomConverter - a one-off converter between any two types using a coderef
version 3.100451
my $converter = Path::Resolver::CustomConverter->new({
input_type => SomeType,
output_type => AnotherType,
converter => sub { ...return an AnotherType value... },
});
my $resolver = Path::Resolver::Resolver::Whatever->new({
converter => $converter,
...
});
my $another = $resolver->entity_at('/foo/bar/baz.txt');
This class lets you produce one-off converters between any two types using an arbitrary hunk of code.
This is the Moose::Meta::TypeConstraint for objects that the converter expects to be handed as input.
This is the Moose::Meta::TypeConstraint for objects that the converter promises to return as output.
This is the coderef that will perform the conversion. It will be called like a method: the first argument will be the converter object, followed by the value to convert.
This method accepts an input value, passes it to the converter coderef, and returns the result.
Ricardo Signes <rjbs@cpan.org>
This software is copyright (c) 2010 by Ricardo Signes.
This is free software; you can redistribute it and/or modify it under the same terms as the Perl 5 programming language system itself.
| Path-Resolver documentation | Contained in the Path-Resolver distribution. |
package Path::Resolver::CustomConverter; BEGIN { $Path::Resolver::CustomConverter::VERSION = '3.100451'; } # ABSTRACT: a one-off converter between any two types using a coderef use Moose; use namespace::autoclean; use MooseX::Types; use MooseX::Types::Moose qw(CodeRef); has [ qw(input_type output_type) ] => ( is => 'ro', isa => class_type('Moose::Meta::TypeConstraint'), required => 1, ); has converter => ( is => 'ro', isa => CodeRef, required => 1, ); sub convert { $_[0]->converter->(@_); } with 'Path::Resolver::Role::Converter'; 1; __END__