Branch Coverage

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)