| blib/lib/Datafile/Hash.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 41 | 77 | 53.2 |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 12 | 0 | 0 | 36 | defined $_[0] and $_[1] |
| 36 | 3 | 0 | 0 | defined $search and ref $search || length $search |
| 64 | 0 | 21 | 4 | $skip_empty and $line eq "" |
| 121 | 0 | 2 | 1 | $ini_mode and $group_mode != 2 |
| 127 | 3 | 0 | 0 | $group_mode == 1 && $prefix ne '' |
| 140 | 3 | 0 | 0 | $verbose and $ini_mode |
| 160 | 0 | 0 | 3 | $hash and ref $hash eq "HASH" |
| 0 | 0 | 3 | $hash and ref $hash eq "HASH" and keys %$hash | |
| 202 | 2 | 1 | 0 | not $has_real_nested and grep /\./u, keys %data |
| 239 | 0 | 14 | 1 | $delim eq "=" and $needs_quoting |
| 264 | 3 | 0 | 0 | $backup and -f $filename |
| line | l | !l | condition |
|---|---|---|---|
| 16 | 2 | 1 | $opts //= {} |
| 18 | 1 | 2 | $opts->{'delimiter'} // "=" |
| 19 | 0 | 3 | $opts->{'skip_empty'} // 1 |
| 20 | 0 | 3 | $opts->{'skip_headers'} // 0 |
| 21 | 0 | 3 | $opts->{'key_fields'} // 1 |
| 22 | 0 | 3 | $opts->{'comment_char'} // "#" |
| 24 | 0 | 3 | $opts->{'verbose'} // 0 |
| 25 | 2 | 1 | $opts->{'group'} // 2 |
| 114 | 8 | 6 | $ref->{$_} //= {} |
| 151 | 2 | 1 | $opts //= {} |
| 153 | 1 | 2 | $opts->{'delimiter'} // "=" |
| 154 | 0 | 3 | $opts->{'comment_char'} // "#" |
| 155 | 0 | 3 | $opts->{'prot'} // 432 |
| 156 | 1 | 2 | $opts->{'backup'} // 0 |
| 157 | 0 | 3 | $opts->{'verbose'} // 0 |
| 207 | 0 | 0 | $r->{$_} //= {} |
| line | l | !l&&r | !l&&!r | condition |
|---|---|---|---|---|
| 26 | 3 | 0 | 0 | $delim eq '=' || $delim eq ':' |
| 36 | 0 | 0 | 0 | ref $search || length $search |
| 158 | 3 | 0 | 0 | $delim eq '=' || $delim eq ':' |
| 237 | 1 | 0 | 14 | $v =~ /[#"'\r\n]/u || $v =~ /^\s+|\s+$/u || $v eq '' |