Condition Coverage

blib/lib/Advanced/Config/Reader.pm
Criterion Covered Total %
condition 137 177 77.4


and 3 conditions

line !l l&&!r l&&r condition
155 103698 6 13 $rOpts->{'tag_case'} && defined $tag
434 0 0 46 -f $file and -r _
453 0 0 44 exists $rOpts->{'source_cb'} and ref $rOpts->{'source_cb'} eq "CODE"
457 44 0 0 $rOpts->{'inherit_pass_phase'} and $rOpts->{'pass_phrase'}
625 5736 3896 47182 defined $tag && defined $value
662 9819 19930 27065 $tv_pair_flag and $l_quote ne ""
701 3187 13423 65 $tv_pair_flag and not $value =~ /$comment/
748 16395 0 215 $cmt_found and $parts[0] =~ /(\s*$comment\s*)(.*$)/
811 3106 0 12278 $tv_pair_flag and $value =~ /(\s*$comment\s*)(.*)$/
937 7109 462 184 not defined $val and defined $mod_tag
966 7420 209 126 $mask and not $mask_flag
975 119 27 21 $m and not $mask_flag
1072 169 3 3 $mod_opt eq ":+" and $alt_val ne ""
163 7 2 $mod_opt =~ /^:[-=?]$/ and $alt_val eq ""
166 2 2 $mod_opt eq "+" and defined $value
161 5 2 $mod_opt =~ /^[-=?]$/ and not defined $value
1172 0 1 7 defined $length and $length ne ""
1304 59797 110 7 $opts->{'disable_variables'} and not $disable_flag
1502 18 3 3 $value =~ /'/ and $value =~ /"/
1962 0 0 6131 exists $rOpts->{'encrypt_cb'} and ref $rOpts->{'encrypt_cb'} eq "CODE"
2022 0 0 12353 exists $rOpts->{'encrypt_cb'} and ref $rOpts->{'encrypt_cb'} eq "CODE"

or 2 conditions

line l !l condition
888 33231 866 shift() || ''
889 575 33522 shift() || 0
890 13428 20669 shift() || 0

or 3 conditions

line l !l&&r !l&&!r condition
105 26 0 0 $ENV{'PERL_DL_NONLAZY'} or $ENV{'PERL_USE_UNSAFE_INC'}
0 0 0 $ENV{'PERL_DL_NONLAZY'} or $ENV{'PERL_USE_UNSAFE_INC'} or $ENV{'HARNESS_ACTIVE'}
269 0 8 627 $cmt =~ /(^|$lbl_sep)$hide_str($lbl_sep|$)/ or should_we_hide_sensitive_data($section)
303 264 12282 21023 $hide_section{$section} or $cmt =~ /(^|$lbl_sep)$encrypt_str($lbl_sep|$)/
12546 48 20975 $hide_section{$section} or $cmt =~ /(^|$lbl_sep)$encrypt_str($lbl_sep|$)/ or $cmt =~ /(^|$lbl_sep)$hide_str($lbl_sep|$)/
12330 195 20780 $hide_section{$section} or $cmt =~ /(^|$lbl_sep)$encrypt_str($lbl_sep|$)/ or $cmt =~ /(^|$lbl_sep)$hide_str($lbl_sep|$)/ or should_we_hide_sensitive_data($tag, 1)
491 185 36 599 $new_name eq "" or $new_name eq $global_sections{'DEFAULT'}
676 4 0 26997 $val2 =~ /$l_quote/ or $val2 =~ /$r_quote/
721 0 0 16610 $has_no_cmt =~ /$comment/ or $has_no_cmt =~ /$lvar/
0 0 16610 $has_no_cmt =~ /$comment/ or $has_no_cmt =~ /$lvar/ or $has_no_cmt =~ /$rvar/
0 0 16610 $has_no_cmt =~ /$comment/ or $has_no_cmt =~ /$lvar/ or $has_no_cmt =~ /$rvar/ or $line =~ /$has_no_cmt/
958 0 0 35 $val =~ /$lv/ or $val =~ /$rv/
1072 3 2 170 $mod_opt eq ":+" and $alt_val ne "" or $mod_opt =~ /^:[-=?]$/ and $alt_val eq ""
2 2 168 $mod_opt eq ":+" and $alt_val ne "" or $mod_opt =~ /^:[-=?]$/ and $alt_val eq "" or $mod_opt eq "+" and defined $value
2 2 166 $mod_opt eq ":+" and $alt_val ne "" or $mod_opt =~ /^:[-=?]$/ and $alt_val eq "" or $mod_opt eq "+" and defined $value or $mod_opt =~ /^[-=?]$/ and not defined $value
1 4 161 $mod_opt eq "##" or $mod_opt eq "#"
5 3 158 $mod_opt eq "##" or $mod_opt eq "#" or $mod_opt eq "%%"
7 3 155 $mod_opt eq "##" or $mod_opt eq "#" or $mod_opt eq "%%" or $mod_opt eq "%"
1078 1 1 7 $mod_opt eq ":=" or $mod_opt eq "="
0 0 7 $mod_opt eq ":?" or $mod_opt eq "?"
1100 1 3 7 $mod_opt eq '##' || $mod_opt eq '%%'
1101 4 1 6 $mod_opt eq '#' || $mod_opt eq '##'
1351 2 5 8003 $tag =~ /^($not+)(##)(.+)$/ or $tag =~ /^($not+)(%%)(.+)$/
7 31 7972 $tag =~ /^($not+)(##)(.+)$/ or $tag =~ /^($not+)(%%)(.+)$/ or $tag =~ /^($not+)(#)(.+)$/
36 4 7968 $tag =~ /^($not+)(##)(.+)$/ or $tag =~ /^($not+)(%%)(.+)$/ or $tag =~ /^($not+)(#)(.+)$/ or $tag =~ /^($not+)(%)(.+)$/
1 0 7789 $tag =~ /^($not+):([0-9]+)$/ or $tag =~ /^($not+):\s+(-[0-9]+)$/
1 0 7789 $tag =~ /^($not+):([0-9]+)$/ or $tag =~ /^($not+):\s+(-[0-9]+)$/ or $tag =~ /^($not+):[(](-[0-9]+)[)]$/
3 1 7785 $tag =~ /^($not+):([0-9]+):(-?[0-9]+)$/ or $tag =~ /^($not+):\s+(-[0-9]+):(-?[0-9]+)$/
4 3 7782 $tag =~ /^($not+):([0-9]+):(-?[0-9]+)$/ or $tag =~ /^($not+):\s+(-[0-9]+):(-?[0-9]+)$/ or $tag =~ /^($not+):[(](-[0-9]+)[)]:(-?[0-9]+)$/
5 4 7773 $tag =~ /^($not+)([\^]{1,2})$/ or $tag =~ /^($not+)([,]{1,2})$/
9 4 7769 $tag =~ /^($not+)([\^]{1,2})$/ or $tag =~ /^($not+)([,]{1,2})$/ or $tag =~ /^($not+)([~]{1,2})$/
1513 0 0 0 $value =~ /$ql/ or $value =~ /$qr/
1665 0 2 519 $hide_section or should_we_hide_sensitive_data($tag, 1)
1836 0 0 539 $cmt =~ /(^|$lbl_sep)$encrypt_str($lbl_sep|$)/ or $cmt =~ /(^|$lbl_sep)$hide_str($lbl_sep|$)/
1844 0 4 535 $hide_section or should_we_hide_sensitive_data($tag, 1)
1909 13 0 6130 $new_value =~ /$rlq2/ or $new_value =~ /$rrq2/