| line |
true |
false |
branch |
|
121
|
1 |
3 |
unless my $read = -r 'MANIFEST' && maniread() |
|
122
|
1 |
3 |
if $manimiss |
|
125
|
0 |
4 |
if $Is_VMS_nodot |
|
126
|
3 |
1 |
unless $manimiss |
|
127
|
0 |
4 |
unless open M, "> $MANIFEST" |
|
133
|
0 |
1 |
$Is_VMS_mode ? : |
|
|
1 |
3 |
if $manimiss |
|
137
|
11 |
25 |
if (&$skip($file)) |
|
140
|
9 |
2 |
if $Verbose and exists $read->{$file} |
|
143
|
25 |
0 |
if ($Verbose) |
|
144
|
16 |
9 |
unless exists $read->{$file} |
|
149
|
0 |
25 |
if $tabs < 1 |
|
150
|
22 |
3 |
unless $text |
|
151
|
2 |
23 |
if ($file =~ /\s/) |
|
165
|
0 |
126 |
if $Is_MacOS |
|
166
|
0 |
126 |
if ($Is_VMS) |
|
169
|
0 |
0 |
if ($Is_VMS_lc) |
|
171
|
0 |
0 |
if $filename =~ /^MANIFEST(\.SKIP)?$/i |
|
193
|
0 |
126 |
if $Debug |
|
194
|
31 |
95 |
if -d $_ |
|
202
|
0 |
16 |
$Is_MacOS ? : |
|
275
|
14 |
23 |
if (&$matches($file)) |
|
276
|
14 |
0 |
unless $Quiet |
|
294
|
0 |
3 |
if $Debug |
|
295
|
0 |
3 |
if ($dosnames) |
|
300
|
0 |
3 |
unless (exists $found->{$file}) |
|
301
|
0 |
0 |
unless $Quiet |
|
318
|
1 |
8 |
if &$skip($file) |
|
319
|
0 |
8 |
if $Debug |
|
320
|
2 |
6 |
unless (exists $read->{$file}) |
|
321
|
0 |
2 |
$Is_MacOS ? : |
|
322
|
1 |
1 |
unless $Quiet |
|
348
|
1 |
35 |
unless (open M, "< $mfile") |
|
355
|
0 |
189 |
if /^\s*#/ |
|
361
|
37 |
152 |
if (($file, $comment) = /^'((?:\\[\\']|.+)+)'\s*(.*)/) { } |
|
367
|
0 |
189 |
unless $file |
|
369
|
0 |
189 |
if ($Is_MacOS) { } |
|
|
0 |
189 |
elsif ($Is_VMS_mode) { } |
|
377
|
0 |
0 |
if ($Is_VMS_nodot) |
|
380
|
0 |
0 |
if (@pieces > 2) |
|
383
|
0 |
0 |
if $Debug |
|
386
|
0 |
0 |
if ($Is_VMS_lc) |
|
388
|
0 |
0 |
if $file =~ /^MANIFEST(\.SKIP)?$/i |
|
415
|
10 |
6 |
if -f $mfile |
|
417
|
0 |
16 |
unless open M, "< $mfile" or open M, "< $DEFAULT_MSKIP" |
|
424
|
0 |
476 |
if (defined $1) |
|
428
|
186 |
290 |
unless defined $filename and $filename |
|
432
|
0 |
16 |
unless scalar @skip > 0 |
|
434
|
0 |
16 |
$Is_VMS_mode ? : |
|
454
|
0 |
10 |
unless (open M, "< $mfile") |
|
459
|
1 |
35 |
if (/^#!include_default\s*$/) |
|
460
|
1 |
0 |
if (my(@default) = _include_mskip_file()) |
|
462
|
0 |
1 |
if $Debug |
|
467
|
1 |
34 |
if (/^#!include\s+(.*)\s*$/) |
|
469
|
1 |
0 |
if (my(@external) = _include_mskip_file($external_file)) |
|
471
|
0 |
1 |
if $Debug |
|
479
|
9 |
1 |
unless $flag |
|
481
|
0 |
1 |
if $Is_VMS_nodot |
|
483
|
0 |
1 |
if $Debug |
|
484
|
0 |
1 |
unless (open M, "> $mfile") |
|
498
|
0 |
2 |
unless (-f $mskip) |
|
503
|
0 |
2 |
unless (open M, "< $mskip") |
|
538
|
0 |
2 |
unless defined $target |
|
543
|
0 |
2 |
if $Is_VMS_mode |
|
544
|
0 |
2 |
$Is_VMS ? : |
|
546
|
0 |
3 |
if ($Is_MacOS) { } |
|
547
|
0 |
0 |
if ($file =~ /:/) |
|
554
|
0 |
3 |
if $Is_VMS_mode |
|
555
|
0 |
3 |
if ($file =~ m[/]) |
|
557
|
0 |
0 |
if $Is_VMS_mode |
|
558
|
0 |
0 |
$Is_VMS ? : |
|
567
|
1 |
2 |
unless (-f $from) |
|
573
|
0 |
2 |
unless open F, "< $from\000" |
|
574
|
0 |
2 |
if (open T, "< $to\000") { } |
|
576
|
0 |
0 |
if $_ ne readline T |
|
577
|
0 |
0 |
unless eof T |
|
582
|
2 |
0 |
if ($diff) |
|
583
|
0 |
2 |
if (-e $to) |
|
584
|
0 |
0 |
unless unlink $to |
|
587
|
0 |
2 |
if $how eq 'best' |
|
588
|
2 |
0 |
if $how eq 'cp' |
|
589
|
0 |
0 |
if $how eq 'ln' |
|
602
|
0 |
2 |
$Is_VMS ? : |
|
610
|
0 |
0 |
if $Is_VMS or $^O eq 'MSWin32' and Win32::IsWin95() |
|
613
|
0 |
0 |
unless (_manicopy_chmod($srcFile, $dstFile)) |
|
627
|
1 |
1 |
$perm & 64 ? : |
|
636
|
0 |
0 |
if ($is_exception or not $ExtUtils::Manifest::Config{'d_link'} or -l $srcFile) { } |
|
639
|
0 |
0 |
unless ln($srcFile, $dstFile) |
|
646
|
290 |
0 |
unless $Is_MacOS |
|
649
|
0 |
0 |
if ($file =~ m[/]) |
|
660
|
0 |
0 |
unless $Is_MacOS |
|
670
|
25 |
0 |
unless $Is_MacOS |
|
698
|
0 |
16 |
unless @needed |
|
700
|
0 |
16 |
unless open MANIFEST, ">>$MANIFEST" |
|
706
|
9 |
10 |
if ($file =~ /\s/) |
|
712
|
0 |
16 |
unless close MANIFEST |
|
723
|
0 |
16 |
unless open MANIFEST, $MANIFEST |
|
728
|
15 |
1 |
if ($manifest[-1] eq '') { } |
|
732
|
2 |
87 |
unless ($manifest[$i] eq "\n") |
|
741
|
3 |
13 |
if ($must_rewrite) |
|
743
|
0 |
3 |
unless open MANIFEST, '>', $MANIFEST |
|
748
|
0 |
3 |
unless close MANIFEST |