Blame xt/release/pod-linkcheck.t
|
Packit |
92cec9 |
#!perl
|
|
Packit |
92cec9 |
|
|
Packit |
92cec9 |
use strict;
|
|
Packit |
92cec9 |
use warnings;
|
|
Packit |
92cec9 |
use Test::More;
|
|
Packit |
92cec9 |
|
|
Packit |
92cec9 |
foreach my $env_skip ( qw(
|
|
Packit |
92cec9 |
SKIP_POD_LINKCHECK
|
|
Packit |
92cec9 |
) ){
|
|
Packit |
92cec9 |
plan skip_all => "\$ENV{$env_skip} is set, skipping"
|
|
Packit |
92cec9 |
if $ENV{$env_skip};
|
|
Packit |
92cec9 |
}
|
|
Packit |
92cec9 |
|
|
Packit |
92cec9 |
eval "use Test::Pod::LinkCheck";
|
|
Packit |
92cec9 |
if ( $@ ) {
|
|
Packit |
92cec9 |
plan skip_all => 'Test::Pod::LinkCheck required for testing POD';
|
|
Packit |
92cec9 |
}
|
|
Packit |
92cec9 |
else {
|
|
Packit |
92cec9 |
Test::Pod::LinkCheck->new->all_pod_ok;
|
|
Packit |
92cec9 |
}
|