Branch Coverage

blib/lib/Bot/Pastebot/Client/Irc.pm
Criterion Covered Total %
branch 0 84 0.0


line true false branch
131 0 0 unless $$heap{'seen_traffic'}
142 0 0 if ($chosen_server =~ s/[\s\:]+(\S+)\s*$//)
164 0 0 if $$heap{'server_index'} >= @{$conf{'server'};}
180 0 0 if ($msg =~ /^\s*help(?:\s+(\w+))?\s*$/) { }
0 0 elsif ($msg =~ /^\s*ignore\s/) { }
0 0 elsif ($msg =~ /^\s*ignores\s/) { }
0 0 elsif ($msg =~ /^\s*delete\s/) { }
0 0 elsif ($msg =~ /^\s*uptime\s*$/) { }
182 0 0 if ($helptext{$what})
187 0 0 unless ($msg =~ /^\s*ignore\s+(\S+)(?:\s+(\S+))?\s*$/)
194 0 0 unless ($mask =~ /^-?\d+(\.(\*|\d+)){3}$/ or $mask eq '-')
203 0 0 if ($channels) { }
210 0 0 if exists $$heap{'users'}{$_}{$nick}{'mode'}
214 0 0 unless @igchans
216 0 0 if ($mask eq '-') { }
0 0 elsif ($mask =~ /^-(.*)$/) { }
244 0 0 unless ($msg =~ /^\s*ignores\s+(\#\S+)\s*$/)
250 0 0 unless (@masks)
255 0 0 unless length $text < 100
259 0 0 unless ($msg =~ /^\s*delete\s+(\d+)\s*$/)
266 0 0 if (defined $paste_chan) { }
267 0 0 if ($$heap{'users'}{$paste_chan}{$nick}{'mode'} =~ /@/) { }
268 0 0 unless delete_paste($conf{'name'}, $paste_chan, $pasteid, $nick)
316 0 0 if ($$heap{'nick_index'} >= @{$conf{'nick'};})
336 0 0 unless (grep(($_ eq lc $totry), @nicklist))
360 0 0 if (defined $conf{'flags'})
370 0 0 if (defined $conf{'nickserv_pass'})
386 0 0 if (my $data = $irc->nick_info($nick))
391 0 0 if ($nick eq 'Someone' or $irc->is_channel_member($channel, $nick))
421 0 0 if ($conf{'join_cfg_only'} and 1 > grep(($_ eq $where), @{$conf{'channel'};})) { }
433 0 0 if (lc $nick eq lc $$heap{'my_nick'})
446 0 0 if (lc $nick eq lc $$heap{'my_nick'})
485 0 0 if $_ eq '-' or $_ eq '+'
486 0 0 if (/[bklovehI]/)
488 0 0 if ($_ eq 'o')
489 0 0 if ($set eq '+') { }
490 0 0 unless $$heap{'users'}{$location}{$target}{'mode'} =~ /\@/
554 0 0 if (my $part = int $secs / 604800)
560 0 0 if (my $part = int $secs / 86400)
566 0 0 if (my $part = int $secs / 3600)
572 0 0 if (my $part = int $secs / 60)
578 0 0 if ($secs or not @fields)