# $Id: pod-coverage.t,v 1.1 2007/08/14 16:42:21 drhyde Exp $ use strict; $^W=1; use Test::More; eval "use Test::Pod::Coverage 1.00"; plan skip_all => "Test::Pod::Coverage 1.00 required for testing POD coverage" if $@; # Some anonymous functions are showing up as 'BEGIN' all_pod_coverage_ok( { trustme => [ qr/^BEGIN$/ ] } );