File Coverage

File:/usr/local/bin/prove
Coverage:94.4%

linestmtbrancondsubpodtimecode
1#!/usr/bin/perl -w
2
3
1
42211
eval 'exec /usr/bin/perl -w -S $0 ${1+"$@"}'
4    if 0; # not running under some shell
5
6
1
1
1
1830
1
20
use strict;
7
1
1
1
2
1
12
use warnings;
8
1
1
1
188
20103
530
use App::Prove;
9
10
1
5
my $app = App::Prove->new;
11
1
57
$app->process_args(@ARGV);
12
1
1402
exit( $app->run ? 0 : 1 );
13