| blib/lib/Tie/STDERR.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 10 | 26 | 38.4 |
| line | true | false | branch |
|---|---|---|---|
| 40 | 0 | 1 | if ($stderr ne '') |
| 42 | 0 | 0 | if (defined $run_function) { } |
| 0 | 0 | elsif (defined $append_scalar) { } | |
| 0 | 0 | elsif (defined $command) { } | |
| 75 | 1 | 1 | if (@_ and not defined $_[0]) |
| 78 | 1 | 0 | if ref tied *STDERR eq 'Tie::STDERR' |
| 85 | 1 | 0 | unless (ref tied *STDERR eq 'Tie::STDERR') |
| 96 | 0 | 1 | unless @_ |
| 98 | 0 | 1 | if (ref $_[0] eq 'CODE') { } |
| 0 | 1 | elsif (ref $_[0] eq 'SCALAR') { } | |
| 104 | 1 | 0 | if ($arg =~ /^\s*([|>].*)/s) { } |
| 111 | 0 | 0 | if (defined $arg) |
| 115 | 0 | 1 | if ($need_apache_cleanup) |