blib/lib/Hook/Output/Tiny.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
branch | 18 | 22 | 81.8 |
line | true | false | branch |
---|---|---|---|
23 | 2 | 28 | unless (wantarray) |
28 | 22 | 8 | defined $self->{$sub_name}{'data'} ? : |
39 | 0 | 24 | unless open $self->{$sub_name}{'handle'}, ">&", $HANDLE |
42 | 0 | 24 | unless open $HANDLE, ">>", \$self->{$sub_name}{'data'} |
52 | 13 | 11 | $_ eq 'stderr' ? : |
60 | 0 | 26 | unless open uc $_, ">&", $self->{$_}{'handle'} |
113 | 1 | 5 | if ($fn eq "stderr" or $fn eq "stdout") |
118 | 0 | 4 | unless open my $wfh, ">>", $fn |
130 | 34 | 16 | if $handle |
131 | 30 | 16 | $handle ? : |
136 | 4 | 30 | if (not grep({$handle eq $_;} "stderr", "stdout")) |