Condition Coverage

blib/lib/Pod/Simple/PullParser.pm
Criterion Covered Total %
condition 42 67 62.6


and 3 conditions

line !l l&&!r l&&r condition
342 0 0 52 defined $titlename and $titlename =~ /^[A-Z ]{1,60}$/s
350 0 10 563 ++$token_count <= ($max_token || 1000000) and defined(my $token = $self->get_token)
357 113 101 62 $token->is_start and $token->tagname eq "head1"
365 1 1 62 $token->is_end and $token->tagname eq "head1"
377 16 0 10 $desperate_for_title and $head1_text_content =~ /\S/
16 2 8 $desperate_for_title and $head1_text_content =~ /\S/ and not $head1_text_content =~ /^[ A-Z]+$/s
2 2 6 $desperate_for_title and $head1_text_content =~ /\S/ and not $head1_text_content =~ /^[ A-Z]+$/s and not $head1_text_content =~ /\((?: NAME | TITLE | VERSION | AUTHORS? | DESCRIPTION | SYNOPSIS | COPYRIGHT | LICENSE | NOTES? | FUNCTIONS? | METHODS? | CAVEATS? | BUGS? | SEE\ ALSO | SWITCHES | ENVIRONMENT )\)/sx
4 6 0 $desperate_for_title and $head1_text_content =~ /\S/ and not $head1_text_content =~ /^[ A-Z]+$/s and not $head1_text_content =~ /\((?: NAME | TITLE | VERSION | AUTHORS? | DESCRIPTION | SYNOPSIS | COPYRIGHT | LICENSE | NOTES? | FUNCTIONS? | METHODS? | CAVEATS? | BUGS? | SEE\ ALSO | SWITCHES | ENVIRONMENT )\)/sx and $max_content_length ? length $head1_text_content <= $max_content_length : 1
414 0 0 36 $token->is_start and $content_containers{$token->tagname}
427 12 12 36 $token->is_end and $content_containers{$token->tagname}
436 0 0 36 $para_text_content =~ /\S/ and $max_content_length ? length $para_text_content <= $max_content_length : 1

or 2 conditions

line l !l condition
85 0 89 $self->{'token_buffer'} ||= []
86 0 89 $self->{'start_token_class'} ||= "Pod::Simple::PullParserStartToken"
87 0 89 $self->{'text_token_class'} ||= "Pod::Simple::PullParserTextToken"
88 0 89 $self->{'end_token_class'} ||= "Pod::Simple::PullParserEndToken"
350 573 0 $max_token || 1000000

or 3 conditions

line l !l&&r !l&&!r condition
56 0 0 0 ref $_[0] || $_[0]
60 0 0 0 ref $_[0] || $_[0]
116 23 0 0 $self->{'source_fh'} || Carp::croak('You have to call set_source before you can call get_token')
185 213 158 56 length $1 or length $2
371 0 56 length $1 or length $2 or pos ${$$self{"source_scalar_ref"};} != length ${$self->{'source_scalar_ref'};}
233 0 1 89 $self->{'source_fh'} or $self->{'source_scalar_ref'}
1 0 89 $self->{'source_fh'} or $self->{'source_scalar_ref'} or $self->{'source_arrayref'}
377 23 13 26 $head1_text_content eq $titlename or $head1_text_content =~ /\($titlename_re\)/s