line |
true |
false |
branch |
43
|
0 |
12 |
unless UNIVERSAL::isa($handler, 'IOMux::Handler') |
54
|
0 |
4 |
unless 'IOMux::Open'->can('new') |
57
|
4 |
0 |
if $conn |
75
|
0 |
7073 |
defined $timeout ? : |
80
|
0 |
7073 |
if $wait < 0.001 |
82
|
0 |
7073 |
unless $self->one_go($wait, $heartbeat) |
104
|
32 |
13 |
unless @_ |
105
|
13 |
0 |
defined $_[0] ? : |
112
|
0 |
13 |
unless my $obj = delete $$self{'IM_handlers'}{$fileno} |
118
|
0 |
13 |
if (my $timeout = delete $$self{'IM_timeouts'}{$fileno}) |
119
|
0 |
0 |
if $$self{'IM_next_timeout'} == $timeout |
132
|
0 |
0 |
if $old == $when |
135
|
0 |
0 |
if ($old) |
138
|
0 |
0 |
if $next and $next == $old |
141
|
0 |
0 |
if ($when) |
142
|
0 |
0 |
if not $next or $next > $when |
153
|
0 |
7073 |
if ($next and $now < $next) |
156
|
0 |
0 |
if $$self{'IM_next_timeout'} |
162
|
0 |
0 |
unless $when <= $now |