| line |
true |
false |
branch |
|
30
|
0 |
1 |
unless open my $fh, "<", "Build.PL" |
|
38
|
0 |
3 |
if (/^[^-].*=.*/) |
|
43
|
0 |
1 |
if (basename($0) eq "Build.PL") |
|
49
|
0 |
1 |
unless open my $fh, "<", $0 |
|
53
|
1 |
0 |
if (my($old_md5hex) = $md5_line =~ /^# MD5: (\S+)/) { } |
|
54
|
0 |
1 |
if ($old_md5hex ne $Build_PL_md5hex) |
|
56
|
0 |
0 |
if (($perl) = $shebang =~ /^#!\s*(.*)/) { } |
|
73
|
0 |
1 |
if ($ENV{'PERL_MB_OPT'}) |
|
78
|
0 |
1 |
unless &Getopt::Long::GetOptions(\%opt, "allow_mb_mismatch=i", "config=s%", "create_packlist=i", "destdir=s", "installdirs=s", "install_base=s", "install_path=s%", "prefix=s", "uninst:1", "verbose:1", "versionlib=s", "version=s", "extra_compiler_flags=s", "extra_linker_flags=s") |
|
99
|
0 |
1 |
if (@ARGV) |
|
117
|
0 |
0 |
if /\.(pm|pod)$/ and -f $_ |
|
120
|
0 |
0 |
if (not -e $dest or -M $dest > -M $file) |
|
131
|
0 |
0 |
$^O =~ /^(MSWin32|cygwin)$/ ? : |
|
135
|
0 |
0 |
if (-f $_ and /\.pod$/) |
|
144
|
0 |
0 |
if (not -e $man or -M $man > -M $pod or -M $man > -M "Build") |
|
147
|
0 |
0 |
if ($doit->is_dry_run) { } |
|
151
|
0 |
0 |
unless $parser->parse_from_file($pod, $man) |
|
183
|
0 |
0 |
unless chdir "/" |
|
190
|
0 |
0 |
unless ($distro_spec and $distro_spec =~ /^.*:.*$/) |
|
194
|
0 |
0 |
$more_testing ? : |
|
196
|
0 |
0 |
unless $doit->which($tool) |
|
204
|
0 |
0 |
if ($ENV{'XXX_INVALIDATE_CACHE'}) |
|
211
|
0 |
0 |
if (-e "$dir/.distro_support") |
|
218
|
0 |
0 |
if ($distro_spec =~ /^(centos|rockylinux|fedora):/) { } |
|
|
0 |
0 |
elsif ($distro_spec =~ /^alpine(:|$)/) { } |
|
222
|
0 |
0 |
if ($distro_spec eq 'centos:6') { } |
|
|
0 |
0 |
elsif ($distro_spec eq 'centos:7' or $distro_spec eq 'rockylinux:8') { } |
|
248
|
0 |
0 |
if ($distro_spec eq 'centos:8') { } |
|
|
0 |
0 |
elsif ($distro_spec eq 'rockylinux:8') { } |
|
|
0 |
0 |
elsif ($distro_spec eq 'rockylinux:9') { } |
|
267
|
0 |
0 |
if ($distro_spec ne "centos:8" and $distro_spec ne "rockylinux:8" and $distro_spec ne "rockylinux:9") |
|
274
|
0 |
0 |
if ($distro_spec eq 'centos:6') { } |
|
287
|
0 |
0 |
if ($more_testing) |
|
302
|
0 |
0 |
if ($distro_spec eq 'centos:6') { } |
|
323
|
0 |
0 |
if ($more_testing) |
|
340
|
0 |
0 |
$distro_spec eq 'ubuntu:precise' ? : |
|
348
|
0 |
0 |
if ($more_testing) |
|
349
|
0 |
0 |
$distro_spec eq 'ubuntu:precise' ? : |
|
365
|
0 |
0 |
if ($distro_spec =~ /^(ubuntu:precise)$/) |
|
378
|
0 |
0 |
if ($more_testing) |
|
388
|
0 |
0 |
if (defined $ENV{$env_key}) |
|
437
|
0 |
0 |
if not defined $max_width or $max_width < $width |
|
454
|
0 |
0 |
unless defined $distdir |
|
456
|
0 |
0 |
if (eval {
do {
require Test::Kwalitee;
1
}
}) { } |
|
468
|
0 |
0 |
unless defined $distdir |
|
470
|
0 |
0 |
if (eval {
do {
require Test::Pod;
1
}
}) { } |
|
482
|
0 |
0 |
if ($doit->which('cpan_check_versions')) { } |
|
500
|
0 |
0 |
if (defined $out and $out ne "") |
|
508
|
0 |
0 |
if %options |
|
516
|
0 |
0 |
if $line =~ m[^( \.travis\.yml
| \.?appveyor\.yml
| \.github/.*
| \.gitignore
)$]x |
|
523
|
0 |
0 |
if ($dirname ne ".") |
|
538
|
0 |
0 |
unless ($temporary) |
|
546
|
0 |
0 |
unless ($ENV{'DOIT_TEST_SKIP_SOME_CHECKS'}) |
|
554
|
0 |
0 |
if (-e $tarfile) |
|
559
|
0 |
0 |
unless ($ENV{'DOIT_TEST_SKIP_SOME_CHECKS'}) |
|
578
|
0 |
0 |
unless (-e $tarfile) |
|
590
|
0 |
0 |
$^O eq 'MSWin32' ? : |
|
591
|
0 |
0 |
$^O eq 'MSWin32' ? : |
|
602
|
0 |
0 |
unless (-e $tarfile) |
|
625
|
0 |
0 |
$doit->which('xdg-open') ? : |
|
|
0 |
0 |
$^O eq 'darwin' ? : |
|
722
|
0 |
0 |
$opt{'create_packlist'} ? : |
|
|
0 |
0 |
$opt{'create_packlist'} ? : |
|
|
0 |
0 |
$main::Config{'installman1dir'} ? : |
|
|
0 |
0 |
$main::Config{'installman3dir'} ? : |
|
|
0 |
0 |
$opt{'create_packlist'} ? : |
|
|
0 |
0 |
$main::Config{'installvendorman1dir'} ? : |
|
|
0 |
0 |
$main::Config{'installvendorman3dir'} ? : |
|
|
0 |
0 |
$opt{'create_packlist'} ? : |
|
|
0 |
0 |
$main::Config{'installsiteman1dir'} ? : |
|
|
0 |
0 |
$main::Config{'installsiteman3dir'} ? : |
|
|
0 |
0 |
($opt{'installdirs'} || '') eq 'vendor' ? : |
|
|
0 |
0 |
($opt{'installdirs'} || '') eq 'core' ? : |
|
|
0 |
0 |
$opt{'install_base'} ? : |
|
728
|
0 |
0 |
if ($doit->is_dry_run) |
|
737
|
0 |
0 |
if defined $Doit_VERSION |
|
741
|
0 |
0 |
unless open my $fh, $Doit_pm |
|
743
|
0 |
0 |
if (/\$VERSION\s*=\s*'(.*)'/) |
|
748
|
0 |
0 |
unless (defined $Doit_VERSION) |
|
752
|
0 |
0 |
unless ($Doit_VERSION =~ /^\d+\.[\d_]+$/) |
|
756
|
0 |
0 |
unless (defined $Doit::VERSION) |
|
761
|
0 |
0 |
if ($Doit_numerical_version != $Doit::VERSION) |
|
816
|
0 |
0 |
if ($doit->is_dry_run) { } |
|
817
|
0 |
0 |
defined $meta_version ? : |
|
819
|
0 |
0 |
defined $meta_version ? : |
|
844
|
0 |
0 |
unless $doit->which($tool) |
|
851
|
0 |
0 |
unless (defined $version) |
|
852
|
0 |
0 |
unless $doit->which("git") |
|
854
|
0 |
0 |
if (defined $git_describe) { } |
|
855
|
0 |
0 |
if ($git_describe =~ /^([0-9\._]+)$/) { } |
|
|
0 |
0 |
elsif ($git_describe =~ /^([0-9\._]+)-(\d+)-g(.*)/) { } |
|
863
|
0 |
0 |
if ($add_distro_version) |
|
865
|
0 |
0 |
unless ($osr) |
|
870
|
0 |
0 |
if ($dist_id eq 'debian') { } |
|
|
0 |
0 |
elsif ($dist_id eq 'linuxmint') { } |
|
|
0 |
0 |
elsif ($dist_id eq 'ubuntu') { } |
|
888
|
0 |
0 |
defined $version ? : |
|
891
|
0 |
0 |
if (@debs != 1) |
|
902
|
0 |
0 |
unless ($distro_spec and $distro_spec =~ /^.*:.*$/) |
|
906
|
0 |
0 |
unless $doit->which($tool) |
|
918
|
0 |
0 |
$limited_volume_availability ? : |
|
919
|
0 |
0 |
unless (-d $pkgdir) |
|
924
|
0 |
0 |
if ($use_workdir) { } |
|
956
|
0 |
0 |
if ($ENV{$env_key}) |
|
978
|
0 |
0 |
if ($Doit_VERSION eq $existing_tag) |
|
984
|
0 |
0 |
unless open my $cfh, "<", "Changes" |
|
987
|
0 |
0 |
if (/^\Q$Doit_VERSION\E\s/) |
|
998
|
0 |
0 |
if ($git_status ne "" and $git_status ne "<") |
|
1004
|
0 |
0 |
if (not -e $tarfile) { } |
|
1011
|
0 |
0 |
unless (&y_or_n()) |
|
1043
|
0 |
0 |
if ($^O eq "MSWin32") |
|
1047
|
0 |
0 |
if (-x $candidate) |
|
1056
|
0 |
0 |
if ($^O eq "MSWin32") |
|
1060
|
0 |
0 |
if (-x $candidate) |
|
1071
|
0 |
0 |
if (-l "Build") |
|
1086
|
0 |
0 |
if $@ |
|
1097
|
0 |
0 |
if ($distro_spec =~ /^debian:(wheezy|jessie|stretch|7|8|9)$/) { } |
|
|
0 |
0 |
elsif ($distro_spec =~ /^perl:(5\.18\.\d+|.*stretch)$/) { } |
|
1099
|
0 |
0 |
if ($codename eq '7') { } |
|
|
0 |
0 |
elsif ($codename eq '8') { } |
|
|
0 |
0 |
elsif ($codename eq '9') { } |
|
1142
|
0 |
0 |
if %opts |
|
1144
|
0 |
0 |
if ($distro_spec eq "centos:6") |
|
1234
|
0 |
0 |
if ($status eq "<<") |
|
1237
|
0 |
0 |
if ($status eq "*") |
|
1262
|
0 |
0 |
if ($yn eq "" and defined $default) |
|
1265
|
0 |
0 |
if (lc $yn eq 'y') { } |
|
|
0 |
0 |
elsif (lc $yn eq 'n') { } |