| line |
true |
false |
branch |
|
108
|
0 |
0 |
if $server |
|
109
|
0 |
0 |
$server ? : |
|
120
|
0 |
0 |
$$self{'SOCKET'} ? : |
|
145
|
0 |
0 |
unless $fh |
|
146
|
0 |
0 |
unless defined fileno $fh |
|
162
|
0 |
0 |
if (lc $command eq 'authinfo') { } |
|
|
0 |
0 |
elsif (lc $command eq 'article') { } |
|
|
0 |
0 |
elsif (lc $command eq 'body') { } |
|
|
0 |
0 |
elsif (lc $command eq 'date') { } |
|
|
0 |
0 |
elsif (lc $command eq 'group') { } |
|
|
0 |
0 |
elsif (lc $command eq 'head') { } |
|
|
0 |
0 |
elsif (lc $command eq 'help') { } |
|
|
0 |
0 |
elsif (lc $command eq 'ihave') { } |
|
|
0 |
0 |
elsif (lc $command eq 'last') { } |
|
|
0 |
0 |
elsif (lc $command eq 'list') { } |
|
|
0 |
0 |
elsif (lc $command eq 'listgroup') { } |
|
|
0 |
0 |
elsif (lc $command eq 'mode') { } |
|
|
0 |
0 |
elsif (lc $command eq 'newgroups') { } |
|
|
0 |
0 |
elsif (lc $command eq 'newnews') { } |
|
|
0 |
0 |
elsif (lc $command eq 'next') { } |
|
|
0 |
0 |
elsif (lc $command eq 'post') { } |
|
|
0 |
0 |
elsif (lc $command eq 'slave') { } |
|
|
0 |
0 |
elsif (lc $command eq 'stat') { } |
|
|
0 |
0 |
elsif (lc $command eq 'xgtitle') { } |
|
|
0 |
0 |
elsif (lc $command eq 'xhdr') { } |
|
|
0 |
0 |
elsif (lc $command eq 'xover') { } |
|
|
0 |
0 |
elsif (lc $command eq 'xpat') { } |
|
|
0 |
0 |
elsif (lc $command eq 'xpath') { } |
|
|
0 |
0 |
elsif (lc $command eq 'quit') { } |
|
280
|
0 |
0 |
unless $head or $body |
|
282
|
0 |
0 |
if ($article and ref $article) { } |
|
|
0 |
0 |
elsif ($article) { } |
|
283
|
0 |
0 |
$id =~ /^\d+$/ ? : |
|
287
|
0 |
0 |
if ($head) { } |
|
288
|
0 |
0 |
$body ? : |
|
291
|
0 |
0 |
if $body |
|
296
|
0 |
0 |
if ($head) |
|
299
|
0 |
0 |
if $body |
|
303
|
0 |
0 |
if ($body) |
|
304
|
0 |
0 |
if $body |
|
306
|
0 |
0 |
wantarray ? : |
|
342
|
0 |
0 |
unless $group |
|
344
|
0 |
0 |
unless $newsgroup and $server |
|
347
|
0 |
0 |
$count ? : |
|
383
|
0 |
0 |
if ($$self{'POINTER'} < 0) { } |
|
|
0 |
0 |
elsif ($$self{'POINTER'} == 0) { } |
|
405
|
0 |
0 |
if (lc $type eq 'active' or lc $type eq '') { } |
|
|
0 |
0 |
elsif (lc $type eq 'active.times' or $type eq 'active_times') { } |
|
|
0 |
0 |
elsif (lc $type eq 'overview.fmt') { } |
|
|
0 |
0 |
elsif (lc $type eq 'newsgroups') { } |
|
426
|
0 |
0 |
unless $newsgroup and $server |
|
440
|
0 |
0 |
unless lc $mode eq 'reader' |
|
464
|
0 |
0 |
unless defined $$self{'GROUP'} |
|
465
|
0 |
0 |
if ($$self{'POINTER'} >= scalar @{$$self{'ARTICLES'};} - 1) { } |
|
471
|
0 |
0 |
unless $fh |
|
476
|
0 |
0 |
if $line =~ /^\.$/ |
|
481
|
0 |
0 |
if $Net::NNTP::Proxy::DEBUG |
|
489
|
0 |
0 |
unless $server->postok |
|
493
|
0 |
0 |
if ($@) { } |
|
501
|
0 |
0 |
$success ? : |
|
516
|
0 |
0 |
unless defined $$self{'GROUP'} |
|
520
|
0 |
0 |
if ($messageid) { } |
|
|
0 |
0 |
elsif ($number) { } |
|
549
|
0 |
0 |
unless defined $$self{'GROUP'} |
|
586
|
0 |
0 |
unless defined fileno $fh |
|
620
|
0 |
0 |
unless $group |
|
621
|
0 |
0 |
if ($group =~ /^(.*)@(.*)$/) { } |
|
624
|
0 |
0 |
unless $server |
|
626
|
0 |
0 |
if $servername eq $newsserver |
|
633
|
0 |
0 |
unless $server and $server->connected |
|
634
|
0 |
0 |
$server->group($newsgroup) ? : |
|
657
|
0 |
0 |
wantarray ? : |
|
671
|
0 |
0 |
unless $_ |
|
678
|
0 |
0 |
wantarray ? : |
|
692
|
0 |
0 |
unless $_ |
|
699
|
0 |
0 |
wantarray ? : |
|
705
|
0 |
0 |
unless $server |
|
708
|
0 |
0 |
wantarray ? : |
|
721
|
0 |
0 |
if (not defined $id) { } |
|
|
0 |
0 |
elsif ($id =~ /^\d+$/) { } |
|
722
|
0 |
0 |
unless $pointer >= 0 |
|
723
|
0 |
0 |
if (defined $pointer and scalar @articles and defined $server) { } |
|
|
0 |
0 |
elsif (scalar @articles and defined $server) { } |
|
726
|
0 |
0 |
if $messageid |
|
734
|
0 |
0 |
unless scalar @articles and defined $server |
|
738
|
0 |
0 |
if ($articles[$i] eq $id) |
|
740
|
0 |
0 |
if $messageid |
|
741
|
0 |
0 |
if $messageid |
|
748
|
0 |
0 |
unless $_ |
|
750
|
0 |
0 |
if $messageid |
|
764
|
0 |
0 |
if (not $id or $id =~ /^\d+$/) |
|
766
|
0 |
0 |
if $id and $mid and $id eq $mid |
|
771
|
0 |
0 |
if $Net::NNTP::Proxy::DEBUG |
|
777
|
0 |
0 |
if $article |
|
782
|
0 |
0 |
$article ? : |
|
789
|
0 |
0 |
unless $port |
|
798
|
0 |
0 |
unless (bind SERVER, sockaddr_in($port, "\000\000\000\000")) |
|
804
|
0 |
0 |
unless (listen SERVER, $maxconn || $Net::NNTP::Proxy::MAXCONN || 128) |
|
808
|
0 |
0 |
if $Net::NNTP::Proxy::DEBUG |