blib/lib/Localizer/Style/Gettext.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
branch | 25 | 26 | 96.1 |
line | true | false | branch |
---|---|---|---|
21 | 12 | 12 | unless $str =~ /%/ |
40 | 13 | 18 | if ($1) |
42 | 10 | 3 | if (not $text =~ /[^\x20-\x7E]/s) { } |
52 | 2 | 29 | if ($2) { } |
4 | 25 | elsif ($3) { } | |
9 | 16 | elsif ($5) { } | |
59 | 1 | 3 | if ($function_name eq '*') { } |
1 | 2 | elsif ($function_name eq '#') { } | |
66 | 1 | 3 | unless (exists $$functions{$function_name}) |
72 | 3 | 2 | if (my $num = $arg =~ /%(.+)/) { } |
86 | 2 | 7 | if ($arg eq '*') { } |
96 | 9 | 2 | if (@code > 1) |
104 | 0 | 11 | if $@ |