view tests/pod.t @ 206:ea4f503f58cc

Released 2.6
author Steve Kemp <steve@steve.org.uk>
date Mon, 14 Apr 2008 19:12:10 +0100
parents bc8961a81af6
children
line wrap: on
line source

#!/usr/bin/perl -w

#
#  Test that the POD we use in our modules is valid.
#


use strict;
use Test::More;
eval "use Test::Pod 1.00";
plan skip_all => "Test::Pod 1.00 required for testing POD" if $@;

#
#  Run the test(s).
#
my @poddirs = qw( bin );
all_pod_files_ok( all_pod_files( @poddirs ) );