line |
true |
false |
branch |
194
|
2 |
62 |
unless length $line |
202
|
26 |
35 |
defined $prefix_nick ? : |
213
|
53 |
8 |
if (my $named_args = $message->named_args) |
217
|
2 |
59 |
if (defined $$hints{'text'} and my $encoder = $self->encoder) |
221
|
25 |
36 |
if (defined(my $target_name = $$hints{'target_name'})) |
229
|
12 |
49 |
if $self->can($prepare_method) |
231
|
477 |
68 |
unless /_nick$/ |
235
|
15 |
46 |
if (my $disp = $message->gate_disposition) |
237
|
0 |
0 |
$type eq '!' ? : |
|
5 |
0 |
$type eq '+' ? : |
|
10 |
5 |
$type eq '-' ? : |
241
|
0 |
15 |
if $self->invoke("on_message_gate_${effect}_$gate", $message, $hints) |
242
|
0 |
15 |
if $self->invoke("on_message_gate_$effect", $gate, $message, $hints) |
243
|
15 |
0 |
if $self->invoke('on_message_gate', $effect, $gate, $message, $hints) |
246
|
15 |
46 |
if $self->invoke("on_message_$command", $message, $hints) |
247
|
36 |
25 |
if $self->invoke('on_message', $command, $message, $hints) |
249
|
4 |
57 |
if (not $$hints{'handled'} and $message->command ne $command) |
251
|
0 |
4 |
if $self->invoke("on_message_$numeric", $message, $hints) |
252
|
0 |
4 |
if $self->invoke('on_message', $numeric, $message, $hints) |
274
|
0 |
22 |
if (@_ == 1) { } |
280
|
1 |
21 |
if (my $encoder = $self->encoder) |
283
|
1 |
0 |
if (defined(my $i = $$argnames{'text'})) |
284
|
1 |
0 |
if defined $args[$i] |
346
|
35 |
271 |
unless defined $nick |
351
|
268 |
3 |
if $mapping ne 'ascii' |
355
|
269 |
2 |
unless $mapping eq 'strict-rfc1459' |
373
|
0 |
4 |
unless defined $lhs and defined $rhs |
376
|
0 |
4 |
if $lhs eq '' and $rhs eq '' |
377
|
0 |
4 |
if $rhs eq '' |
378
|
0 |
4 |
if $lhs eq '' |
382
|
0 |
4 |
unless (my $lhs_index = index($PREFIX_FLAGS, $lhs)) > -1 |
383
|
1 |
3 |
unless (my $rhs_index = index($PREFIX_FLAGS, $rhs)) > -1 |
401
|
0 |
4 |
unless defined $lhs and defined $rhs |
405
|
0 |
4 |
unless (my $lhs_index = index($PREFIX_MODES, $lhs)) > -1 |
406
|
1 |
3 |
unless (my $rhs_index = index($PREFIX_MODES, $rhs)) > -1 |
454
|
26 |
11 |
if $name =~ $self->isupport('channame_re') |
589
|
5 |
5 |
if ($type eq 'channel') { } |
|
5 |
0 |
elsif ($type eq 'user') { } |
601
|
2 |
8 |
if ($text =~ /^\x01(.*)\x01$/) { } |
606
|
1 |
1 |
$is_notice ? : |
608
|
0 |
2 |
if $self->invoke("on_message_${ctcptype}_$verb", $message, \%hints) |
609
|
0 |
2 |
if $self->invoke("on_message_$ctcptype", $verb, $message, \%hints) |
610
|
2 |
0 |
if $self->invoke('on_message', "$ctcptype $verb", $message, \%hints) |
615
|
1 |
7 |
if $self->invoke('on_message_text', $message, \%hints) |
616
|
4 |
4 |
if $self->invoke('on_message', 'text', $message, \%hints) |
663
|
94 |
100 |
unless $self->can($name) |