blib/lib/Config/Std.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
condition | 32 | 61 | 52.4 |
line | !l | l&&!r | l&&r | condition |
---|---|---|---|---|
87 | 46 | 1 | 0 | $val_type and $val_type ne 'ARRAY' |
177 | 11 | 0 | 5 | $first && length $name_of{$ident} == 0 |
194 | 16 | 0 | 0 | $inter_gap and not $is_anon |
239 | 6 | 6 | 1 | @{$comp_ref;} and $comp_ref->[-1]->isa('Config::Std::Gap') |
251 | 0 | 0 | 0 | $comp_ref and @{$comp_ref;} |
0 | 0 | 0 | $comp_ref and @{$comp_ref;} and $comp_ref->[-1]->isa('Config::Std::Comment') | |
369 | 6 | 0 | 1 | $var_type eq 'SCALAR' and not defined ${$var_ref;} |
line | l | !l | condition |
---|---|---|---|
95 | 4 | 43 | $comm || '' |
162 | 0 | 18 | $$hash_ref{$name_of{$ident}} ||= {} |
183 | 0 | 11 | $precomm_of{$ident} || '' |
314 | 0 | 13 | $updated{$block_name} ||= {} |
367 | 7 | 0 | ref $var_ref || '' |
line | l | !l&&r | !l&&!r | condition |
---|---|---|---|---|
18 | 1 | 17 | 0 | $opt_ref->{$sub_name} ||= $sub_name |
90 | 34 | 13 | 0 | $sep or $def_sep |
227 | 0 | 0 | 0 | ref $value || $value =~ /\n./msx |
228 | 0 | 0 | 0 | $first ? $post_gap : $inter_gap or $separate |
306 | 4 | 4 | 0 | $post_section_gap_for{$hash_ref} || (defined $global_inter_gap{$caller} ? $global_inter_gap{$caller} : 1) |
336 | 1 | 1 | 10 | ref $value || $value =~ /\n./msx |
337 | 6 | 2 | 4 | $first ? $post_gap : $inter_gap or $separate |
350 | 5 | 0 | 0 | flock $fh, 6 or croak("Can't write to locked config file '${filename}'") |
403 | 6 | 0 | 0 | flock $fh, 5 or croak("Can't read from locked config file '${filename}'") |
466 | 8 | 0 | 58 | /\G [^\S\n]* \Q$sep\E ([^\n]*) (?:\n|\z) /cgmsx or /\G [^\S\n]* \Q$pure_sep\E ([^\n]*) (?:\n|\z) /cgmsx |