Branch Coverage

lib/POE/Filter/IRCv3.pm
Criterion Covered Total %
branch 40 54 74.1


line true false branch
6 1 0 if (eval {
41 0 0 if defined $value
47 1 1 if defined $value
59 1 0 @{$$self[2];} ? :
65 0 35 if $_[0][1]
66 32 3 if (my $event = _parseline($raw_line)) { }
78 2 0 if (my $raw_line = shift @{$$self[2];})
79 0 2 if $$self[1]
80 2 0 if (my $event = _parseline($raw_line)) { }
99 19 0 if (ref $event eq 'HASH') { }
102 2 17 if ($$event{'tags'} and my(@tags) = %{$$event{'tags'};})
105 4 2 defined $thisval ? :
106 4 2 if @tags
111 12 7 if $$event{'prefix'}
114 17 2 if ($$event{'params'} and my(@params) = @{$$event{'params'};})
121 3 5 defined $$event{'colonify'} ? :
14 3 if index($param, ' ') != -1 or defined $$event{'colonify'} ? $$event{'colonify'} : $$self[0]
131 0 19 if $$self[1]
134 0 0 if ref $event eq 'SCALAR'
154 17 20 if (substr($raw_line, 0, 1) eq '@')
155 0 17 unless (my $nextsp = index($raw_line, ' ')) > 0
167 25 12 if (substr($raw_line, $pos, 1) eq ':')
169 3 22 unless ($nextsp = index($raw_line, ' ', $pos)) > 0 and length($event{'prefix'} = substr($raw_line, $pos + 1, $nextsp - $pos - 1))
177 3 31 if (($nextsp_maybe = index($raw_line, ' ', $pos)) == -1)
180 3 0 length $cmd ? :
193 21 33 if (substr($raw_line, $pos, 1) eq ':')
197 9 24 if ((my $nextsp = index($raw_line, ' ', $pos)) == -1) { }