1use Test::More; 2BEGIN 3{ 4 eval "use Test::Pod"; 5 if ($@) { 6 plan skip_all => "Test::Pod required for testing POD"; 7 eval "sub all_pod_files_ok {}"; 8 eval "sub all_pod_files {}"; 9 } 10} 11all_pod_files_ok(all_pod_files(qw(blib)));