Branch Coverage

blib/lib/App/IniDiff/IniFile.pm
Criterion Covered Total %
branch 0 196 0.0


line true false branch
113 0 0 if @_ != 4
130 0 0 if (@_)
136 0 0 if (@_)
142 0 0 if (@_)
148 0 0 if (@_)
154 0 0 if (@_)
173 0 0 if (@_ > 0 and ref $_[0])
174 0 0 if @_ == 1
178 0 0 if (@_ == 2) { }
0 0 elsif (@_ != 1) { }
182 0 0 if @_ != 0
193 0 0 if defined $field->annotation
196 0 0 if ($field->deleted) { }
0 0 elsif (defined $field->value) { }
226 0 0 if @_ != 3
246 0 0 if (@_)
252 0 0 if (@_)
258 0 0 if (@_)
264 0 0 if (@_)
270 0 0 if (@_)
276 0 0 if @_ > 0
284 0 0 if (@_ > 0 and ref $_[0])
285 0 0 if @_ == 1
289 0 0 if (@_ == 2) { }
0 0 elsif (@_ != 1) { }
293 0 0 if @_ != 0
308 0 0 if $field->canonName eq $fieldName
319 0 0 if (defined $xfield)
343 0 0 if (ref $arg) { }
347 0 0 if ($field eq $fieldToast)
358 0 0 if ($field->canonName eq $fieldName)
371 0 0 $key->deleted ? :
373 0 0 if defined $key->annotation
376 0 0 unless ($key->deleted)
407 0 0 if @_ == 0
408 0 0 if @_ > 4
415 0 0 unless defined $isPatch
416 0 0 unless defined $addM
417 0 0 unless defined $stripComments
423 0 0 if ($addM == 1)
439 0 0 if (/^\s*(\[[^]]+])(.*)$/) { }
0 0 elsif (not /^\s*[$App::IniDiff::IniFile::commentchars]/ and /"/) { }
0 0 elsif ($stripComments) { }
443 0 0 if ($stripComments)
465 0 0 unless (/"/)
468 0 0 if ($stripComments)
479 0 0 if /^$/
480 0 0 if (/^\s*\[([^]]+)](-?)$/)
482 0 0 if ($isPatch) { }
495 0 0 if ($del eq '-')
500 0 0 if ($ini->findKey($name))
515 0 0 if (/"/) { }
0 0 elsif (/^([^=]+)=(.*)$/) { }
529 0 0 if (/^([^"]*)=(.*)$/) { }
0 0 elsif (/"/) { }
556 0 0 if (not defined $value and $name =~ /-$/)
557 0 0 unless ($isPatch)
565 0 0 unless (defined $key)
570 0 0 if ($key->deleted)
582 0 0 unless $ok
618 0 0 if (ref $arg) { }
622 0 0 if ($key eq $keyToast)
656 0 0 if @_ != 0
671 0 0 unless (defined $in)
680 0 0 if /^\s*(#|$)/
687 0 0 if (/^\s*include\s+"([^"]*)"\s*$/)
692 0 0 if (defined $keyActions and not @{$keyActions;}) { }
0 0 elsif (defined $entryActions and not @{$entryActions;}) { }
709 0 0 if (not $ifile =~ m[^/] and $mypath ne '' and $mypath ne $file and -e $mypath . '/' . $ifile) { }
714 0 0 unless $filter->readConf($mypath . '/' . $ifile)
717 0 0 unless $filter->readConf($ifile)
723 0 0 if (/^\[(.+)](|\s*-)$/)
724 0 0 $2 eq '' ? :
726 0 0 if (defined $keyActions and not @{$keyActions;}) { }
0 0 elsif (defined $entryActions and not @{$entryActions;}) { }
752 0 0 $isDel ? :
757 0 0 if (/^\s*(name|value)\s+(\S.*)$/)
759 0 0 unless (defined $keyActions)
765 0 0 if (defined $entryActions and not @{$entryActions;})
784 0 0 if (/^\s*subst\s+(name|value)\s+(\S.*)$/)
786 0 0 unless (defined $keyActions)
791 0 0 unless (defined $entryActions)
808 0 0 if (/^\s*delete$/)
809 0 0 unless (defined $keyActions)
814 0 0 unless (defined $entryActions)
850 0 0 unless $key->name =~ /^$keyFilt->{'keyPat'}$/i
851 0 0 if ($keyFilt->{'deleteAll'})
863 0 0 $keyAction->{'matchOn'} eq 'name' ? :
866 0 0 unless $target =~ /^$keyAction->{'matchPat'}$/i
873 0 0 if ($entryAction->{'action'} eq 'substName') { }
0 0 elsif ($entryAction->{'action'} eq 'substValue') { }
0 0 elsif ($entryAction->{'action'} eq 'delete') { }
876 0 0 if ($@ ne '')
886 0 0 if ($@ ne '')
924 0 0 if ($keyFilt->{'deleteAll'})
942 0 0 if ($entryAction->{'action'} eq 'substName') { }
0 0 elsif ($entryAction->{'action'} eq 'substValue') { }
0 0 elsif ($entryAction->{'action'} eq 'delete') { }