| line |
true |
false |
branch |
|
29
|
0 |
0 |
if ($self->full) { }
|
|
30
|
0 |
0 |
unless -e 'dist.ini'
|
|
31
|
0 |
0 |
if $ret = system('dzil test')
|
|
34
|
0 |
0 |
unless @args
|
|
37
|
0 |
0 |
if ($ia_name =~ /_cheat_sheet$/)
|
|
38
|
0 |
0 |
unless $ia_type eq 'Goodie'
|
|
48
|
0 |
0 |
unless $ia
|
|
51
|
0 |
0 |
if (my($perl_module) = $ia->{'perl_module'} =~ /::(\w+)$/)
|
|
52
|
0 |
0 |
if (-d "t/$perl_module") { }
|
|
|
0 |
0 |
elsif (my(@test_file) = 'File::Find::Rule'->name("$perl_module.t")->in('t')) { }
|
|
60
|
0 |
0 |
if ($ia_type eq 'Fathead')
|
|
62
|
0 |
0 |
if (-f $path) { }
|
|
70
|
0 |
0 |
unless @to_test
|
|
72
|
0 |
0 |
if @to_test and $ret = system("prove -lr @to_test")
|
|
73
|
0 |
0 |
if @cheat_sheet_tests and $ret = system("prove -lr t/CheatSheets/CheatSheetsJSON.t :: @cheat_sheet_tests")
|