line |
true |
false |
branch |
18
|
0 |
0 |
ref $_[0] eq 'Mojo::IRC::Server::Chinese::User' ? : |
19
|
0 |
0 |
if not $s->is_has_user($uid) |
23
|
0 |
0 |
ref $_[0] eq 'Mojo::IRC::Server::Chinese::User' ? : |
25
|
0 |
0 |
if ($uid eq $s->user->[$i]) |
27
|
0 |
0 |
if (@{$s->user;} == 0 and not $s->mode =~ /P/) |
36
|
0 |
0 |
ref $_[0] eq 'Mojo::IRC::Server::Chinese::User' ? : |
37
|
0 |
0 |
if (defined $uid) { } |
38
|
0 |
0 |
&first(sub {
$uid eq $_;
}
, @{$s->user;}) ? : |
57
|
0 |
0 |
if substr($mode, 0, 1) ne '+' and substr($mode, 0, 1) ne '-' |
59
|
0 |
0 |
if (substr($mode, 0, 1) eq '+') { } |
|
0 |
0 |
elsif (substr($mode, 0, 1) eq '-') { } |
79
|
0 |
0 |
if defined $user |
95
|
0 |
0 |
if $user->id eq $except_user->id |