Branch Coverage

blib/lib/Module/DevAid.pm
Criterion Covered Total %
branch 0 134 0.0


line true false branch
196 0 0 if (%parameters)
266 0 0 @_ ? :
269 0 0 unless -e $filename
271 0 0 unless open my $config_file, '<', $filename
276 0 0 if /\A\s*\Z/ms
277 0 0 if (/\A(\w+)\s*=\s*(.+)\Z/ms)
281 0 0 if ($key =~ /^(modules|scripts|version_bump_files)$/) { }
0 0 elsif ($key eq 'version_bump_code') { }
287 0 0 if ($value =~ /^sub/) { }
334 0 0 if (-f 'Build.PL') { }
0 0 elsif (-f 'Makefile.PL') { }
371 0 0 @_ ? :
382 0 0 if @{$$self{'scripts'};}
385 0 0 if (@files)
399 0 0 if (exists $$self{'version_bump_code'} and defined $$self{'version_bump_code'} and ref $$self{'version_bump_code'} eq 'CODE')
409 0 0 if (-f $old_version_file and open OVFILE, ">$old_version_file")
416 0 0 if ($do_commit and $$self{'version_control'} eq 'darcs') { }
0 0 elsif ($do_commit and $$self{'version_control'} eq 'svk') { }
450 0 0 unless ($todo_str)
467 0 0 if ($$self{'gen_todo'})
474 0 0 if (open OTFILE, ">$todo_file")
480 0 0 if ($do_commit and $$self{'version_control'} eq 'darcs') { }
0 0 elsif ($do_commit and $$self{'version_control'} eq 'svk') { }
511 0 0 unless open $pod_file_fh, $pod_file
534 0 0 @_ ? :
536 0 0 if ($$self{'gen_readme'})
541 0 0 unless open RMFILE, ">$readme_file"
546 0 0 if ($do_commit and $$self{'version_control'} eq 'darcs') { }
0 0 elsif ($do_commit and $$self{'version_control'} eq 'svk') { }
571 0 0 if ($$self{'version_control'} eq 'darcs') { }
0 0 elsif ($$self{'version_control'} eq 'svk') { }
603 0 0 if (-f $changes_file and open CFILE, $changes_file)
610 0 0 unless ($line =~ /^Revision history/ or $line =~ /^======/ and $count < 3 or $line =~ /^\s*$/ and $count < 3)
648 0 0 if (-f $old_version_file and open OVFILE, $old_version_file)
653 0 0 if ($line =~ /^([0-9]+\.[0-9]+)$/)
677 0 0 if (-f $new_version_file and open NVFILE, $new_version_file)
682 0 0 if ($line =~ /^(\d+\.\d+\w*)$/)
711 0 0 unless (`$command`)
715 0 0 if (open CFILE, "$command |")
721 0 0 if ($line =~ /^\s*tagged\s+release/) { }
0 0 elsif ($line =~ /^(Mon|Tue|Wed|Thu|Fri|Sat|Sun)\s+([a-zA-Z]+)\s+(\d+)\s+\d\d:\d\d:\d\d\s+\w+\s+(\d+)/) { }
0 0 elsif ($line =~ /\s+\*\s+/) { }
745 0 0 unless ($new_changes)
768 0 0 if (open $fh, "$info_cmd |")
772 0 0 if ($line =~ /Depot Path:\s+(.*)/) { }
0 0 elsif ($line =~ /Last Changed Rev.:\s*(\d+)/) { }
788 0 0 if (open $fh, "$info_cmd |")
792 0 0 if ($line =~ /Last Changed Rev.:\s*(\d+)/)
804 0 0 if ($local_last_rev < $tags_last_rev)
808 0 0 unless (`$command`)
812 0 0 if (open CFILE, "$command |")
819 0 0 if ($line =~ /^\s*tagged\s+release/) { }
0 0 elsif ($line =~ /^r\d+:\s+\w+\s+\|\s+(\d\d\d\d-\d+-\d+)/) { }
0 0 elsif ($line =~ /----------/) { }
0 0 elsif ($line =~ /^$/) { }
830 0 0 if ($item)
837 0 0 if $item
841 0 0 if ($item) { }
852 0 0 if $new_changes
854 0 0 unless ($new_changes)
875 0 0 if (open OCFILE, ">$changes_file")
880 0 0 if ($$self{'version_control'} eq 'darcs') { }
0 0 elsif ($$self{'version_control'} eq 'svk') { }
902 0 0 if ($$self{'version_control'} eq 'darcs') { }
0 0 elsif ($$self{'version_control'} eq 'svk') { }
913 0 0 if (open $fh, "$info_cmd |")
917 0 0 if ($line =~ /Depot Path:\s+(.*)/)