The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.
use strict;
use warnings;

use lib 't/lib';

use Test::More;
use Test::Mojo;

use MyTest::App;
my $app = MyTest::App->new;

my $t = Test::Mojo->new($app);
$t->get_ok('/')
  ->status_is(200)
  ->text_is( p => 'Hello World' );

done_testing;