use strict;
use warnings;
use FindBin;
use lib "$FindBin::Bin/../lib";
our $iters;
BEGIN { $iters = $ENV{CAT_BENCH_ITERS} || 1; }
use Test::More tests => 2*$iters;
use Catalyst::Test 'TestApp';
if ( $ENV{CAT_BENCHMARK} ) {
    require Benchmark;
    Benchmark::timethis( $iters, \&run_tests );
}
else {
    for ( 1 .. $iters ) {
        run_tests();
    }
}
sub run_tests {
    ok( my $response = request('http://localhost/action/die_in_end'), 'Request' );
    ok( !$response->is_success, 'generates a 500 error' );
}