| blib/lib/WWW/Topica.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 13 | 34 | 38.2 |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 76 | 0 | 1 | 0 | exists $opts{'local'} and not exists $opts{'local'} |
| 113 | 1 | 3 | 297 | defined $$self{'_message_ids'} and @{$$self{'_message_ids'};} |
| 119 | 3 | 0 | 0 | defined $$self{'last'} and $$self{'_next'} >= $$self{'last'} |
| 171 | 0 | 0 | 1 | defined $$self{'email'} && defined $$self{'password'} |
| 309 | 300 | 0 | 0 | $name =~ /@/ and not $email =~ /@/ |
| 317 | 0 | 0 | 300 | $name ne $email and $email =~ /@/ |
| 328 | 0 | 300 | 0 | defined $reply and $subject =~ /^\s*$/ |
| 352 | 0 | 0 | 300 | $reply and defined $reply->body |
| line | l | !l | condition |
|---|---|---|---|
| 75 | 0 | 1 | $opts{'first'} || 0 |
| 355 | 0 | 0 | $$self{'scrubber'}->scrub($mail->body) || '' |
| line | l | !l&&r | !l&&!r | condition |
|---|---|---|---|---|
| 340 | 300 | 0 | 0 | str2time(decode_entities($mail->date)) || gmtime |
| 443 | 603 | 0 | 0 | $response->is_success or $response->is_redirect |