Blame t/98_pod.t

Packit 549706
#!/usr/bin/perl
Packit 549706
Packit 549706
# Test that the syntax of our POD documentation is valid
Packit 549706
Packit 549706
use strict;
Packit 549706
BEGIN {
Packit 549706
	$|  = 1;
Packit 549706
	$^W = 1;
Packit 549706
}
Packit 549706
Packit 549706
my @MODULES = (
Packit 549706
	'Pod::Simple 3.07',
Packit 549706
	'Test::Pod 1.26',
Packit 549706
);
Packit 549706
Packit 549706
# Don't run tests for installs
Packit 549706
use Test::More;
Packit 549706
unless ( $ENV{AUTOMATED_TESTING} or $ENV{RELEASE_TESTING} ) {
Packit 549706
	plan( skip_all => "Author tests not required for installation" );
Packit 549706
}
Packit 549706
Packit 549706
# Load the testing modules
Packit 549706
foreach my $MODULE ( @MODULES ) {
Packit 549706
	eval "use $MODULE";
Packit 549706
	if ( $@ ) {
Packit 549706
		$ENV{RELEASE_TESTING}
Packit 549706
		? die( "Failed to load required release-testing module $MODULE" )
Packit 549706
		: plan( skip_all => "$MODULE not available for testing" );
Packit 549706
	}
Packit 549706
}
Packit 549706
Packit 549706
all_pod_files_ok();