1 2 3 4 5 6 7 8
use strict; use warnings; use Test::More; use Test::Pod; my @poddirs = qw( blib script ); all_pod_files_ok( all_pod_files( @poddirs ) );