use strict; use warnings; [% IF long_type == 'Controller' %][% IF mech %]use Test::More; eval "use Test::WWW::Mechanize::Catalyst '[% name %]'"; if ($@) { plan skip_all => 'Test::WWW::Mechanize::Catalyst required'; exit 0; } ok( my $mech = Test::WWW::Mechanize::Catalyst->new, 'Created mech object' ); $mech->get_ok( 'http://localhost[% uri %]' ); [% ELSE %]use Test::More tests => 3; BEGIN { use_ok 'Catalyst::Test', '[% app %]' } BEGIN { use_ok '[% class %]' } ok( request('[% uri %]')->is_success, 'Request should succeed' ); [% END %] [% ELSE %]use Test::More tests => 1; BEGIN { use_ok '[% class %]' } [% END %] done_testing(); 1;