| blib/lib/HTML/PullParser.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 18 | 22 | 81.8 |
| line | true | false | branch |
|---|---|---|---|
| 19 | 14 | 63 | unless defined $tmp |
| 22 | 0 | 11 | unless %argspec |
| 27 | 0 | 11 | if defined $file and defined $doc |
| 29 | 0 | 11 | unless defined $file or defined $doc |
| 41 | 5 | 6 | if (defined $doc) { } |
| 42 | 4 | 1 | ref $doc ? : |
| 46 | 4 | 2 | if (not ref $file and ref \$file ne "GLOB") |
| 67 | 8 | 127 | if (my $f = $self->{'pullparser_file'}) { } |
| 127 | 0 | elsif (my $sref = $self->{'pullparser_str_ref'}) { } | |
| 70 | 5 | 3 | if (read $f, $buf, 512) { } |
| 84 | 122 | 5 | if ($pos < length $$sref) { } |