Tree - source-git/perl-File-Temp

Blob History Raw

Packit	a89ea5	`#!perl`
Packit	a89ea5
Packit	a89ea5	`use strict;`
Packit	a89ea5	`use warnings;`
Packit	a89ea5	`use Test::More;`
Packit	a89ea5
Packit	a89ea5	`foreach my $env_skip ( qw(`
Packit	a89ea5	`SKIP_POD_NO404S`
Packit	a89ea5	`AUTOMATED_TESTING`
Packit	a89ea5	`) ){`
Packit	a89ea5	`plan skip_all => "\$ENV{$env_skip} is set, skipping"`
Packit	a89ea5	`if $ENV{$env_skip};`
Packit	a89ea5	`}`
Packit	a89ea5
Packit	a89ea5	`eval "use Test::Pod::No404s";`
Packit	a89ea5	`if ( $@ ) {`
Packit	a89ea5	`plan skip_all => 'Test::Pod::No404s required for testing POD';`
Packit	a89ea5	`}`
Packit	a89ea5	`else {`
Packit	a89ea5	`all_pod_files_ok();`
Packit	a89ea5	`}`