package main;

use strict;
use warnings;

use Test::More 0.88;

BEGIN {
    eval {
	require Test::Pod::Coverage;
	Test::Pod::Coverage->VERSION(1.00);
	Test::Pod::Coverage->import();
	1;
    } or do {
	plan skip_all => 'Test::Pod::Coverage 1.00 or greater required.';
	exit;
    };
}

pod_coverage_ok (
    'Win32::Process::Info',
    {
	also_private => [ qr{^[[:upper:]\d_]+$}, ],
	coverage_class => 'Pod::Coverage::CountParents'
    }
);

SKIP: {

    eval {
	require Win32::Process::Info::NT;
	1;
    } or skip 'Can not load Win32::Process::Info::NT', 1;

    pod_coverage_ok(
	'Win32::Process::Info::NT',
	{
	    coverage_class => 'Pod::Coverage::CountParents',
	},
    );

}

SKIP: {

    eval {
	require Win32::Process::Info::PT;
	1;
    } or skip 'Can not load Win32::Process::Info::PT', 1;

    pod_coverage_ok(
	'Win32::Process::Info::PT',
	{
	    coverage_class => 'Pod::Coverage::CountParents',
	},
    );

}

SKIP: {

    eval {
	require Win32::Process::Info::WMI;
	1;
    } or skip 'Can not load Win32::Process::Info::WMI', 1;

    pod_coverage_ok(
	'Win32::Process::Info::WMI',
	{
	    coverage_class => 'Pod::Coverage::CountParents',
	},
    );

}

done_testing;

1;