blib/lib/Stem/Event/Perl.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
branch | 13 | 18 | 72.2 |
line | true | false | branch |
---|---|---|---|
46 | 0 | 4 | unless (eval { do { require Time::HiRes } }) |
130 | 7 | 0 | if ($$event{'time_left'} < $min_delay or $min_delay == 0) |
138 | 0 | 7 | unless $min_delay |
153 | 0 | 6 | unless $$event{'active'} |
155 | 1 | 5 | unless ($$event{'time_left'} -= $delta) <= 0 |
171 | 0 | 10 | unless (defined fileno $$event{'fh'}) |
179 | 1 | 9 | unless $$event{'active'} |
192 | 1 | 9 | unless $$event{'active'} |
193 | 2 | 7 | if (vec $select_vec, fileno $$event{'fh'}, 1) |