| File: | /usr/bin/core_perl/prove |
| Coverage: | 90.0% |
| line | stmt | bran | cond | sub | time | code |
|---|---|---|---|---|---|---|
| 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 | ||||||