use Pod::Checker; my $rc = podchecker($filepath, $outputpath, %options); if( $rc > 0 ){ # errors }elsif( $rc < 0 ){ # no pod found }else{ # ok! }