use Test::More;
eval "use Test::Pod::Coverage 1.00";
plan skip_all => "Test::Pod::Coverage 1.00 required for testing POD coverage" if $@;
all_pod_coverage_ok( { also_private => [ qr/^[A-Z_]+$/, qw/^(socket_|select_)/, qr/^(start|shutdown)$/, qr/^(AF_|PF_)/ ] } );