line |
true |
false |
branch |
74
|
0 |
0 |
if $weakself |
132
|
0 |
0 |
if length $$self{'status'} |
134
|
0 |
0 |
if $$self{'widget_netname'} |
156
|
0 |
0 |
if exists $$self{'channels'}{$channame_folded} |
198
|
0 |
0 |
unless (defined $nick and length $nick) |
206
|
0 |
0 |
if exists $$self{'users'}{$nick_folded} |
247
|
0 |
0 |
if ($type eq 'channel') { } |
|
0 |
0 |
elsif ($type eq 'user') { } |
266
|
0 |
0 |
if ($type eq 'channel') { } |
|
0 |
0 |
elsif ($type eq 'user') { } |
287
|
0 |
0 |
if ($args{'SSL'} and not eval {
do {
require IO::Async::SSL
}
}) |
291
|
0 |
0 |
unless $irc->loop |
318
|
0 |
0 |
$args{'SSL'} ? : |
350
|
0 |
0 |
if $colcode =~ /^#[0-9a-f]{6}/i |
351
|
0 |
0 |
if $colcode =~ /^#([0-9a-f])([0-9a-f])([0-9a-f])/i |
353
|
0 |
0 |
if $colcode =~ /^(\d\d?)/ and defined $irc_colour_map[$1] |
396
|
0 |
0 |
if ($text =~ s/^([\x00-\x1f])//) { } |
399
|
0 |
0 |
if ($ctrl eq 'B') { } |
|
0 |
0 |
elsif ($ctrl eq 'U' or $ctrl eq '_') { } |
|
0 |
0 |
elsif ($ctrl eq 'R' or $ctrl eq ']') { } |
|
0 |
0 |
elsif ($ctrl eq 'V') { } |
|
0 |
0 |
elsif ($ctrl eq 'O') { } |
|
0 |
0 |
elsif ($ctrl eq 'C') { } |
|
0 |
0 |
elsif ($ctrl eq 'D') { } |
400
|
0 |
0 |
$format{'b'} ? : |
403
|
0 |
0 |
$format{'u'} ? : |
406
|
0 |
0 |
$format{'i'} ? : |
409
|
0 |
0 |
$format{'rv'} ? : |
417
|
0 |
0 |
if ($text =~ s/^($colourre),($colourre)//) { } |
|
0 |
0 |
elsif ($text =~ s/^($colourre)//) { } |
418
|
0 |
0 |
if $$self{'use_mirc_colours'} |
419
|
0 |
0 |
if $$self{'use_mirc_colours'} |
422
|
0 |
0 |
if $$self{'use_mirc_colours'} |
430
|
0 |
0 |
if ($text =~ s/^b//) { } |
|
0 |
0 |
elsif ($text =~ s/^c//) { } |
|
0 |
0 |
elsif ($text =~ s/^d//) { } |
|
0 |
0 |
elsif ($text =~ s/^g//) { } |
431
|
0 |
0 |
$format{'u'} ? : |
434
|
0 |
0 |
$format{'b'} ? : |
437
|
0 |
0 |
$format{'i'} ? : |
445
|
0 |
0 |
if ($fg > 0) |
448
|
0 |
0 |
if ($bg > 0) |
465
|
0 |
0 |
if ($piece =~ s[^(.*?)(?
|
468
|
0 |
0 |
if length $pre |
545
|
0 |
0 |
if ($spec =~ /^"/) { } |
|
0 |
0 |
elsif ($spec =~ m[^/]) { } |
557
|
0 |
0 |
if $spec =~ s/^i// |
559
|
0 |
0 |
if $iflag |
569
|
0 |
0 |
if ($type eq 'literal') { } |
|
0 |
0 |
elsif ($type eq 're') { } |
575
|
0 |
0 |
if $pattern =~ /^\(\?-xism:(.*)\)$/ |
576
|
0 |
0 |
if $pattern =~ /^\(\?i-xsm:(.*)\)$/ |
590
|
0 |
0 |
if ($type eq 'literal') { } |
|
0 |
0 |
elsif ($type eq 're') { } |
607
|
0 |
0 |
if (defined $spec and $spec =~ /^"/) |
622
|
0 |
0 |
if defined $name |
631
|
0 |
0 |
unless ($$event{'target_type'} || '') eq 'channel' |
633
|
0 |
0 |
unless defined $name |
699
|
0 |
0 |
if ($spec eq 'self') { } |
|
0 |
0 |
elsif ($spec eq 'server') { } |
761
|
0 |
0 |
if (defined $$hints{'target_name'}) { } |
|
0 |
0 |
elsif (grep {$command eq $_;} 'NICK', 'QUIT') { } |
|
0 |
0 |
elsif ($self->can("on_message_$command")) { } |
764
|
0 |
0 |
if ($$hints{'target_type'} eq 'channel') { } |
|
0 |
0 |
elsif ($$hints{'target_is_me'} and defined $$hints{'prefix_name'} and not $$hints{'prefix_is_me'}) { } |
|
0 |
0 |
elsif ($$hints{'target_type'} eq 'user') { } |
778
|
0 |
0 |
if ($target) |
779
|
0 |
0 |
if $target->on_message($command, $message, $hints) |
788
|
0 |
0 |
if $self->can($method) and $self->$method($message, $hints) |
791
|
0 |
0 |
if $target->$method($message, $hints) |
796
|
0 |
0 |
if (my $userobj = $self->get_user_if_exists($$hints{'prefix_nick'})) |
797
|
0 |
0 |
if $userobj->$method($message, $hints) |
800
|
0 |
0 |
if $handled |
806
|
0 |
0 |
if $handled |
809
|
0 |
0 |
if (not $$hints{'handled'} || $$hints{'synthesized'}) |
824
|
0 |
0 |
if ($$hints{'prefix_is_me'}) |
874
|
0 |
0 |
unless my $f = delete $$self{'whois_gate_f'}{$$hints{'target_name_folded'}} |
896
|
0 |
0 |
unless ($$self{'no_reconnect_on_close'}) |
899
|
0 |
0 |
unless $$self{'reconnect_timer'}->is_running |
949
|
0 |
0 |
if ($lag > 1) { } |
972
|
0 |
0 |
unless $_ |
975
|
0 |
0 |
$_ ? : |
978
|
0 |
0 |
unless $_ |
981
|
0 |
0 |
$_ ? : |
995
|
0 |
0 |
if (defined $newnick) |
1018
|
0 |
0 |
if (not defined $host) { } |
1019
|
0 |
0 |
unless (@{$$self{'servers'};}) |
1031
|
0 |
0 |
unless $s |
1083
|
0 |
0 |
if ($irc->read_handle) { } |
1084
|
0 |
0 |
defined $message ? : |
1091
|
0 |
0 |
if $timer->is_running |
1133
|
0 |
0 |
unless my $chanobj = $self->get_channel_if_exists($channel) |
1175
|
0 |
0 |
if (my $targetobj = $self->get_target_if_exists($target)) { } |
1194
|
0 |
0 |
if (my $targetobj = $self->get_target_if_exists($target)) { } |
1229
|
0 |
0 |
unless length $message |
1272
|
0 |
0 |
ref $val eq 'ARRAY' ? : |
1292
|
0 |
0 |
$_ ? : |
1295
|
0 |
0 |
$_ ? : |
1312
|
0 |
0 |
unless my $chan = $self->get_channel_if_exists($name) |
1326
|
0 |
0 |
unless my $chanobj = $self->get_channel_if_exists($name) |
1329
|
0 |
0 |
if exists $$def{$_} |
1343
|
0 |
0 |
if exists $$def{$_} |
1389
|
0 |
0 |
if exists $$items{$name} and $$items{$name}->get_prop_real |
1392
|
0 |
0 |
if $create |
1447
|
0 |
0 |
$_[1] ? : |
1469
|
0 |
0 |
if length $$self{'status'} |