File Coverage

blib/lib/Test/CompanionClasses.pm
Criterion Covered Total %
statement 22 22 100.0
branch 1 2 50.0
condition n/a
subroutine 8 8 100.0
pod 1 1 100.0
total 32 33 96.9


line stmt bran cond sub pod time code
1 1     1   540 use 5.008;
  1         4  
  1         37  
2 1     1   6 use strict;
  1         1  
  1         23  
3 1     1   4 use warnings;
  1         1  
  1         41  
4              
5             package Test::CompanionClasses;
6             BEGIN {
7 1     1   13 $Test::CompanionClasses::VERSION = '1.101370';
8             }
9             # ABSTRACT: Run tests defined in companion classes
10 1     1   487 use Test::CompanionClasses::Engine;
  1         3  
  1         13  
11 1     1   1291 use Getopt::Long;
  1         14923  
  1         7  
12 1     1   174 use Exporter qw(import);
  1         2  
  1         107  
13             our @EXPORT = ('run_tests');
14              
15             sub run_tests {
16 1     1 1 8 my $exact;
17 1 50       11 GetOptions(exact => \$exact)
18             or die "usage: $0 [ --exact ] filter...\n";
19 1         211 Test::CompanionClasses::Engine->new->run_tests(
20             exact => $exact,
21             filter => [@main::ARGV],
22              
23             # inherited => [ $inherited_spec ],
24             );
25             }
26             1;
27              
28              
29             __END__