Branch Coverage

lib/IOMux.pm
Criterion Covered Total %
branch 14 42 33.3


line true false branch
31 0 7 if $class eq 'IOMux'
55 0 12 unless UNIVERSAL::isa($handler, 'IOMux::Handler')
66 0 4 unless 'IOMux::Open'->can('new')
69 4 0 if $conn
79 0 4 unless keys %$handlers
91 0 12 defined $timeout ? :
96 0 12 if $wait < 0.001
98 0 12 unless $self->one_go($wait, $heartbeat)
120 32 13 unless @_
121 13 0 defined $_[0] ? :
128 0 13 unless my $obj = delete $self->{'IM_handlers'}{$fileno}
134 0 13 if (my $timeout = delete $self->{'IM_timeouts'}{$fileno})
136 0 0 if $self->{'IM_next_timeout'} == $timeout
148 0 0 if $old == $when
151 0 0 if ($old)
154 0 0 if $next and $next == $old
157 0 0 if ($when)
158 0 0 if not $next or $next > $when
169 0 12 if ($next and $now < $next)
172 0 0 if $self->{'IM_next_timeout'}
178 0 0 unless $when <= $now