blib/lib/App/pmdeps.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
branch | 30 | 32 | 93.7 |
line | true | false | branch |
---|---|---|---|
28 | 1 | 15 | unless GetOptions 't|timeout=i', \$$self{'timeout'}, 'p|perl-version=f', \$$self{'perl_version'}, 'l|local=s', \$$self{'local'}, 'without-phase=s@', \$$self{'without_phase'}, 'without-type=s@', \$$self{'without_type'}, 'h|help!', \$$self{'usage'}, 'v|version!', \$$self{'version'} |
38 | 2 | 13 | if $$self{'version'} |
39 | 2 | 11 | if $$self{'usage'} |
41 | 2 | 9 | if ($$self{'without_phase'}) |
45 | 2 | 9 | if ($$self{'without_type'}) |
49 | 1 | 10 | unless @ARGV or $$self{'local'} |
59 | 8 | 2 | if ($$self{'local'}) { } |
89 | 5 | 13 | if ($num == 1) |
92 | 1 | 17 | unless ($num) |
106 | 0 | 0 | if ($module_version) |
155 | 7 | 1 | if -e $mymeta_json_file |
156 | 4 | 4 | if -e $meta_json_file |
158 | 1 | 7 | unless ($using_json_file) |
169 | 17 | 4 | unless (grep {$phase eq $_;} @{$$self{'without_phase'};}) |
196 | 7 | 56 | if $module eq 'perl' |
199 | 14 | 42 | if ($core_version and $$self{'perl_version'} - $core_version > 0) |