| line |
true |
false |
branch |
|
12
|
1 |
12271 |
unless my $timer = $self->{'timers'}{$id} |
|
13
|
3142 |
9129 |
if defined $after |
|
36
|
1543 |
45640 |
unless $self->{'running'} |
|
43
|
10 |
1 |
unless keys %{$$self{"timers"};} or keys %{$$self{"io"};} |
|
47
|
47172 |
1 |
defined $min ? : |
|
48
|
21598 |
25575 |
$timeout <= 0 ? : |
|
51
|
27465 |
19708 |
if (keys %{$$self{'io'};}) { } |
|
|
17 |
19691 |
elsif ($timeout) { } |
|
55
|
26310 |
1155 |
if (IO::Poll::_poll($timeout, @poll) > 0) |
|
58
|
21295 |
38425 |
if ($mode & 59) |
|
59
|
0 |
21295 |
unless my $io = $self->{'io'}{$fd} |
|
60
|
21295 |
0 |
if ++$i |
|
62
|
50832 |
8888 |
unless $mode & 4 and my $io = $self->{'io'}{$fd} |
|
63
|
8888 |
0 |
if ++$i |
|
74
|
4 |
89837 |
unless my $t = $self->{'timers'}{$id} |
|
75
|
68086 |
21751 |
unless $t->{'time'} <= $now |
|
78
|
20309 |
1442 |
if ($t->{'recurring'}) { } |
|
83
|
21751 |
0 |
if $t->{'cb'} |
|
92
|
2691 |
1042 |
unless ref $remove |
|
111
|
1 |
11297 |
unless my $io = $self->{'io'}{fileno $handle} |
|
113
|
11053 |
244 |
if $read |
|
114
|
8461 |
2836 |
if $write |
|
141
|
3 |
51931 |
unless eval {
do {
$self->$cb(@_);
1
}
} |