#!/usr/bin/env perl -w
# $Id: tpod.t 22 2010-09-23 23:04:07Z stro $
use strict;
use warnings;
eval 'use Test::More';
if ($@) {
eval 'use Test; plan tests => 1;';
skip('Test::More is required for testing POD',);
} else {
require Test::More;
eval 'use Test::Pod 1.00';
plan (skip_all => 'Test::Pod is required for testing POD') if $@;
my @poddirs = qw( blib script );
all_pod_files_ok( all_pod_files( @poddirs ) );
}