xt/author/03podcoverage.t

   1 use strict;
   2 use warnings;
   3
   4 use Test::More;
   5
   6 # Ensure a recent version of Test::Pod::Coverage
   7 my $min_tpc = 1.08;
   8 eval "use Test::Pod::Coverage $min_tpc";
   9 plan skip_all => "Test::Pod::Coverage $min_tpc required for testing POD coverage"
  10     if $@;
  11
  12 # Test::Pod::Coverage doesn't require a minimum Pod::Coverage version,
  13 # but older versions don't recognize some common documentation styles
  14 my $min_pc = 0.18;
  15 eval "use Pod::Coverage $min_pc";
  16 plan skip_all => "Pod::Coverage $min_pc required for testing POD coverage"
  17     if $@;
  18
  19 all_pod_coverage_ok();