| blib/lib/Ecma48/Util.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 24 | 46 | 52.1 |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 75 | 0 | 0 | 0 | $c =~ /^\e(.)$/u and exists $metactrl{$1} |
| 190 | 0 | 0 | 2 | $dir = $1 and exists $$OPP{$dir = $1} |
| 195 | 11 | 2 | 1 | ord $_ > 256 and $r eq $_ |
| 213 | 3 | 5 | 13 | /^[^\x01-\x1F\x80-\x9F]*$/u and not /^[\d;]*?\d[\d;]*$/u |
| line | l | !l | condition |
|---|---|---|---|
| 286 | 4 | 0 | $_[1] // 1 |
| 1 | 3 | $_[3] // '' |
| line | l | !l&&r | !l&&!r | condition |
|---|---|---|---|---|
| 75 | 0 | 0 | 0 | $name //= $metactrl{$1} |
| 76 | 0 | 0 | 0 | $name //= charnames::viacode(ord $c) |
| 104 | 2 | 4 | 0 | $v //= _ctrlcharsymb $c |
| 105 | 4 | 2 | 0 | $v //= $$h{$c} |
| 107 | 9 | 0 | 0 | $v //= $name ? "\\N{$name}" : sprintf('\\x%02x', ord $c) |
| 192 | 2 | 0 | 0 | charnames::string_vianame($cname) // $_ |
| 195 | 1 | 0 | 0 | charnames::string_vianame("REVERSED $cname") // $_ |
| 215 | 7 | 5 | 0 | $opp ne $_ or m[[-\260^*+~_/'"[:punct:]\s]]u |
| 258 | 2 | 0 | 1 | $test =~ /\r?\n\h*?\z/u || !($test =~ /\S/u) |
| 286 | 2 | 1 | 1 | $_[2] // closing_seq $b |