From Code to Community: Sponsoring The Perl and Raku Conference 2025 Learn more
12345678910111213 #!perluse strict;use warnings;use Test::More tests => 2;use FindBin;use lib "$FindBin::Bin/lib";use_ok('Catalyst::Test', 'TestApp');my $request = request('/action_match/foo?view=NoMatch');ok($request->is_success, 'request ok');
#!perl
use
strict;
warnings;
Test::More
tests
=> 2;
FindBin;
lib
"$FindBin::Bin/lib"
;
use_ok(
'Catalyst::Test'
,
'TestApp'
);
my
$request
= request(
'/action_match/foo?view=NoMatch'
ok(
->is_success,
'request ok'