blib/lib/Devel/Util.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
condition | 1 | 15 | 6.6 |
line | !l | l&&!r | l&&r | condition |
---|---|---|---|---|
97 | 0 | 0 | 0 | $_[0] and $_[0] eq '-force' |
line | l | !l | condition |
---|---|---|---|
38 | 0 | 1 | shift() || \*STDERR |
94 | 0 | 0 | shift() || 1 |
103 | 0 | 0 | $_[1] || 1 |
line | l | !l&&r | !l&&!r | condition |
---|---|---|---|---|
97 | 0 | 0 | 0 | Time::HiRes::time() - $last_time >= $delay or $_[0] and $_[0] eq '-force' |
142 | 0 | 0 | 0 | shift() || sprintf('dt at %s line %d', (caller)[1, 2]) |