Condition Coverage

blib/lib/Pod/Parser.pm
Criterion Covered Total %
condition 0 99 0.0


and 3 conditions

line !l l&&!r l&&r condition
755 0 0 0 defined $expand_seq and $expand_seq eq "interior_sequence"
807 0 0 0 $ldelim eq "<" and /\A(.*?)(>)/s
862 0 0 0 ref $errorsub and &{$errorsub;}($errmsg)
0 0 0 defined $errorsub and $self->$errorsub($errmsg)
956 0 0 0 defined $text and length $text
997 0 0 0 $Pod::Parser::myData{'_WHITESPACE'} and $Pod::Parser::myOpts{'-warnings'}
0 0 0 $text =~ /^\s+/ && ($Pod::Parser::myData{'_PREVIOUS'} || '') eq 'verbatim'
0 0 0 $Pod::Parser::myData{'_WHITESPACE'} and $Pod::Parser::myOpts{'-warnings'} and not $text =~ /^\s+/ && ($Pod::Parser::myData{'_PREVIOUS'} || '') eq 'verbatim'
1003 0 0 0 ref $errorsub and &{$errorsub;}($errmsg)
0 0 0 defined $errorsub and $self->$errorsub($errmsg)
1091 0 0 0 defined $textline and length $textline
1093 0 0 0 not length $paragraph and $textline =~ /^==/
1106 0 0 0 $textline =~ /^[^\S\r\n]*[\r\n]*$/ and length $paragraph
1184 0 0 0 defined $infile and ref $infile
0 0 0 defined $infile && length $infile
1216 0 0 0 defined $outfile && length $outfile

or 2 conditions

line l !l condition
742 0 0 $opts{'-expand_seq'} || undef
743 0 0 $opts{'-expand_text'} || undef
744 0 0 $opts{'-expand_ptree'} || undef
921 0 0 $Pod::Parser::myData{'_PARSEOPTS'} ||= {}
1072 0 0 $Pod::Parser::myData{'_PARSEOPTS'} ||= {}
1197 0 0 $infile ||= "-"
1244 0 0 $outfile ||= "-"
1375 0 0 $Pod::Parser::myData{'_PARSEOPTS'} ||= {}
1497 0 0 $_[0]{'_TOP_STREAM'} || undef

or 3 conditions

line l !l&&r !l&&!r condition
450 0 0 0 ref $this || $this
807 0 0 0 $ldelim eq "<" and /\A(.*?)(>)/s or /\A(.*?)(\s+$rdelim)/s
862 0 0 0 ref $errorsub and &{$errorsub;}($errmsg) or defined $errorsub and $self->$errorsub($errmsg)
1003 0 0 0 ref $errorsub and &{$errorsub;}($errmsg) or defined $errorsub and $self->$errorsub($errmsg)
1086 0 0 0 /^(?:GLOB|FileHandle|IO::\w+)$/ || tied $in_fh
1184 0 0 0 not defined $infile && length $infile or $infile eq "-"
0 0 0 not defined $infile && length $infile or $infile eq "-" or $infile =~ /^<&(?:STDIN|0)$/i
1216 0 0 0 not defined $outfile && length $outfile or $outfile eq "-"
0 0 0 not defined $outfile && length $outfile or $outfile eq "-" or $outfile =~ /^>&?(?:STDOUT|1)$/i
1268 0 0 0 close $in_fh or croak("Can't close $infile after reading: $!\n")
1270 0 0 0 close $out_fh or croak("Can't close $outfile after writing: $!\n")