| line |
true |
false |
branch |
|
22
|
2 |
29 |
if ($str =~ m[^poe://[^/]+/[^/]+$]) |
|
25
|
10 |
21 |
unless $str =~ /^\Q$scheme:\E/ |
|
38
|
16 |
50 |
if (@_) |
|
40
|
5 |
11 |
unless defined $old |
|
41
|
0 |
16 |
$tmp =~ /(.*@)/ ? : |
|
43
|
2 |
14 |
unless defined $new |
|
44
|
14 |
2 |
if (length $new) |
|
47
|
14 |
2 |
if ($ui or length $new) { } |
|
54
|
25 |
41 |
unless defined $old |
|
65
|
54 |
229 |
if (@_) |
|
67
|
32 |
22 |
if ($new =~ m[(.+)/(.+)]) |
|
86
|
49 |
129 |
if (@_) |
|
88
|
32 |
17 |
if $new[0] eq '' |
|
89
|
43 |
6 |
if (2 <= @new) |
|
103
|
25 |
23 |
if defined $seg[0] and $seg[0] eq '' |
|
105
|
10 |
38 |
if (1 == @seg) |
|
109
|
35 |
13 |
if (@seg >= 2) |
|
114
|
14 |
34 |
if (@_) |
|
116
|
3 |
11 |
unless defined $new |
|
117
|
12 |
2 |
defined $event ? : |
|
128
|
4 |
35 |
unless defined $old |
|
129
|
11 |
28 |
if (@_) |
|
132
|
8 |
3 |
if (@seg >= 2) { } |
|
|
0 |
3 |
elsif (@seg) { } |
|
139
|
0 |
3 |
if ($self->kernel and defined $new) |
|
164
|
4 |
4 |
if (@_) |
|
168
|
2 |
2 |
if (defined $new) { } |
|
|
1 |
1 |
elsif (defined $pw) { } |
|
171
|
2 |
0 |
if defined $pw |
|
179
|
5 |
3 |
if $old |
|
188
|
1 |
3 |
unless $old =~ s/^.*?:// |
|
195
|
2 |
7 |
unless $old =~ s/^.*?:// |
|
197
|
5 |
4 |
if (@_) |
|
199
|
0 |
5 |
unless defined $user |
|
201
|
3 |
2 |
if (defined $new) { } |
|
209
|
6 |
3 |
if $old |
|
217
|
9 |
20 |
unless $kernel |
|
218
|
3 |
17 |
if $kernel =~ /:\d*$/ |
|
219
|
0 |
17 |
if $kernel =~ /^\[[:0-9a-f]+\]$/i |
|
220
|
1 |
16 |
if $kernel =~ /^\d+\.\d+\.\d+\.\d+/ |
|
221
|
0 |
16 |
if $kernel =~ /^[-\w.]+$/ and $kernel =~ /[.]/ |
|
231
|
4 |
25 |
if (_is_inet($kernel)) |
|
232
|
2 |
2 |
if $other == $self |
|
236
|
2 |
1 |
if (defined $port and $port eq '' || $port == $self->default_port) |
|
237
|
0 |
2 |
if $other == $self |
|
241
|
4 |
25 |
if ($other =~ m[poe:/[^/]]) |
|
242
|
4 |
0 |
if $other == $self |
|
247
|
21 |
8 |
if (2 < @seg) |
|
248
|
16 |
5 |
if $other == $self |
|
258
|
0 |
0 |
if 1 == @_ |
|
267
|
0 |
7 |
if $POE::Kernel::poe_kernel and $POE::Kernel::poe_kernel->can('ID') |
|
271
|
2 |
0 |
if ($kernel and !$kid || $kernel ne $kid) |
|
277
|
6 |
1 |
unless wantarray |
|
286
|
0 |
7 |
if (@_) |
|
287
|
0 |
0 |
if (1 == @_) { } |
|
289
|
0 |
0 |
if (not ref $new) { } |
|
|
0 |
0 |
elsif ('ARRAY' eq ref $new) { } |
|
303
|
7 |
0 |
unless defined $old |
|
313
|
7 |
0 |
unless defined $q |
|
315
|
0 |
0 |
if ($q =~ /=/) |
|
316
|
0 |
0 |
/=/ ? : |
|
330
|
0 |
6 |
unless ref $base |
|
334
|
0 |
6 |
unless $abs->scheme |
|
337
|
9 |
9 |
if defined $f and length $f |
|
339
|
0 |
9 |
unless length $f |
|
352
|
1 |
2 |
unless ref $base |
|
359
|
0 |
0 |
unless (defined $scheme or defined $auth) |
|
370
|
0 |
9 |
unless defined $_ |
|
373
|
1 |
2 |
unless ($scheme eq $bscheme and $auth eq $bauth) |
|
383
|
0 |
8 |
unless defined $_ |
|
386
|
1 |
1 |
if ($bsession eq $session) |
|
389
|
0 |
2 |
if ($bevent eq $event) |