| blib/lib/Net/HTTP/Spore/Role/Debug.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 9 | 16 | 56.2 |
| line | true | false | branch |
|---|---|---|---|
| 22 | 1 | 31 | if $args->{'trace'} |
| 23 | 0 | 32 | if defined $ENV{'SPORE_TRACE'} |
| 25 | 31 | 1 | unless (defined $trace) |
| 31 | 1 | 0 | if ($trace =~ /(\d)=(.+)$/) { } |
| 34 | 0 | 1 | unless $fh = 'IO::File'->new($file, 'w') |
| 39 | 0 | 0 | unless $fh = 'IO::File'->new('>&STDERR') |
| 50 | 38 | 1 | unless $self->has_trace |
| 58 | 0 | 0 | unless $self->trace and $self->trace > 1 |