blib/lib/Net/NNTP.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
condition | 8 | 157 | 5.1 |
line | !l | l&&!r | l&&r | condition |
---|---|---|---|---|
115 | 3 | 0 | 0 | exists $arg{'Reader'} and $arg{'Reader'} == 0 |
148 | 0 | 0 | 0 | ref $nntp and $nntp->code == 350 |
0 | 0 | 0 | ref $nntp and $nntp->code == 350 and $text =~ /^(\S+)/ | |
178 | 0 | 0 | 0 | @_ >= 1 and @_ <= 3 |
182 | 0 | 0 | 0 | @_ and ref $_[0] || ref \$_[0] eq 'GLOB' |
191 | 0 | 0 | 0 | @_ >= 1 and @_ <= 2 |
218 | 0 | 0 | 0 | @_ >= 1 and @_ <= 3 |
222 | 0 | 0 | 0 | @_ and ref $_[0] |
231 | 0 | 0 | 0 | @_ >= 1 and @_ <= 2 |
239 | 0 | 0 | 0 | @_ >= 1 and @_ <= 3 |
243 | 0 | 0 | 0 | @_ and ref $_[0] |
252 | 0 | 0 | 0 | @_ >= 1 and @_ <= 2 |
263 | 0 | 0 | 0 | $nntp->_STAT(@_) && $nntp->message =~ /(<[^>]+>)/o |
279 | 0 | 0 | 0 | defined $grp && length $grp |
0 | 0 | 0 | defined $newgrp and length $newgrp | |
283 | 0 | 0 | 0 | $nntp->_GROUP($newgrp) and $nntp->message =~ /(\d+)\s+(\d+)\s+(\d+)\s+(\S+)/ |
314 | 0 | 0 | 0 | $nntp->_IHAVE($msgid) && $nntp->datasend(@_) |
324 | 0 | 0 | 0 | $nntp->_LAST && $nntp->message =~ /(<[^>]+>)/o |
356 | 0 | 0 | 0 | @_ >= 2 and @_ <= 4 |
380 | 0 | 0 | 0 | $nntp->_NEXT && $nntp->message =~ /(<[^>]+>)/o |
390 | 0 | 0 | 0 | $nntp->_POST && $nntp->datasend(@_) |
464 | 0 | 0 | 0 | $nntp->_LIST('DISTRIB.PATS') && ($arr = $nntp->read_until_dot) |
528 | 0 | 0 | 0 | @_ >= 2 and @_ <= 4 |
596 | 0 | 0 | 0 | $nntp->_DATE && $nntp->message =~ /(\d{4})(\d\d)(\d\d)(\d\d)(\d\d)(\d\d)/ |
763 | 0 | 0 | 3 | not defined $arg{'SSL_hostname'} and $class->can_client_sni |
line | l | !l | condition |
---|---|---|---|
81 | 2 | 0 | $arg{'Port'} ||= 563 |
90 | 3 | 0 | $arg{'Port'} || 'nntp(119)' |
344 | 0 | 0 | shift() || '' |
361 | 0 | 0 | shift() || '' |
363 | 0 | 0 | $groups ||= '*' |
line | l | !l&&r | !l&&!r | condition |
---|---|---|---|---|
57 | 0 | 3 | 0 | ref $self || $self |
69 | 0 | 0 | 0 | $ENV{'NNTPSERVER'} || $ENV{'NEWSHOST'} |
3 | 0 | 0 | $host ||= $ENV{'NNTPSERVER'} || $ENV{'NEWSHOST'} | |
88 | 0 | 0 | 3 | $arg{'Domain'} || $arg{'Family'} |
148 | 0 | 0 | 0 | ref $nntp and $nntp->code == 350 and $text =~ /^(\S+)/ or $text =~ /^(authinfo\s+pass)/io |
182 | 0 | 0 | 0 | ref $_[0] || ref \$_[0] eq 'GLOB' |
0 | 0 | 0 | @_ == 2 or @_ and ref $_[0] || ref \$_[0] eq 'GLOB' | |
222 | 0 | 0 | 0 | @_ and ref $_[0] or ref \$_[0] eq 'GLOB' |
0 | 0 | 0 | @_ == 2 or (@_ and ref $_[0] or ref \$_[0] eq 'GLOB') | |
243 | 0 | 0 | 0 | @_ and ref $_[0] or ref \$_[0] eq 'GLOB' |
0 | 0 | 0 | @_ == 2 or (@_ and ref $_[0] or ref \$_[0] eq 'GLOB') | |
260 | 0 | 0 | 0 | @_ == 1 or @_ == 2 |
270 | 0 | 0 | 0 | @_ == 1 or @_ == 2 |
274 | 0 | 0 | 0 | @_ or wantarray |
314 | 0 | 0 | 0 | @_ == 0 || $nntp->dataend |
390 | 0 | 0 | 0 | @_ == 0 || $nntp->dataend |
425 | 0 | 0 | 0 | @_ == 1 or @_ == 2 |
470 | 0 | 0 | 0 | @_ == 1 or @_ == 2 |
500 | 0 | 0 | 0 | @_ == 1 or @_ == 2 |
518 | 0 | 0 | 0 | @_ == 1 or @_ == 2 |
540 | 0 | 0 | 0 | @_ == 2 or @_ == 3 |
551 | 0 | 0 | 0 | @_ == 4 or @_ == 5 |
582 | 0 | 0 | 0 | @_ == 2 or @_ == 3 |
760 | 3 | 0 | 0 | $arg{'SSL_verifycn_name'} ||= $nntp->host |