| blib/lib/Lingua/String.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 15 | 18 | 83.3 |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 77 | 10 | 2 | 3 | @_ == 1 and ref $_[0] eq "HASH" |
| 10 | 0 | 2 | scalar @_ == 1 and my $lang = _get_language() | |
| 151 | 20 | 1 | 2 | $ENV{'LANGUAGE'} and $ENV{'LANGUAGE'} =~ /^([a-z]{2})/i |
| 167 | 2 | 0 | 0 | defined $ENV{'LANG'} and $ENV{'LANG'} =~ /^C(\.|$)/ |
| line | l | !l&&r | !l&&!r | condition |
|---|---|---|---|---|
| 130 | 5 | 2 | 1 | $params->{'lang'} || $self->_get_language |
| 197 | 6 | 17 | 1 | $params{'lang'} || $self->_get_language |