| line |
true |
false |
branch |
|
48
|
12 |
16 |
if $self->{'buffer'} ne "" and $self->{'interested_head1s'}{$self->{'current_head1'} // ""} and ($self->{'current_head2'} // "") =~ /\b\Q$self->{'interested_head2'}\E\b/ |
|
90
|
3 |
4 |
$text =~ /NAME/ ? : |
|
96
|
0 |
5 |
if $text =~ /^The\s/ |
|
97
|
1 |
4 |
unless $this->{'interested_head1s'}{$this->{'Mode'} // ""} |
|
102
|
6 |
0 |
if /\s*([^\s\(]+)\s*/ |
|
103
|
0 |
4 |
unless @funcs == @names |
|
108
|
6 |
0 |
if /\s*([^\s(]+)\s*/ |
|
109
|
0 |
6 |
if /\s*([^\s(]+)\s*\(\s*(.+)\s*\)\s*$/ |
|
112
|
1 |
3 |
if $#names > 0 |
|
118
|
0 |
4 |
if $this->{'verbose'} |
|
119
|
0 |
0 |
if defined $sig and $this->{'verbose'} |
|
125
|
1 |
9 |
unless $this->{'interested_head1s'}{$this->{'Mode'} // ""} |
|
127
|
1 |
8 |
if $tgt eq "options" |
|
129
|
0 |
9 |
if $this->{'verbose'} |
|
131
|
0 |
9 |
if not $this->{'Parmode'} =~ /Body/ and $this->{'verbose'} |
|
137
|
1 |
9 |
if $this->{'Mode'} ne "NAME" and not $this->{'interested_head1s'}{$this->{'Mode'} // ""} |
|
144
|
3 |
10 |
if ($this->{'Mode'} =~ /NAME/ and $this->{'Parmode'} =~ /NAME/) |
|
145
|
3 |
0 |
if $this->trim($txt) =~ /^\s*(\S+)\s*/ |
|
146
|
0 |
3 |
if $this->{'verbose'} |
|
150
|
9 |
1 |
unless ($this->{'Parmode'} =~ /Body/) |
|
152
|
0 |
9 |
unless defined $func |
|
155
|
3 |
6 |
$verbatim && $this->{'Parmode'} ne 'Sig' ? : |
|
157
|
0 |
9 |
if $this->{'verbose'} |
|
164
|
0 |
4 |
unless $this->{'interested_head1s'}{$this->{'Mode'} // ""} |
|
175
|
4 |
17 |
if $this->{'Parmode'} eq "Sig" or $this->{'Parmode'} eq "Usage" |
|
176
|
2 |
19 |
if ($this->{'Parmode'} eq "Sig") |
|
182
|
15 |
12 |
unless $verbatim |
|
183
|
27 |
0 |
unless /^\s*$/ |
|
518
|
0 |
0 |
if defined $file |
|
531
|
0 |
0 |
unless open my $fh, $fi |
|
549
|
0 |
0 |
unless open my $fh, ">", $this->{'Outfile'} |
|
645
|
0 |
1 |
unless defined $sort |
|
650
|
0 |
1 |
if ref $fields eq "" |
|
657
|
1 |
1 |
if ($_ eq "Name" and $name =~ /$pattern/i or defined $val->{$_} and $val->{$_} =~ /$pattern/i) |
|
661
|
0 |
1 |
if defined $val->{'Crossref'} and defined $$hash{$val->{'Crossref'}}{$module} |
|
668
|
1 |
0 |
if @match and $sort |
|
681
|
1 |
0 |
unless $regex =~ /^m[^a-z,A-Z,0-9]/ |
|
687
|
0 |
0 |
if $mod and not $mod =~ /[imsx]+/ |
|
688
|
0 |
0 |
if $mod |
|
701
|
0 |
0 |
unless -f $file |
|
703
|
0 |
0 |
unless defined $verbose |
|
704
|
0 |
0 |
unless open my $infile, "<", $file |
|
707
|
0 |
0 |
if $ENV{'BUILDROOTPREFIX'} |
|
723
|
0 |
0 |
unless defined $verbose |
|
728
|
0 |
0 |
if -d $File::Find::name |
|
730
|
0 |
0 |
unless $File::Find::dir =~ /script$/ or $File::Find::name =~ /\.(?:pm|pod)$/ |
|
732
|
0 |
0 |
if $File::Find::name =~ /(?:Index\.pod|PP\.pm)$/ or $File::Find::dir =~ m[/PP] |
|
758
|
0 |
0 |
unless defined $hash->{$func} |
|
759
|
0 |
0 |
if defined fileno $module |
|
762
|
0 |
0 |
if file_name_is_absolute($file) |
|
764
|
0 |
0 |
if not file_name_is_absolute($file) and $dbf |
|
788
|
0 |
4 |
if @a % 2 |
|
827
|
0 |
4 |
if file_name_is_absolute($fi) and -f $fi |
|
853
|
0 |
3 |
if $@ and $@ ne "no function defined\n" |
|
859
|
6 |
0 |
if (defined $val->{'Module'}) { } |
|
869
|
0 |
3 |
if $@ |
|
871
|
0 |
3 |
if $does and $does =~ /^\s*$/ |
|
872
|
1 |
2 |
$filename =~ /\.pod$/ ? : |
|
|
0 |
3 |
$filename =~ /script/ ? : |
|
876
|
3 |
0 |
if $name and not $name =~ /^\s*$/ |
|
882
|
0 |
0 |
unless -f $file |
|
884
|
0 |
0 |
unless open my $in, "<", $file |
|
886
|
0 |
0 |
unless defined $out |
|
887
|
0 |
0 |
unless $out |
|
933
|
0 |
0 |
$want_dir ? : |
|
934
|
0 |
0 |
$want_dir ? : |
|
|
0 |
0 |
if $want_dir ? -d $ent : -f $ent |
|
942
|
0 |
0 |
unless defined $file |
|
943
|
0 |
0 |
unless -w $file |
|
950
|
0 |
0 |
unless @found |
|
957
|
0 |
0 |
if $@ |