blib/lib/Config/Std.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
condition | 32 | 61 | 52.4 |
line | !l | l&&!r | l&&r | condition |
---|---|---|---|---|
84 | 46 | 1 | 0 | $val_type and $val_type ne 'ARRAY' |
174 | 11 | 0 | 5 | $first && length $name_of{$ident} == 0 |
191 | 16 | 0 | 0 | $inter_gap and not $is_anon |
236 | 6 | 6 | 1 | @{$comp_ref;} and $$comp_ref[-1]->isa('Config::Std::Gap') |
248 | 0 | 0 | 0 | $comp_ref and @{$comp_ref;} |
0 | 0 | 0 | $comp_ref and @{$comp_ref;} and $$comp_ref[-1]->isa('Config::Std::Comment') | |
366 | 6 | 0 | 1 | $var_type eq 'SCALAR' and not defined ${$var_ref;} |
line | l | !l | condition |
---|---|---|---|
92 | 4 | 43 | $comm || '' |
159 | 0 | 18 | $$hash_ref{$name_of{$ident}} ||= {} |
178 | 0 | 11 | $precomm_of{$ident} || '' |
311 | 0 | 13 | $updated{$block_name} ||= {} |
364 | 7 | 0 | ref $var_ref || '' |
line | l | !l&&r | !l&&!r | condition |
---|---|---|---|---|
16 | 1 | 17 | 0 | $$opt_ref{$sub_name} ||= $sub_name |
87 | 34 | 13 | 0 | $sep or $def_sep |
224 | 0 | 0 | 0 | ref $value || $value =~ /\n./msx |
225 | 0 | 0 | 0 | $first ? $post_gap : $inter_gap or $separate |
301 | 4 | 0 | 4 | $post_section_gap_for{$hash_ref} || (defined $global_inter_gap{$caller} ? $global_inter_gap{$caller} : 1) |
333 | 1 | 1 | 10 | ref $value || $value =~ /\n./msx |
334 | 6 | 2 | 4 | $first ? $post_gap : $inter_gap or $separate |
347 | 5 | 0 | 0 | flock $fh, 6 or croak("Can't write to locked config file '${filename}'") |
400 | 6 | 0 | 0 | flock $fh, 5 or croak("Can't read from locked config file '${filename}'") |
463 | 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 |