[% startperl %]
use strict;
use warnings;
-use Test::More tests => 2;
+use Test::More;
-BEGIN { use_ok 'Catalyst::Test', '[% name %]' }
-my $req = request('/');
-ok( $req->is_success, "Request succeeds");
+use Catalyst::Test '[% name %]';
+
+ok( request('/')->is_success, 'Request should succeed' );
+
+done_testing();