| line |
true |
false |
branch |
|
202
|
2 |
17 |
unless length $line |
|
231
|
14 |
3 |
defined $prefix_nick ? : |
|
241
|
16 |
1 |
if (my $named_args = $message->named_args) |
|
245
|
2 |
15 |
if (defined $hints->{'text'} and my $encoder = $self->encoder) |
|
249
|
2 |
15 |
if (defined(my $target_name = $hints->{'target_name'})) |
|
255
|
0 |
17 |
if $self->can($prepare_method) |
|
257
|
97 |
21 |
unless /_nick$/ |
|
259
|
3 |
37 |
unless defined $name |
|
260
|
17 |
20 |
if $k eq 'prefix_name' |
|
266
|
0 |
17 |
if (my $disp = $message->gate_disposition) |
|
268
|
0 |
0 |
$type eq '!' ? : |
|
|
0 |
0 |
$type eq '+' ? : |
|
|
0 |
0 |
$type eq '-' ? : |
|
272
|
0 |
0 |
if $self->invoke("on_message_gate_${effect}_$gate", $message, $hints) |
|
273
|
0 |
0 |
if $self->invoke("on_message_gate_$effect", $gate, $message, $hints) |
|
274
|
0 |
0 |
if $self->invoke('on_message_gate', $effect, $gate, $message, $hints) |
|
277
|
8 |
9 |
if $self->invoke("on_message_$command", $message, $hints) |
|
278
|
14 |
3 |
if $self->invoke('on_message', $command, $message, $hints) |
|
280
|
0 |
17 |
if (not $hints->{'handled'} and $message->command ne $command) |
|
282
|
0 |
0 |
if $self->invoke("on_message_$numeric", $message, $hints) |
|
283
|
0 |
0 |
if $self->invoke('on_message', $numeric, $message, $hints) |
|
306
|
0 |
4 |
if (@_ == 1) { } |
|
312
|
1 |
3 |
if (my $encoder = $self->encoder) |
|
315
|
1 |
0 |
if (defined(my $i = $argnames->{'text'})) |
|
316
|
1 |
0 |
if defined $args[$i] |
|
384
|
3 |
103 |
unless defined $nick |
|
389
|
100 |
3 |
if $mapping ne 'ascii' |
|
393
|
101 |
2 |
unless $mapping eq 'strict-rfc1459' |
|
413
|
0 |
4 |
unless defined $lhs and defined $rhs |
|
416
|
0 |
4 |
if $lhs eq '' and $rhs eq '' |
|
417
|
0 |
4 |
if $rhs eq '' |
|
418
|
0 |
4 |
if $lhs eq '' |
|
422
|
0 |
4 |
unless (my $lhs_index = index($PREFIX_FLAGS, $lhs)) > -1 |
|
423
|
1 |
3 |
unless (my $rhs_index = index($PREFIX_FLAGS, $rhs)) > -1 |
|
443
|
0 |
4 |
unless defined $lhs and defined $rhs |
|
447
|
0 |
4 |
unless (my $lhs_index = index($PREFIX_MODES, $lhs)) > -1 |
|
448
|
1 |
3 |
unless (my $rhs_index = index($PREFIX_MODES, $rhs)) > -1 |
|
502
|
8 |
6 |
if $name =~ $self->isupport('channame_re') |
|
639
|
5 |
5 |
if ($type eq 'channel') { } |
|
|
5 |
0 |
elsif ($type eq 'user') { } |
|
651
|
2 |
8 |
if ($text =~ /^\x01(.*)\x01$/) { } |
|
656
|
1 |
1 |
$is_notice ? : |
|
658
|
0 |
2 |
if $self->invoke("on_message_${ctcptype}_$verb", $message, \%hints) |
|
659
|
0 |
2 |
if $self->invoke("on_message_$ctcptype", $verb, $message, \%hints) |
|
660
|
2 |
0 |
if $self->invoke('on_message', "$ctcptype $verb", $message, \%hints) |
|
665
|
1 |
7 |
if $self->invoke('on_message_text', $message, \%hints) |
|
666
|
4 |
4 |
if $self->invoke('on_message', 'text', $message, \%hints) |
|
719
|
19 |
37 |
unless $self->can($name) |