| script/news | |||
|---|---|---|---|
| Criterion | Covered | Total | % | 
| condition | 13 | 20 | 65.0 | 
| line | !l | l&&!r | l&&r | condition | 
|---|---|---|---|---|
| 257 | 0 | 2 | 12 | $_ = shift @$article and /\S/u | 
| line | l | !l | condition | 
|---|---|---|---|
| 261 | 2 | 0 | &decode('MIME-Header', scalar $headers->header('subject')) || '?' | 
| 262 | 2 | 0 | no_email(&decode('MIME-Header', scalar $headers->header('from'))) || 'Anonymous' | 
| 267 | 2 | 0 | &decode('MIME-Header', scalar $headers->header('newsgroups')) || '' | 
| 269 | 0 | 2 | &decode('MIME-Header', scalar $headers->header('references')) || '' | 
| 288 | 1 | 1 | cached("$group list ", sub { | 
| 289 | 1 | 1 | &first(sub { | 
| 290 | 1 | 1 | $cached_article->{'replies'} || [] | 
| line | l | !l&&r | !l&&!r | condition | 
|---|---|---|---|---|
| 268 | 2 | 0 | 0 | $group ||= join($", @$newsgroups) |