| line |
true |
false |
branch |
|
155
|
276 |
0 |
unless ($main::DONT_USE_ERROR) |
|
156
|
276 |
0 |
if (eval 'require Error; 1;') |
|
163
|
0 |
276 |
unless ($ERRORLOADED) |
|
170
|
276 |
0 |
unless ($@) |
|
172
|
276 |
0 |
if ($class eq 'Clone') { } |
|
185
|
0 |
276 |
unless (defined $CLONE_CLASS) |
|
191
|
0 |
0 |
if (not $reftype) { } |
|
|
0 |
0 |
elsif ($reftype eq 'ARRAY') { } |
|
|
0 |
0 |
elsif ($reftype eq 'HASH') { } |
|
|
0 |
0 |
elsif ($reftype eq 'CODE') { } |
|
200
|
0 |
0 |
if ($class) |
|
223
|
157501 |
67235 |
if (@_ > 1) |
|
226
|
0 |
157501 |
if @_ % 2 |
|
259
|
0 |
11886 |
unless ref $orig and $orig->isa('Bio::Root::Root') |
|
279
|
3 |
0 |
if ($clone->can($method)) { } |
|
325
|
16 |
517321 |
if $DEBUG |
|
326
|
28 |
517293 |
unless ref $self |
|
328
|
223628 |
293665 |
if (defined $value or not defined $self->{'_root_verbose'}) |
|
340
|
77371 |
0 |
if ($method) |
|
341
|
72920 |
4451 |
unless (exists $self->{'_root_cleanup_methods'}) |
|
364
|
106 |
324072 |
unless ref $self and $self->isa('HASH') |
|
365
|
260637 |
63435 |
unless my $methods = $self->{'_root_cleanup_methods'} |
|
415
|
131 |
11 |
if @args == 1 |
|
417
|
142 |
0 |
if ($ERRORLOADED) { } |
|
426
|
0 |
142 |
if (ref $args[0]) { } |
|
427
|
0 |
0 |
if ($args[0]->isa('Error')) { } |
|
441
|
11 |
131 |
if (@args % 2 == 0 and $args[0] =~ /^-/) |
|
447
|
11 |
131 |
scalar keys %args > 0 ? : |
|
452
|
0 |
0 |
if $class |
|
479
|
0 |
76642 |
if (defined $self->verbose and $self->verbose > 0) |
|
480
|
0 |
0 |
unless (@msgs and $msgs[-1] =~ /\n$/) |
|
481
|
0 |
0 |
unless @msgs |
|
503
|
0 |
10545 |
if $main::main::{$module} |
|
507
|
0 |
10545 |
if (not $name =~ /^([\w:]+)$/) { } |
|
520
|
0 |
10545 |
if ($@) |
|
532
|
260743 |
63435 |
unless my(@cleanup_methods) = $self->_cleanup_methods |