| blib/lib/Hash/DefHash.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 51 | 76 | 67.1 |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 28 | 5 | 0 | 1 | &blessed($_[0]) and $_[0]->isa('Hash::DefHash') |
| 155 | 0 | 0 | 1 | $opt_mark_different_lang and $has_v_different_lang |
| 162 | 23 | 19 | 2 | not exists $h->{$prop} and $opt_die |
| 225 | 18 | 2 | 2 | defined $p_prop and $p_prop =~ /\A_/ |
| 226 | 2 | 10 | 8 | defined $p_attr and $p_attr =~ /(?:\A|\.)_/ |
| line | l | !l | condition |
|---|---|---|---|
| 37 | 62 | 0 | $hash //= {} |
| 40 | 19 | 43 | $opts{'check'} // 1 |
| 74 | 1 | 0 | $props{$p_prop} //= {} |
| 78 | 3 | 2 | $p_prop_of_attr // '' |
| 101 | 48 | 6 | $opts //= {} |
| 103 | 48 | 6 | $opts->{'die'} // 1 |
| 104 | 10 | 44 | $opts->{'mark_different_lang'} // 0 |
| 237 | 5 | 1 | $prop //= '' |
| 250 | 24 | 20 | $p_prop_of_attr //= '' |
| 260 | 11 | 0 | $prop //= '' |
| 270 | 4 | 0 | $prop //= '' |
| 279 | 11 | 0 | $prop //= '' |
| 288 | 5 | 0 | $prop //= '' |
| 303 | 4 | 0 | $prop //= '' |
| 323 | 4 | 0 | $prop //= '' |
| 340 | 2 | 0 | $prop //= '' |
| 347 | 8 | 8 | $p_prop_of_attr //= '' |
| 356 | 0 | 0 | $self->get_prop('defhash_v') // 1 |
| 361 | 0 | 0 | $self->get_prop('v') // 1 |
| 370 | 2 | 0 | (($self->get_prop('default_lang') // $par) // $ENV{'LANG'}) // 'en_US' |
| 400 | 0 | 10 | $opts->{'die'} //= 0 |
| 401 | 0 | 10 | $opts->{'alt'} //= {} |
| 403 | 0 | 10 | $opts->{'mark_different_lang'} //= 1 |
| line | l | !l&&r | !l&&!r | condition |
|---|---|---|---|---|
| 110 | 7 | 3 | 0 | $alt{'lang'} //= $default_lang |
| 130 | 8 | 0 | 0 | $prop_alt{'lang'} //= $default_lang |
| 370 | 18 | 15 | 2 | $self->get_prop('default_lang') // $par |
| 33 | 2 | 0 | ($self->get_prop('default_lang') // $par) // $ENV{'LANG'} | |
| 402 | 0 | 7 | 3 | $opts->{'alt'}{'lang'} //= $lang |