Branch Coverage

blib/lib/POE/Filter/IRC/P10.pm
Criterion Covered Total %
branch 12 38 31.5


line true false branch
31 0 0 if @_
44 0 2 if $self->{'debug'}
45 0 2 unless $line =~ /\S/
47 0 2 if ($line =~ /^(\S+) G (.+)$/) { }
0 2 elsif ($line =~ /^(\S+) +(P|O) +(\S+) +(.+)$/) { }
0 2 elsif ($line =~ /^(\S+) +(\d+) +(\S+) +(.+)$/) { }
0 2 elsif ($line =~ /^(\S+) +(M|OM) +(\S+) +(.+)$/) { }
0 2 elsif ($line =~ /^(\S+) +K +(\S+) +(\S+) +(.+)$/) { }
0 2 elsif ($line =~ /^(\S+) +T +(\S+) +(.+)$/) { }
0 2 elsif ($line =~ /^(\S+) +I +(\S+) +(.+)$/) { }
0 2 elsif ($line =~ /^SERVER +(.+)$/) { }
2 0 elsif ($line =~ /^(\S+) +(\S+) +(.+)$/) { }
0 0 elsif ($line =~ /^NOTICE +\S+ +(.+)$/) { }
0 0 elsif ($line =~ /^ERROR +(.+)$/) { }
0 0 elsif ($line =~ /^(\S+) +(EB|EA)/) { }
0 0 elsif ($line =~ /^PASS +(\S+)$/) { }
52 0 0 if ($2 eq 'O') { }
0 0 elsif (index($3, '#') >= 0 or index($3, '&') >= 0 or index($3, '+') >= 0) { }
90 0 2 unless (grep {$_ eq lc $2;} 'n', 'j', 'q', 'l', 'z', 'r', 'eb', 'b', 's', 'sq', 'w', 'ac', 'cm', 'gl', 'c', 'ds', 'd')