Branch Coverage

blib/lib/Net/Amazon/MechanicalTurk/BaseObject.pm
Criterion Covered Total %
branch 10 40 25.0


line true false branch
27 0 11 unless (defined $self->$attr)
35 0 7 $#_ == 0 ? :
37 20 5 unless defined $self->$attr
38 0 25 if ($@)
44 0 29 $#_ == 0 ? :
47 0 18 if ($@)
53 0 0 $#_ == 0 ? :
56 0 0 if (UNIVERSAL::can($self, $attr)) { }
60 0 0 if ($@)
85 0 162 unless ($sub)
110 83 558 if ($#_ == 0)
120 0 0 if ($#_ >= 0)
122 0 0 if (UNIVERSAL::isa($debug, 'CODE') or UNIVERSAL::isa($debug, 'GLOB') or UNIVERSAL::can($debug, 'debugMessage')) { }
0 0 elsif ($debug =~ /^STDERR$/i or $debug =~ /^(1|yes|true)$/i) { }
0 0 elsif ($debug =~ /^STDOUT$/i) { }
0 0 elsif ($debug and not $debug =~ /^(0|no|false)$/i) { }
136 0 0 if (not $CLASS_DEBUG{$class}) { }
156 0 0 unless (defined $debug)
174 0 0 if (UNIVERSAL::isa($debug, 'GLOB')) { }
0 0 elsif (UNIVERSAL::isa($debug, 'CODE')) { }