Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with
or
.
Download ZIP
Fetching contributors…

Cannot retrieve contributors at this time

13 lines (12 sloc) 0.342 kB
#!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");
}
Jump to Line
Something went wrong with that request. Please try again.