| File: | blib/lib/Genealogy/Military/Branch.pm |
| Coverage: | 100.0% |
| line | % | coverage | branch | |
|---|---|---|---|---|
| 291 | 100 | T | F | unless defined $text |
| 298 | 100 | T | F | if ($text =~ /$d->{'pattern'}/u) |
| 305 | 100 | T | F | unless (defined $branch) |
| 308 | 100 | T | F | if $self->{'warn_on_error'} |
| 346 | 100 | T | F | if (exists $TRANSLATIONS{$lang} and exists $TRANSLATIONS{$lang}{$key}) |
| 378 | 100 | T | F | if ($tag =~ /^([a-z]{2})/iu) |
| 384 | 100 | T | F | if ($ENV{'LANGUAGE'} and $ENV{'LANGUAGE'} =~ /^([a-z]{2})/iu) |
| 389 | 100 | T | F | unless defined $val |
| 391 | 100 | T | F | if ($val =~ /^([a-z]{2})/iu) |
| 397 | 100 | T | F | if defined $ENV{'LANG'} and $ENV{'LANG'} =~ /^C(\.|$)/u |