view release on metacpan or  search on metacpan

t/lib/MyApp/Data/Manager.pm  view on Meta::CPAN

package MyApp::Data::Manager;
use namespace::autoclean;
use Moose;

extends 'Data::Manager';

use MyApp::Data::Visitor;

has _input => ( is => 'ro', isa => 'HashRef', init_arg => 'input' );

has actions => (
    is      => 'ro',
    isa     => 'HashRef',
    default => sub { +{} },
);

sub apply {
    my ($self) = @_;
    foreach my $scope ( keys %{ $self->verifiers } ) {