line |
true |
false |
branch |
60
|
0 |
0 |
if $Sirc::Chantrack::Debug |
65
|
0 |
0 |
unless (@_ == 1) |
69
|
0 |
0 |
$_[0] =~ /^(.*?)\@(.*)/s ? : |
73
|
0 |
0 |
unless (@_ == 4) |
80
|
0 |
0 |
if (ieq($n, $main::nick)) |
82
|
0 |
0 |
if exists $main::limit{lc $c} |
88
|
0 |
0 |
unless (exists $Sirc::Chantrack::Nick{$n}) |
92
|
0 |
0 |
if defined $uh |
100
|
0 |
0 |
unless (@_ == 2) |
106
|
0 |
0 |
if (ieq($n, $main::nick)) { } |
127
|
0 |
0 |
unless (@_ == 3) |
138
|
0 |
0 |
if (not keys %{$Sirc::Chantrack::User_chan{$n};}) { } |
149
|
0 |
0 |
if (ieq($n, $main::nick)) |
200
|
0 |
0 |
if (exists $Sirc::Chantrack::Chan_op{$c}{$main::who}) |
204
|
0 |
0 |
if (exists $Sirc::Chantrack::Chan_voice{$c}{$main::who}) |
216
|
0 |
0 |
unless $chan =~ /^[\#&]/ |
220
|
0 |
0 |
if (defined $1) |
225
|
0 |
0 |
$type =~ /[bkov]/ ? : |
|
0 |
0 |
$type eq 'l' && $add ? : |
234
|
0 |
0 |
if ($type eq 'o') { } |
|
0 |
0 |
elsif ($type eq 'v') { } |
|
0 |
0 |
elsif ($type eq 'l') { } |
235
|
0 |
0 |
if ($add and not $Sirc::Chantrack::Chan_op{$chan}{$arg}) { } |
|
0 |
0 |
elsif (not $add and $Sirc::Chantrack::Chan_op{$chan}{$arg}) { } |
248
|
0 |
0 |
if ($add and not $Sirc::Chantrack::Chan_voice{$chan}{$arg}) { } |
|
0 |
0 |
elsif (not $add and $Sirc::Chantrack::Chan_voice{$chan}{$arg}) { } |
262
|
0 |
0 |
if ($add) { } |
282
|
0 |
0 |
unless (@_ == 3) |
288
|
0 |
0 |
if ($flag eq '@') |
289
|
0 |
0 |
unless (exists $Sirc::Chantrack::Chan_op{$c}{$n}) |
297
|
0 |
0 |
if (exists $Sirc::Chantrack::Chan_op{$c}{$n}) |
302
|
0 |
0 |
if ($flag eq '+') |
303
|
0 |
0 |
unless (exists $Sirc::Chantrack::Chan_voice{$c}{$n}) |
311
|
0 |
0 |
if (exists $Sirc::Chantrack::Chan_voice{$c}{$n}) |
320
|
0 |
0 |
unless $Sirc::Chantrack::Channel{$chan} |
323
|
0 |
0 |
$who =~ s/^([+\@])// ? : |
324
|
0 |
0 |
unless (exists $Sirc::Chantrack::Chan_user{$chan}{$who}) |
334
|
0 |
0 |
unless (@_ == 2 or @_ == 3) |
342
|
0 |
0 |
ref $n ? : |
347
|
0 |
0 |
if (not plausible_nick($n)) { } |
|
0 |
0 |
elsif ($Sirc::Chantrack::Userhost{$n}) { } |
384
|
0 |
0 |
if @repl |
387
|
0 |
0 |
unless /^(\S+?)\*?=[+\-](.*?)\@(.*)/ |
395
|
0 |
0 |
unless (@Sirc::Chantrack::Pend_userhost) |
401
|
0 |
0 |
unless ($Sirc::Chantrack::Pend_userhost[0][2]{lc $n}) |
416
|
0 |
0 |
if exists $Sirc::Chantrack::Nick{$n} |
437
|
0 |
0 |
$Sirc::Chantrack::Chan_voice{$chan}{$user} ? : |
|
0 |
0 |
$Sirc::Chantrack::Chan_op{$chan}{$user} ? : |
450
|
0 |
0 |
unless $d[0][1] eq $d[1][1] |