Ark
view release on metacpan or search on metacpan
t/003_action_dispatcher.t view on Meta::CPAN
use Ark::Test 'TestApp';
{
my $res = request( GET => '/order' );
ok($res->is_success, 'request success');
is($res->content, 'begin1auto1action1end1', 'action order ok');
}
{
my $res = request( GET => '/order/cascade' );
ok($res->is_success, 'request success');
is($res->content, 'begin2auto1auto2action2end2', 'cascade action order ok');
}
{
my $res = request( GET => '/stopauto' );
ok($res->is_success, 'request success');
is($res->content, 'begin1auto1end1', 'stop auto ok');
}
done_testing;
( run in 1.154 second using v1.01-cache-2.11-cpan-49f99fa48dc )