view release on metacpan or  search on metacpan

lib/Fancy/Middleware.pm  view on Meta::CPAN

    use POEx::Types::PSGIServer(':all');
    use MooseX::Types::Moose(':all');


    has app => (is => 'ro', isa => CodeRef, required => 1);


    has response => (is => 'ro', isa => PSGIResponse, writer => 'set_response');

    
    has env => (is => 'ro', isa => HashRef, writer => 'set_env');


    method wrap(ClassName $class: CodeRef $app, @args)
    {
        my $self = $class->new(app => $app, @args);
        return $self->to_app;
    }


    method call(HashRef $env)