| line |
true |
false |
branch |
|
197
|
40 |
82 |
unless $_[0] =~ / \A \p{IsUppercaseRoman}+ \z /ux |
|
203
|
6 |
28 |
unless &is_roman($_[0]) |
|
209
|
15 |
56 |
if $last_digit < $digit |
|
235
|
6 |
28 |
unless 0 < $arg and $arg < 4 * _highest_value() |
|
243
|
16 |
152 |
if (1 <= $digit and $digit <= 3) { } |
|
|
5 |
147 |
elsif ($digit == 4) { } |
|
|
6 |
141 |
elsif ($digit == 5) { } |
|
|
3 |
138 |
elsif (6 <= $digit and $digit <= 8) { } |
|
|
10 |
128 |
elsif ($digit == 9) { } |
|
260
|
5 |
22 |
unless &is_roman($roman) |
|
289
|
5 |
3 |
if defined $string |
|
297
|
9 |
9 |
if (@n == 1) |
|
298
|
9 |
9 |
if (@n == 2) |
|
303
|
21 |
12 |
$char_info->{'lower'} ? : |
|
315
|
0 |
0 |
unless &is_roman |