| line |
true |
false |
branch |
|
26
|
0 |
0 |
unless $attr =~ /[^A-Z]/ |
|
27
|
0 |
0 |
unless exists $$self{'_attr'}{lc $attr} |
|
28
|
0 |
0 |
if @_ |
|
53
|
0 |
0 |
if ($$event[0] <= $time) { } |
|
60
|
0 |
0 |
if $nexttimeout < $timeout or not $timeout |
|
67
|
0 |
0 |
unless my $conn = $$self{'_connhash'}{'read'}{$sock} |
|
69
|
0 |
0 |
$$conn[1] ? : |
|
73
|
0 |
0 |
unless my $conn = $$self{'_connhash'}{'write'}{$sock} |
|
75
|
0 |
0 |
$$conn[1] ? : |
|
84
|
0 |
0 |
if (@_) |
|
116
|
0 |
0 |
unless ref $conn eq 'Net::Gnutella::Connection' |
|
117
|
0 |
0 |
unless $conn->connected |
|
164
|
0 |
0 |
if $conn->error |
|
172
|
0 |
0 |
if $conn->error |
|
179
|
0 |
0 |
if (@_) { } |
|
189
|
0 |
0 |
unless ($when =~ /^\d+[dhmst]$/i) |
|
193
|
0 |
0 |
unless (defined $coderef and ref $coderef eq 'CODE') |
|
199
|
0 |
0 |
if $when =~ s/d$//i |
|
200
|
0 |
0 |
if $when =~ s/h$//i |
|
201
|
0 |
0 |
if $when =~ s/m$//i |
|
204
|
0 |
0 |
if ($when =~ s/t$//i) { } |
|
210
|
0 |
0 |
if $$self{'_qid'} eq 'zzzzzzzz' |
|
223
|
0 |
0 |
unless ($msgid and ref $msgid eq 'ARRAY') |
|
227
|
0 |
0 |
if ($conn) |
|
239
|
0 |
0 |
unless $$self{'_msgid_source'}{join ':', @$msgid} |
|
252
|
0 |
0 |
unless (ref $coderef eq 'CODE') |
|
258
|
0 |
0 |
if ($flags =~ /r/i) |
|
263
|
0 |
0 |
if ($flags =~ /w/i) |
|
274
|
0 |
0 |
unless (ref $coderef eq 'CODE') |
|
280
|
0 |
0 |
if (not defined $replace) { } |
|
|
0 |
0 |
elsif ($replace =~ /^\D/) { } |
|
286
|
0 |
0 |
ref $event eq 'ARRAY' ? : |
|
287
|
0 |
0 |
if ($ev =~ /^\d/) |
|
290
|
0 |
0 |
unless ($ev) |
|
304
|
0 |
0 |
unless ($event) |
|
310
|
0 |
0 |
if $conn |
|
312
|
0 |
0 |
if ($conn and exists $$conn{'_handler'}{$type}) { } |
|
|
0 |
0 |
elsif (exists $$self{'_handler'}{$type}) { } |
|
|
0 |
0 |
elsif ($default) { } |
|
313
|
0 |
0 |
if $self->debug >= 2 |
|
316
|
0 |
0 |
if $self->debug >= 2 |
|
319
|
0 |
0 |
if $self->debug >= 2 |
|
322
|
0 |
0 |
if $self->debug >= 2 |
|
328
|
0 |
0 |
if ($replace == 0) { } |
|
|
0 |
0 |
elsif ($replace == 1) { } |
|
|
0 |
0 |
elsif ($replace == 2) { } |
|
331
|
0 |
0 |
unless &$coderef($conn, $event, @args) |
|
333
|
0 |
0 |
if ($default) { } |
|
339
|
0 |
0 |
if ($default) { } |
|
340
|
0 |
0 |
unless $conn->_default($event, @args) |
|
342
|
0 |
0 |
unless $self->_default($event, @args) |
|
354
|
0 |
0 |
if ($flags =~ /r/i) |
|
359
|
0 |
0 |
if ($flags =~ /w/i) |