| blib/lib/IPC/Run/Debug.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % | 
| condition | 5 | 26 | 19.2 | 
| line | !l | l&&!r | l&&r | condition | 
|---|---|---|---|---|
| 103 | 0 | 0 | 0 | defined $IPC::Run::cur_self && defined $IPC::Run::cur_self->{'ID'} | 
| 0 | 0 | 0 | defined $debug_name && length $debug_name | |
| 0 | 0 | 0 | defined $op and UNIVERSAL::isa($op, "IO::Pty") | |
| 0 | 0 | 0 | defined $kid && defined $kid->{'DEBUG_FD'} && $op->{'KFD'} == $kid->{'DEBUG_FD'} | |
| 204 | 0 | 80330 | $IPC::Run::cur_self and ($IPC::Run::cur_self->{'debug'} || 0) >= $level | 
| line | l | !l | condition | 
|---|---|---|---|
| 103 | 80534 | 0 | shift() || 1 | 
| 0 | 80330 | $IPC::Run::cur_self->{'debug'} || 0 | |
| 0 | 80330 | $IPC::Run::cur_self->{'debug'} || 0 | |
| 0 | 0 | $ENV{'IPCRUNDEBUG'} || '' | 
| line | l | !l&&r | !l&&!r | condition | 
|---|---|---|---|---|
| 103 | 0 | 0 | 0 | $warned ||= warn("Unknown debug level $ENV{'IPCRUNDEBUG'}, assuming 'basic' (1)\n") |