Branch Coverage

blib/lib/HTML/Parser.pm
Criterion Covered Total %
branch 18 22 81.8


line true false branch
27 1 128 if ($api_version >= 4)
33 47 81 if ($api_version < 3)
56 3 125 if (my $h = delete $arg{'handlers'})
57 0 3 if ref $h eq "ARRAY"
65 57 44 if ($option =~ /^(\w+)_h$/) { }
0 44 elsif ($option =~ /^(text|start|end|process|declaration|comment)$/) { }
85 10 8 if (not ref $file and ref \$file ne "GLOB")
88 0 10 unless open F, "<", $file
95 2 8735 unless $self->parse($chunk)
97 10 8 if $opened
109 0 1 if @_