The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.
#!perl
use strict;
use Test::More;

SKIP: {
  # Ensure a recent version of Test::Pod
  my $min_tp = 1.22;
  eval "use Test::Pod $min_tp";
  skip "POD test: Test::Pod $min_tp required",1 if $@;
  my @pod_files=all_pod_files();
  map {pod_file_ok($_)} @pod_files;
}

SKIP: {
  # Ensure a version of Test::Pod::Content
  eval "use Test::Pod::Content";
  skip 'version number in POD: Test::Pod::Content required',1 if $@;
  use Module::Build;
  my $builder=Module::Build->current;
  my $module_pm=File::Spec->catdir('blib',$builder->dist_version_from);
  my $correct_version=$builder->dist_version;
  pod_section_like($module_pm,'VERSION',qr/Version $correct_version$/,'version number in POD');
  # also do it for V0
  use File::Basename;
  my($name,$path)=fileparse($module_pm,qw(.pm));
  $module_pm=File::Spec->catfile($path,$name,'V0.pm');
  pod_section_like($module_pm,'VERSION',qr/Version $correct_version$/,'version number in V0 POD');
}

done_testing();