File Coverage

File:/usr/bin/core_perl/prove
Coverage:90.0%

linestmtbrancondsubtimecode
1#!/usr/bin/perl
2
1
139773
    eval 'exec /usr/bin/perl -S $0 ${1+"$@"}'
3        if $running_under_some_shell;
4#!/usr/bin/perl -w
5
6
1
1
1
25949
4
59
use strict;
7
1
1
1
9
2
43
use warnings;
8
1
1
1
477
52968
1219
use App::Prove;
9
10
1
10
my $app = App::Prove->new;
11
1
97
$app->process_args(@ARGV);
12
1
2326
exit( $app->run ? 0 : 1 );
13