Branch Coverage

blib/lib/App/DuckPAN/Cmd/Test.pm
Criterion Covered Total %
branch 0 30 0.0


line true false branch
38 0 0 if ($self->full) { }
39 0 0 unless -e 'dist.ini'
40 0 0 if $ret = system('dzil test')
43 0 0 unless @args
46 0 0 if ($ia_name =~ /_cheat_sheet$/)
47 0 0 unless $ia_type eq 'Goodie'
57 0 0 unless $ia
60 0 0 if (my($perl_module) = $ia->{'perl_module'} =~ /::(\w+)$/)
61 0 0 if (-d "t/$perl_module") { }
0 0 elsif (my(@test_file) = 'File::Find::Rule'->name("$perl_module.t")->in('t')) { }
69 0 0 if ($ia_type eq 'Fathead')
71 0 0 if (-f $path) { }
79 0 0 unless @to_test
82 0 0 if @to_test and $ret = system("prove -lr @to_test")
83 0 0 if @cheat_sheet_tests and $ret = system("prove -lr t/CheatSheets/CheatSheetsJSON.t :: @cheat_sheet_tests")