blib/lib/Net/NNTP/Proxy.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
condition | 0 | 117 | 0.0 |
line | l | !l | condition |
---|---|---|---|
723 | 0 | 0 | defined $pointer and scalar @articles |
line | !l | l&&!r | l&&r | condition |
---|---|---|---|---|
282 | 0 | 0 | 0 | $article and ref $article |
344 | 0 | 0 | 0 | $newsgroup and $server |
426 | 0 | 0 | 0 | $newsgroup and $server |
633 | 0 | 0 | 0 | $server and $server->connected |
723 | 0 | 0 | 0 | defined $pointer and scalar @articles and defined $server |
0 | 0 | 0 | scalar @articles and defined $server | |
734 | 0 | 0 | 0 | scalar @articles and defined $server |
766 | 0 | 0 | 0 | $id and $mid |
0 | 0 | 0 | $id and $mid and $id eq $mid |
line | l | !l | condition |
---|---|---|---|
85 | 0 | 0 | $hash{'newsservers'} || [] |
88 | 0 | 0 | $hash{'server'} || '' |
89 | 0 | 0 | $hash{'group'} || '' |
90 | 0 | 0 | $hash{'pointer'} || 0 |
91 | 0 | 0 | $hash{'articles'} || [] |
94 | 0 | 0 | $hash{'socket'} || {} |
107 | 0 | 0 | $port || 119 |
132 | 0 | 0 | $$self{'SOCKET'} || (return undef) |
133 | 0 | 0 | $fh ||= \*CLIENT |
279 | 0 | 0 | $id ||= '' |
347 | 0 | 0 | $count || 0 |
0 | 0 | $list[0] || 0 | |
479 | 0 | 0 | 'News::Article'->new(\@lines) || (return '441 Posting Failed (Article was Empty)') |
487 | 0 | 0 | $server->nntp || (next) |
518 | 0 | 0 | $number ||= 0 |
551 | 0 | 0 | $$self{'SERVER'} || (return undef) |
552 | 0 | 0 | $server->xover($range) || (return undef) |
592 | 0 | 0 | shift() || '' |
612 | 0 | 0 | $line || '' |
644 | 0 | 0 | $pattern ||= '*' |
664 | 0 | 0 | $pattern ||= '*' |
668 | 0 | 0 | $_->name || '' |
669 | 0 | 0 | $_->active($pattern) || {} |
685 | 0 | 0 | $pattern ||= '*' |
706 | 0 | 0 | $server->listgroup($group) || [] |
739 | 0 | 0 | $server->nntpstat($articles[$i]) || (next) |
759 | 0 | 0 | $id ||= '' |
780 | 0 | 0 | $$self{'SERVER'} || (return undef) |
804 | 0 | 0 | $maxconn || $Net::NNTP::Proxy::MAXCONN || 128 |
line | l | !l&&r | !l&&!r | condition |
---|---|---|---|---|
158 | 0 | 0 | 0 | $line ||= $_ |
280 | 0 | 0 | 0 | $head or $body |
405 | 0 | 0 | 0 | lc $type eq 'active' or lc $type eq '' |
0 | 0 | 0 | lc $type eq 'active.times' or $type eq 'active_times' | |
441 | 0 | 0 | 0 | $Net::NNTP::Proxy::CONNMESSAGE || "Welcome to $0" |
651 | 0 | 0 | 0 | $fullhash{$_} ||= $$hash{$_} |
673 | 0 | 0 | 0 | $fullhash{$_} ||= "@{$$hash{$_};}" |
694 | 0 | 0 | 0 | $fullhash{$_} ||= "@{$$hash{$_};}[0]" |
764 | 0 | 0 | 0 | not $id or $id =~ /^\d+$/ |
768 | 0 | 0 | 0 | $self->_article($mid, $id) || $self->badarticlenumber |