| line |
true |
false |
branch |
|
93
|
46 |
0 |
$called_from =~ /Bio::/ ? : |
|
|
0 |
46 |
$called_from eq 'Carp' ? : |
|
99
|
46 |
0 |
if ($warn_kind eq 'Bioperl') { } |
|
115
|
0 |
0 |
if (ref $warn eq 'HASH') { } |
|
119
|
0 |
0 |
do {
$warn
}->{'Bioperl'} ? : |
|
|
0 |
0 |
do {
$warn
}->{'carped'} ? : |
|
127
|
0 |
0 |
unless @warns |
|
133
|
0 |
0 |
if $got_kind eq 'warn' and $exp_kind eq 'carped' |
|
136
|
0 |
0 |
if ($got_kind eq 'Bioperl') { } |
|
208
|
326 |
0 |
if ($framework eq 'Test::Most') { } |
|
213
|
50 |
276 |
if ($skip_all) { } |
|
|
1 |
275 |
elsif (defined $tests and $tests == 0) { } |
|
|
274 |
1 |
elsif ($tests) { } |
|
275
|
0 |
50 |
unless $tests |
|
277
|
50 |
0 |
if ($framework eq 'Test::Most') { } |
|
278
|
27 |
23 |
if ($skip) |
|
301
|
0 |
124 |
if @_ |
|
324
|
0 |
3 |
if @_ |
|
416
|
17 |
231 |
if (not defined $val1 && defined $val2) { } |
|
440
|
73 |
303 |
if ($req_mods) |
|
441
|
0 |
73 |
unless ref $req_mods eq 'ARRAY' |
|
447
|
78 |
298 |
if ($req_mod) |
|
448
|
0 |
78 |
if ref $req_mod |
|
462
|
0 |
376 |
if $req_env |
|
467
|
0 |
376 |
if ($req_exe and not ref $req_exe && $req_exe->isa('Bio::Tools::Run::WrapperBase')) |
|
488
|
5 |
371 |
if ($os) |
|
489
|
0 |
5 |
if ($^O =~ /$os/i) |
|
497
|
44 |
180 |
if ($skip) |
|
502
|
33 |
299 |
if ($req_net and not test_network()) |
|
507
|
0 |
299 |
if ($req_email and not test_email()) |
|
512
|
0 |
299 |
if ($req_exe) |
|
514
|
0 |
0 |
if ($@ or not defined $eval) |
|
524
|
0 |
299 |
if ($req_env and not exists $ENV{$req_env}) |
|
542
|
3 |
221 |
if ($mod =~ /(\S+)\s+(\S+)/) |
|
549
|
44 |
180 |
if ($@) { } |
|
|
2 |
178 |
elsif ($desired_version) { } |
|
550
|
43 |
1 |
if ($@ =~ /Can't locate/) { } |
|
559
|
0 |
2 |
if (not defined ${"${mod}::VERSION";}) { } |
|
|
0 |
2 |
elsif (${"${mod}::VERSION";} < $desired_version) { } |