blib/lib/Acme/Roman.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
branch | 2 | 34 | 5.8 |
line | true | false | branch |
---|---|---|---|
29 | 0 | 0 | if $_[0] =~ /[^IVXLCDM]/ |
36 | 1 | 0 | if ($arg =~ /^\d+$/) { } |
0 | 0 | elsif (Roman::isroman($arg)) { } | |
37 | 0 | 1 | if $arg > 3999 |
49 | 0 | 0 | is_roman($r1) ? : |
0 | 0 | ref $r1 ? : | |
50 | 0 | 0 | is_roman($r2) ? : |
0 | 0 | ref $r2 ? : | |
57 | 0 | 0 | is_roman($r1) ? : |
0 | 0 | ref $r1 ? : | |
58 | 0 | 0 | is_roman($r2) ? : |
0 | 0 | ref $r2 ? : | |
65 | 0 | 0 | is_roman($r1) ? : |
0 | 0 | ref $r1 ? : | |
66 | 0 | 0 | is_roman($r2) ? : |
0 | 0 | ref $r2 ? : | |
77 | 0 | 0 | if (is_roman($sub_name)) { } |