blib/lib/PPI/Token/BOM.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
branch | 4 | 6 | 66.6 |
line | true | false | branch |
---|---|---|---|
70 | 2 | 16786 | if (/^(\x00\x00\xfe\xff | # UTF-32, big-endian \xff\xfe\x00\x00 | # UTF-32, little-endian \xfe\xff | # UTF-16, big-endian \xff\xfe | # UTF-16, little-endian \xef\xbb\xbf) # UTF-8 /sx) |
78 | 0 | 2 | if ($bom_types{$bom} ne "UTF-8") |
82 | 0 | 2 | unless $t->_new_token("BOM", $bom) |