Test::Mojoでビルドされたアプリにブラウザでアクセスする ref: http://qiita.com/uchiko/items/8bef175a43889b29b7da

base.t

use strict;
use warnings;

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

use t::Util;

my $t = Test::Mojo->new('MyApp');

# ここでサーバが立ち上がり、ブロックされる
t::Util::run_server($t->app);

$t->get_ok('/')->status_is(200)->content_like(qr/Mojolicious/i);

done_testing;

file2.txt

$ prove -l t/base.t
t/basic.t .. Accepting connections at http://*:50277/

Util.pm

package t::Util;
use strict;
use warnings;
use utf8;
use Net::EmptyPort qw(empty_port);
use Mojo::Server::Daemon;

sub run_server {
    my ($app) = @_;
    my $port = empty_port();
    warn "Accepting connections at http://*:$port/\n";
    my $daemon = Mojo::Server::Daemon->new(listen => ['http://*:'.$port]);
    $daemon->app($app);
    $daemon->run;
}

1;