Branch Coverage

blib/lib/POE/Component/Server/NNTP.pm
Criterion Covered Total %
branch 46 80 57.5


line true false branch
17 7 1 unless defined $opts{'posting'} and not $opts{'posting'}
18 6 2 unless defined $opts{'handle_connects'} and not $opts{'handle_connects'}
19 7 1 unless defined $opts{'extra_cmds'} and ref $opts{'extra_cmds'} eq 'ARRAY'
23 8 0 ref $options eq 'HASH' ? :
43 0 414 unless $wheel_id and defined $self->{'clients'}{$wheel_id}
51 1 6 unless grep {$_ eq $cmd;} @{$$self{'cmds'};}, @{$$self{'extra_cmds'};}
63 7 1 if ($self->{'alias'}) { }
69 8 0 if ($kernel != $sender)
85 7 1 defined $self->{'address'} ? :
8 0 defined $self->{'port'} ? :
110 0 7 unless $wheel
138 0 381 unless $self->_conn_exists($id)
140 374 7 if ($self->{'clients'}{$id}{'post_buffer'})
141 2 372 if ($input eq '.')
155 0 7 unless $cmd
156 1 6 unless ($self->_valid_cmd($cmd))
161 3 3 if ($cmd eq 'quit')
172 0 0 unless $self->_conn_exists($id)
180 0 16 unless $self->_conn_exists($id)
181 13 3 unless $self->{'clients'}{$id}{'quit'}
189 0 1 unless $self->_conn_exists($id)
201 1 7 unless $self->{'alias'}
211 0 0 unless (@events)
219 0 0 unless /^_/
222 0 0 unless ($self->{'sessions'}{$sender_id}{'refcnt'}++ or $session == $sender)
235 0 0 unless (@events)
249 0 0 unless /^_/
251 0 0 unless ($blah)
255 0 0 if (--$self->{'sessions'}{$sender_id}{'refcnt'} <= 0)
257 0 0 unless ($session == $sender)
269 8 0 if (--$self->{'sessions'}{$session_id}{'refcnt'} <= 0)
271 8 0 unless $session_id eq $nntpd_id
302 0 24 if $self->_pluggable_process('NNTPD', $event, \(@args), \@extra_args) == 4
304 0 24 if scalar @extra_args
319 0 16 unless $self->_conn_exists($id)
320 0 16 unless $output
322 0 16 if $self->_pluggable_process('NNTPC', 'response', $id, \$output) == 4
331 2 5 unless $self->{'handle_connects'}
332 4 1 if ($self->{'posting'}) { }
346 14 2 unless $code and $code eq '340' || $code eq '335'