1use strict; 2use warnings; 3use lib 't/lib'; 4use Test::More tests => 3; 5 6use HTTP::Engine::Middleware; 7 8my $mw = HTTP::Engine::Middleware->new; 9$mw->install( 10 'Foo::Middleware::Bar' => { key => 'value' }, 11 'Foo::Middleware::Baz' 12); 13 14is $mw->middlewares->[0], 'Foo::Middleware::Bar', 'installed middleware is Foo::Middleware::Bar'; 15is $mw->middlewares->[1], 'Foo::Middleware::Baz', 'installed middleware is Foo::Middleware::Baz'; 16 17is $mw->instance_of('Foo::Middleware::Bar')->key, 'value', 'config'; 18