|  line  | 
 true  | 
 false  | 
 branch  | 
 
| 
73
 | 
 1  | 
 0  | 
 unless $main::version or $main::version  | 
 
| 
90
 | 
 1  | 
 0  | 
 unless defined $main::add_ons and $main::add_ons =~ /\blibsirc\b/  | 
 
| 
95
 | 
 0  | 
 1  | 
 if 'Locker:  ' =~ /: \S/  | 
 
| 
160
 | 
 0  | 
 6  | 
 if $Sirc::Util::Debug  | 
 
| 
186
 | 
 0  | 
 0  | 
 unless defined $fn  | 
 
| 
202
 | 
 0  | 
 1  | 
 unless (@_ == 1)  | 
 
| 
217
 | 
 0  | 
 0  | 
 unless (@_ == 1)  | 
 
| 
256
 | 
 0  | 
 6  | 
 unless @_ == 1  | 
 
| 
282
 | 
 0  | 
 1  | 
 unless @_ == 2 or @_ == 3  | 
 
| 
284
 | 
 0  | 
 1  | 
 @_ == 1 ? :  | 
 
| 
287
 | 
 0  | 
 1  | 
 if ($cmd =~ /^set (.*)/) { }  | 
 
| 
300
 | 
 0  | 
 1  | 
 if (@main::help and not $$rseen{$seen_tag}++)  | 
 
| 
312
 | 
 0  | 
 0  | 
 if ($state == 0) { }  | 
 
| 
 | 
 0  | 
 0  | 
 elsif ($state == 1) { }  | 
 
| 
 | 
 0  | 
 0  | 
 elsif ($state == 2) { }  | 
 
| 
313
 | 
 0  | 
 0  | 
 if $_ eq $targ  | 
 
| 
316
 | 
 0  | 
 0  | 
 if ($_ eq $intro) { }  | 
 
| 
 | 
 0  | 
 0  | 
 elsif (/^@/) { }  | 
 
| 
328
 | 
 0  | 
 0  | 
 if (/^@/) { }  | 
 
| 
337
 | 
 0  | 
 0  | 
 if (defined $first)  | 
 
| 
344
 | 
 0  | 
 0  | 
 if length $_ > $l  | 
 
| 
351
 | 
 0  | 
 0  | 
 if (length($out[$#out]) + length($this) > $w)  | 
 
| 
356
 | 
 0  | 
 0  | 
 if ($out[$#out] eq '')  | 
 
| 
389
 | 
 0  | 
 0  | 
 unless (@_ == 3)  | 
 
| 
398
 | 
 0  | 
 0  | 
 if ($h =~ /^(\d+\.\d+\.\d+)\.\d+$/) { }  | 
 
| 
 | 
 0  | 
 0  | 
 elsif ($h =~ /^[^.]+\.(.+\..+)$/) { }  | 
 
| 
 | 
 0  | 
 0  | 
 elsif ($h =~ /^[^.]+\.[^.]+$/) { }  | 
 
| 
422
 | 
 0  | 
 0  | 
 unless (@_ == 0 or @_ == 3)  | 
 
| 
426
 | 
 0  | 
 0  | 
 @_ ? :  | 
 
| 
428
 | 
 0  | 
 0  | 
 $u eq '' ? :  | 
 
| 
444
 | 
 0  | 
 0  | 
 unless (@_ >= 1)  | 
 
| 
452
 | 
 0  | 
 0  | 
 ref $code ? :  | 
 
| 
466
 | 
 0  | 
 0  | 
 unless (@_ >= 2)  | 
 
| 
473
 | 
 0  | 
 0  | 
 if ($@)  | 
 
| 
489
 | 
 0  | 
 0  | 
 unless (@_ == 1)  | 
 
| 
495
 | 
 0  | 
 0  | 
 unless ($main::haveops{lc $c})  | 
 
| 
511
 | 
 0  | 
 0  | 
 unless (@_ == 1)  | 
 
| 
527
 | 
 0  | 
 0  | 
 unless (@_ == 2)  | 
 
| 
545
 | 
 0  | 
 6  | 
 unless (@_ == 1)  | 
 
| 
576
 | 
 0  | 
 0  | 
 unless (@_ == 0)  | 
 
| 
582
 | 
 0  | 
 0  | 
 unless ($main::args =~ /^[\#&]/)  | 
 
| 
583
 | 
 0  | 
 0  | 
 unless ($main::talkchannel)  | 
 
| 
599
 | 
 0  | 
 0  | 
 unless (@_ == 0)  | 
 
| 
606
 | 
 0  | 
 0  | 
 unless grep {$_ == $n;} @main::trefs  | 
 
| 
618
 | 
 0  | 
 0  | 
 unless (@_ == 1)  | 
 
| 
638
 | 
 0  | 
 0  | 
 unless (@_ == 1)  | 
 
| 
661
 | 
 0  | 
 0  | 
 if (@arg > 1 and ref $arg[1])  | 
 
| 
763
 | 
 0  | 
 0  | 
 if ($lval eq 'on') { }  | 
 
| 
 | 
 0  | 
 0  | 
 elsif ($lval eq 'off') { }  | 
 
| 
 | 
 0  | 
 0  | 
 elsif ($lval eq 'toggle') { }  | 
 
| 
 | 
 0  | 
 0  | 
 elsif ($lval eq 'nil') { }  | 
 
| 
779
 | 
 0  | 
 0  | 
 if ($rvalidate and not &$rvalidate($name, $new))  | 
 
| 
784
 | 
 0  | 
 0  | 
 $$rvar ? :  | 
 
| 
787
 | 
 4  | 
 5  | 
 $$rvar ? :  | 
 
| 
807
 | 
 0  | 
 0  | 
 if (not defined $val) { }  | 
 
| 
 | 
 0  | 
 0  | 
 elsif (not $val =~ /^-?\d+$/ or $rvalidate and not &$rvalidate($name, $val)) { }  | 
 
| 
839
 | 
 0  | 
 0  | 
 if (not defined $val) { }  | 
 
| 
 | 
 0  | 
 0  | 
 elsif ($rvalidate and not &$rvalidate($name, $val)) { }  | 
 
| 
911
 | 
 0  | 
 6  | 
 unless (@_ == 1)  | 
 
| 
917
 | 
 0  | 
 6  | 
 if (exists $Sirc::Util::Hook{$hook})  | 
 
| 
934
 | 
 0  | 
 4  | 
 unless (@_ == 2)  | 
 
| 
940
 | 
 0  | 
 4  | 
 unless (exists $Sirc::Util::Hook{$hook})  | 
 
| 
954
 | 
 0  | 
 0  | 
 unless (@_ >= 1)  | 
 
| 
960
 | 
 0  | 
 0  | 
 unless (exists $Sirc::Util::Hook{$hook})  |