Condition Coverage

blib/lib/Pod/Classdoc.pm
Criterion Covered Total %
condition 53 95 55.7


and 2 conditions

line l !l condition
251 0 0 $@ = "Cannot open ${file}: $!" and return undef

and 3 conditions

line !l l&&!r l&&r condition
212 1 0 0 $$self{'_nosubs'} and $$self{'_verbose'}
383 20083 0 0 $$self{'_verbose'} > 2 and $token->significant || $token->isa('PPI::Token::Pod')
386 358 42 19683 $$self{'_state'} == 0 and not $token->isa('PPI::Token::Pod')
427 0 0 0 $$self{'_currpod'} && $$self{'_currpod'} =~ /\n=begin\s+classdoc[ \r\t]*\n(.*?)\n=end\s+classdoc[ \r\t]*\n/gs
435 0 0 4 $$self{'_currpod'} && $$self{'_currpod'} =~ /\n=begin\s+classdoc[ \r\t]*\n(.*?)\n=end\s+classdoc[ \r\t]*\n/gs
752 6 0 2 exists $$info{'exports'} and @{$$info{'exports'};}
761 8 0 0 exists $$info{'imports'} and @{$$info{'imports'};}
770 0 0 8 exists $$info{'member'} and @{$$info{'member'};}
779 0 8 0 exists $$info{'constructors'} and %{$$info{'constructors'};}
787 0 0 8 exists $$info{'Methods'} and %{$$info{'Methods'};}
1058 0 198 0 not $use_private and substr($sub, 0, 1) eq '_'
198 0 0 not $use_private and substr($sub, 0, 1) eq '_' and not $$methodinfo{'constructor'}
1314 4640 1 455 /^\@(\w+)(\s+(.*))?$/ and $$validtags{$1}
1412 0 0 0 $_ ne '.' and $_ ne '..'
0 0 0 $_ ne '.' and $_ ne '..' and -d "$path/$_"

or 2 conditions

line l !l condition
145 1 0 $path ||= './classdocs'
147 1 0 $verbose || 0
1172 0 0 $$method{'Description'} || ' '
1214 194 4 $$method{'Description'} || ' '
1296 168 34 $updir ||= ''
1334 447 8 $tdesc || 1

or 3 conditions

line l !l&&r !l&&!r condition
324 1 1 35 not $currpod or $currpod =~ /\n\s*\@xs\s+/
383 0 0 0 $token->significant || $token->isa('PPI::Token::Pod')
1319 106 65 284 $tag eq 'param' or $tag eq 'optional'
171 2 282 $tag eq 'param' or $tag eq 'optional' or $tag eq 'exports'
67 0 282 $tag eq 'param' or $tag eq 'optional' or $tag eq 'exports' or $tag eq 'imports'
2 99 183 $tag eq 'param' or $tag eq 'optional' or $tag eq 'exports' or $tag eq 'imports' or $tag eq 'member'
1341 1 1 200 $tag eq 'param' or $tag eq 'optional'
2 0 200 $tag eq 'param' or $tag eq 'optional' or $tag eq 'exports'
1 0 200 $tag eq 'param' or $tag eq 'optional' or $tag eq 'exports' or $tag eq 'imports'
0 4 196 $tag eq 'param' or $tag eq 'optional' or $tag eq 'exports' or $tag eq 'imports' or $tag eq 'member'
1426 182 10 6 $1 eq '.' or $1 eq '?'
192 0 6 $1 eq '.' or $1 eq '?' or $1 eq '!'