Condition Coverage

blib/lib/News/NNTPClient.pm
Criterion Covered Total %
condition 28 82 34.1


and 2 conditions

line l !l condition
60 0 0 carp("News::NNTPClient: Bad port: $port") and return
75 0 1 carp("News::NNTPClient: Bad hostname: $host") and return
99 0 0 carp("News::NNTPClient: Can't open socket: $!") and return
538 0 25 carp("News::NNTPClient: $SOCK has been closed\n") and return
656 0 0 carp("News::NNTPClient unexpected EOF on $SOCK\n") and return

and 3 conditions

line !l l&&!r l&&r condition
47 0 1 0 $me->port($$me{'PORT'}) and $me->host($$me{'HOST'})
1 0 0 $me->port($$me{'PORT'}) and $me->host($$me{'HOST'}) and $me->connect
189 1 0 0 400 <= $$me{'CODE'} and $$me{'DBUG'}
571 0 0 0 $me->okprint and $$me{'MESG'} =~ /(\d+)\s+(\d+)\s+(\d+)\s+(\w+)/
733 2 0 0 @_ and '<' . join(',', @_) . '>'

or 2 conditions

line l !l condition
21 0 1 shift() || $ENV{'NNTPSERVER'} || 'news'
22 1 0 shift() || $ENV{'NNTPPORT'} || getservbyname('nntp', 'tcp') || 119
99 0 0 getprotobyname 'tcp' || 6
224 0 1 shift() || ''
233 0 1 shift() || ''
242 0 1 shift() || ''
251 0 1 shift() || ''
276 1 0 shift() || ''
285 0 1 shift() || ''
286 0 1 shift() || ''
321 0 1 $$me{'GROUP'} || '*'
350 0 0 shift() || ''
360 0 0 shift() || 'guest'
361 0 0 shift() || 'foobar'
415 0 1 shift() || ''
433 0 1 shift() || ''
442 0 1 shift() || ''
453 0 1 shift() || 'message-id'
454 0 1 shift() || 1
465 0 1 shift() || 'subject'
466 0 1 shift() || 1
489 0 1 shift() || 1
510 0 1 shift() || $$me{'GROUP'} || ''
636 0 0 $$me{'CMND'} || 'okprint'

or 3 conditions

line l !l&&r !l&&!r condition
81 0 0 0 gethostbyaddr($addr, 2) || $host
321 0 1 0 $group ||= $$me{'GROUP'} || '*'
705 2 1 0 shift() || time