use
strict;
use
warnings;
use
File::Object;
use
Test::NoWarnings;
# Test.
SKIP: {
if
(
$PERL_VERSION
lt v5.8.0) {
skip
'Perl version lesser then 5.8.0.'
, 1;
}
Test::Pod::pod_file_ok(File::Object->new->up(2)->file(
'Print'
,
'Item.pm'
)->s);
};