Skip to content
This repository

HTTPS clone URL

Subversion checkout URL

You can clone with HTTPS or Subversion.

Download ZIP
Fetching contributors…

Cannot retrieve contributors at this time

file 12 lines (12 sloc) 0.342 kb
1 2 3 4 5 6 7 8 9 10 11 12
#!perl -w
use strict;
use Test::More;
use ExtUtils::Manifest qw(maniread);
eval "use Test::Pod 1.00;";
plan skip_all => "Test::Pod 1.00 required for testing POD" if $@;
my $manifest = maniread();
my @pod = grep /\.(pm|pl|pod|PL)$/, keys %$manifest;
plan tests => scalar(@pod);
for my $file (@pod) {
  pod_file_ok($file, "pod ok in $file");
}
Something went wrong with that request. Please try again.