Branch Coverage

blib/lib/Biblio/bp/lib/bp-p-debug.pl
Criterion Covered Total %
branch 25 82 30.4


line true false branch
27 0 0 unless eval $_[$[]
34 0 0 if ($] >= 5)
40 0 0 if (/^StB\000/ and length $_ == length $_main{'_main'}) { }
45 0 0 unless /^-?[\d.]+$/
50 0 0 $w ? :
51 0 0 $h ? :
67 0 3410 unless defined $statement
68 0 3410 unless defined $level
70 145 3265 defined $mod ? :
73 3410 0 if $debl == 0
75 0 0 if $debl == 1 and $opt_default_debug_level > $level
77 0 0 if $debl > $level
80 0 0 if ($] >= 5) { }
82 0 0 unless defined $s
86 0 0 if (defined $mod) { }
90 0 0 if ($p ne 'bib') { }
93 0 0 if $f =~ m[/]
94 0 0 if ($f eq 'bp.pl') { }
133 0 280 if $glb_debug == 2
146 0 266 unless defined $glb_filelocmap{$file}
148 0 266 if (not defined $glb_Irfmt{$file}) { }
151 0 266 unless defined $formats{join $;, $glb_Irfmt{$file}, 'i_name'}
154 0 266 if (not defined $glb_Ircset{$file}) { }
157 0 266 unless defined $charsets{join $;, $glb_Ircset{$file}, 'i_name'}
160 0 266 unless defined $glb_Ifilemap{$file}
163 0 278 if (not defined $glb_Orfmt{$file}) { }
166 0 278 unless defined $formats{join $;, $glb_Orfmt{$file}, 'i_name'}
169 0 278 if (not defined $glb_Orcset{$file}) { }
172 0 278 unless defined $charsets{join $;, $glb_Orcset{$file}, 'i_name'}
175 0 278 unless defined $glb_Ofilemap{$file}
185 0 826 if (not defined $formats{join $;, $fmt, 'i_name'}) { }
0 826 elsif ($formats{join $;, $fmt, 'i_name'} ne $fmt) { }
191 0 826 unless defined $formats{join $;, $fmt, 'i_sname'}
195 8260 0 if (defined $formats{join $;, $fmt, $f}) { }
197 0 8260 unless defined &$function
208 0 280 if (@incons)
227 0 0 if ($what =~ /\bconsist\w*\b/) { }
265 0 0 unless (@ifnames or @ofnames)
271 0 0 if (@fnames) { }
286 0 0 if (@cnames) { }
312 11 269 unless defined $_[0]