| line |
true |
false |
branch |
|
115
|
30 |
10 |
if ($count and ref $count and UNIVERSAL::isa($count, 'CODE')) { } |
|
162
|
14 |
46 |
if ($len and ref $len and UNIVERSAL::isa($len, 'CODE')) { } |
|
175
|
15 |
14 |
unless $encoding |
|
177
|
2 |
12 |
if ($encoding eq 'UTF-32LE' or $encoding eq 'UTF-32BE') { } |
|
|
2 |
10 |
elsif ($encoding eq 'UTF-16LE' or $encoding eq 'UTF-16BE') { } |
|
|
3 |
7 |
elsif ($encoding eq 'utf8' or $encoding eq 'UTF-8') { } |
|
|
6 |
1 |
elsif ($encoding =~ /^(?:utf|ucs)/i) { } |
|
181
|
1 |
1 |
$encoding eq 'UTF-16LE' ? : |
|
184
|
4 |
4 |
$ch ge "\330" && $ch le "\333" ? : |
|
210
|
3 |
1 |
unless $params{'encoding'} |
|
215
|
3 |
5 |
if (defined $params{'padchar'}) |
|
232
|
2 |
1 |
if (not $encoding) { } |
|
254
|
10 |
1 |
unless defined $terminators |
|
274
|
18 |
18 |
&$predicate ? : |
|
307
|
0 |
5 |
if $modulus < 2 |