|  line  | 
 true  | 
 false  | 
 branch  | 
 
| 
1091
 | 
 0  | 
 2  | 
 unless ($HTML::HTML5::Parser::Charset::Info::HTMLCharset->{$name} or $HTML::HTML5::Parser::Charset::Info::IANACharset->{$name})  | 
 
| 
1106
 | 
 0  | 
 0  | 
 unless ($HTML::HTML5::Parser::Charset::Info::IANACharset->{$name})  | 
 
| 
1144
 | 
 713  | 
 0  | 
 $opt{'byte_buffer'} ? :  | 
 
| 
1157
 | 
 0  | 
 713  | 
 if ($self->{'iana_names'}{'iso-2022-jp'}) { }  | 
 
| 
 | 
 0  | 
 713  | 
 elsif ($self->{'xml_names'}{'iso-2022-jp'}) { }  | 
 
| 
1165
 | 
 0  | 
 0  | 
 if (&Encode::find_encoding($obj->{'state_2440'}) and &Encode::find_encoding($obj->{'state_2442'}))  | 
 
| 
1178
 | 
 0  | 
 0  | 
 if (&Encode::find_encoding($obj->{'state_2440'}) and &Encode::find_encoding($obj->{'state_2442'}))  | 
 
| 
1187
 | 
 713  | 
 0  | 
 if ($e) { }  | 
 
| 
1189
 | 
 0  | 
 713  | 
 unless ($self->{'category'} & 1)  | 
 
| 
1206
 | 
 0  | 
 713  | 
 if ($name eq 'euc-jp-1997') { }  | 
 
| 
 | 
 0  | 
 713  | 
 elsif ($name eq 'shift-jis-1997') { }  | 
 
| 
 | 
 2  | 
 711  | 
 elsif ({'web-latin1', 1, 'web-latin1-us-ascii', 1, 'web-latin5', 1}->{$name}) { }  | 
 
| 
 | 
 0  | 
 711  | 
 elsif ($name eq 'web-thai' or $name eq 'web-tis-620') { }  | 
 
| 
1219
 | 
 713  | 
 0  | 
 if ($opt{'allow_error_reporting'})  | 
 
| 
1220
 | 
 0  | 
 713  | 
 unless $self->{'perl_names'}  | 
 
| 
1222
 | 
 2  | 
 713  | 
 unless $perl_status & 32  | 
 
| 
1223
 | 
 0  | 
 713  | 
 if $perl_status & 16  | 
 
| 
1225
 | 
 0  | 
 713  | 
 if $perl_status & 64 and not $opt{'allow_semiconforming'}  | 
 
| 
1229
 | 
 713  | 
 0  | 
 if ($e and $e->name eq $perl_name)  | 
 
| 
1240
 | 
 0  | 
 0  | 
 unless $self->{'perl_names'}  | 
 
| 
1242
 | 
 0  | 
 0  | 
 if $perl_status & 32  | 
 
| 
1243
 | 
 0  | 
 0  | 
 if $perl_status & 16  | 
 
| 
1245
 | 
 0  | 
 0  | 
 if $perl_status & 64 and not $opt{'allow_semiconforming'}  | 
 
| 
1249
 | 
 0  | 
 0  | 
 if ($e)  | 
 
| 
1254
 | 
 0  | 
 0  | 
 if ($opt{'allow_fallback'})  | 
 
| 
1255
 | 
 0  | 
 0  | 
 unless $self->{'perl_names'}  | 
 
| 
1257
 | 
 0  | 
 0  | 
 unless $perl_status & 16 or $perl_status & 64  | 
 
| 
1267
 | 
 0  | 
 0  | 
 if ($e)  | 
 
| 
1272
 | 
 0  | 
 0  | 
 unless $self->{'iana_names'}  | 
 
| 
1275
 | 
 0  | 
 0  | 
 if ($e)  | 
 
| 
1289
 | 
 0  | 
 714  | 
 unless $self->{'iana_names'}  | 
 
| 
1291
 | 
 4  | 
 1424  | 
 if ($name_status & 8) { }  | 
 
| 
 | 
 710  | 
 714  | 
 elsif ($name_status & 4) { }  | 
 
| 
 | 
 4  | 
 710  | 
 elsif ($name_status & 2) { }  |