| line |
true |
false |
branch |
|
129
|
0 |
7 |
unless $cmd =~ /^(?:add|remove)\z/ |
|
131
|
2 |
5 |
if (UNIVERSAL::isa($obj, 'GLOB')) { } |
|
|
1 |
4 |
elsif (UNIVERSAL::isa($obj, 'HASH')) { } |
|
138
|
0 |
1 |
$type =~ /^(file|handle)$/ ? : |
|
144
|
0 |
7 |
unless my $sub = $this->can($subname) |
|
182
|
0 |
0 |
if (my $item = delete $$this{'handles'}{$handle}) |
|
188
|
0 |
0 |
if (keys %{$$this{'handles'};} == 0) |
|
206
|
0 |
2 |
if ($len) |
|
209
|
0 |
0 |
unless $ret |
|
212
|
2 |
0 |
if (defined $len) |
|
217
|
0 |
0 |
if $!{'EAGAIN'} |
|
233
|
1 |
2 |
if ($file eq '-') |
|
238
|
0 |
2 |
unless open my $fh, '<', $file |
|
262
|
0 |
1 |
if ($file eq '-') |
|
270
|
0 |
1 |
unless $$item{'name'} eq $file |
|
286
|
0 |
12 |
unless defined $pos |
|
287
|
8 |
4 |
if ($pos == $$item{'pos'}) |
|
295
|
4 |
0 |
if ($len) { } |
|
|
0 |
0 |
elsif (defined $len) { } |
|
298
|
1 |
3 |
unless $ret |
|
305
|
0 |
0 |
if $!{'EAGAIN'} |
|
343
|
0 |
1 |
unless $$item{'callback'} eq $callback |
|
381
|
0 |
2 |
unless $$item{'callback'} eq $callback |
|
404
|
1 |
2 |
unless $item and $$item{'callback'} |
|
416
|
33 |
87 |
if (my $poll = $$this{'poll'}) |
|
419
|
0 |
33 |
if $ev == -1 |
|
424
|
2 |
0 |
unless ($ret) |
|
431
|
0 |
31 |
if (keys %{$$this{'handles'};} == 0) |
|
438
|
118 |
0 |
if (my $files = $$this{'files'}) |
|
443
|
1 |
11 |
unless ($ret) |
|
453
|
118 |
0 |
if (my $timeout = $$this{'timeout'}) |
|
458
|
4 |
65 |
if ($now > $$item{'timeout'}) |
|
461
|
3 |
1 |
if ($$item{'type'} eq 'interval') { } |
|
472
|
109 |
9 |
if $$this{'poll'} or @{$$this{'files'};} or keys %{$$this{'timeout'};} |
|
486
|
1 |
101 |
if (defined $timeout_secs and time - $enter_at > $timeout_secs) |