| blib/lib/Test/AskAnExpert.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 18 | 22 | 81.8 |
| line | true | false | branch |
|---|---|---|---|
| 99 | 0 | 5 | if $@ |
| 110 | 5 | 0 | if defined $$interface |
| 185 | 6 | 1 | if defined $Qobj and $Qobj->isa('Test::AskAnExpert::Question') |
| 221 | 0 | 10 | unless $expected =~ /yes|no/i |
| 224 | 1 | 9 | unless defined $Qobj and $Qobj->isa('Test::AskAnExpert::Question') |
| 225 | 2 | 7 | if defined $Qobj->skip |
| 229 | 1 | 6 | if defined $timeout |
| 235 | 1 | 6 | unless ($interface->has_answer($Qobj)) |
| 240 | 1 | 5 | unless $interface->answer($Qobj) |
| 244 | 0 | 5 | if defined $Qobj->skip |
| 245 | 2 | 3 | unless $tb->ok($answer eq $expected, $Qobj->name) |