File Coverage

t/pod-coverage.t
Criterion Covered Total %
statement 13 20 65.0
branch 1 6 16.6
condition n/a
subroutine 4 4 100.0
pod n/a
total 18 30 60.0


line stmt bran cond sub pod time code
1             #!perl -T
2 1     1   15 use 5.006;
  1         2  
3 1     1   4 use strict;
  1         1  
  1         16  
4 1     1   4 use warnings;
  1         1  
  1         20  
5 1     1   339 use Test::More;
  1         42347  
  1         6  
6            
7 1 50       64 unless ( $ENV{RELEASE_TESTING} ) {
8 1         3 plan( skip_all => "Author tests not required for installation" );
9             }
10            
11             # Ensure a recent version of Test::Pod::Coverage
12 0         0 my $min_tpc = 1.08;
13 0         0 eval "use Test::Pod::Coverage $min_tpc";
14 0 0       0 plan skip_all => "Test::Pod::Coverage $min_tpc required for testing POD coverage"
15             if $@;
16            
17             # Test::Pod::Coverage doesn't require a minimum Pod::Coverage version,
18             # but older versions don't recognize some common documentation styles
19 0         0 my $min_pc = 0.18;
20 0         0 eval "use Pod::Coverage $min_pc";
21 0 0       0 plan skip_all => "Pod::Coverage $min_pc required for testing POD coverage"
22             if $@;
23            
24 0         0 all_pod_coverage_ok();