| blib/lib/Curses/UI/Language.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 18 | 26 | 69.2 |
| line | true | false | branch |
|---|---|---|---|
| 78 | 9 | 9 | unless defined $lang |
| 81 | 0 | 18 | if defined $lang_alias{$lang} |
| 84 | 9 | 9 | if defined $$this{-'lang'} and $lang eq $$this{-'lang'} |
| 96 | 0 | 9 | unless open LANG_DATA, "< $l_file" |
| 99 | 9 | 63 | if /^\s*__DATA__$/ |
| 106 | 198 | 441 | if (/^#/) { } |
| 207 | 234 | elsif (/^\s*\[\s*(.*)\s*\]\s*(.*)$/) { } | |
| 216 | 18 | elsif (defined $tag) { } | |
| 0 | 18 | elsif (not /^\s*$/) { } | |
| 114 | 0 | 207 | unless defined $block |
| 134 | 9 | 207 | unless defined $tag |
| 153 | 0 | 0 | unless (defined $block) |
| 167 | 0 | 0 | unless defined $block |