| line |
true |
false |
branch |
|
53
|
0 |
0 |
if ($use_vms_feature) { } |
|
66
|
0 |
0 |
if ($use_vms_feature) { } |
|
225
|
0 |
0 |
if $^O ne 'amigaos' |
|
226
|
0 |
0 |
if @localize |
|
232
|
0 |
0 |
if defined $cwd |
|
301
|
0 |
0 |
unless CORE::chdir '..' |
|
303
|
0 |
0 |
if $odev == $cdev and $oino == $cino |
|
304
|
0 |
0 |
unless opendir DIR, '.' |
|
307
|
0 |
0 |
unless defined $direntry |
|
308
|
0 |
0 |
if $direntry eq '.' |
|
309
|
0 |
0 |
if $direntry eq '..' |
|
312
|
0 |
0 |
unless $tdev != $odev or $tino != $oino |
|
315
|
0 |
0 |
unless defined $direntry |
|
319
|
0 |
0 |
if ($^O eq 'apollo') |
|
322
|
0 |
0 |
unless $path =~ /^(.*)\z/s and CORE::chdir $1 |
|
325
|
0 |
0 |
if $cdev != $orig_cdev or $cino != $orig_cino |
|
340
|
0 |
0 |
if ($ENV{'PWD'} and $^O ne 'os2' and $^O ne 'dos' and $^O ne 'MSWin32') { } |
|
343
|
0 |
0 |
if (not defined $dd && defined $pd or $di != $pi or $dd != $pd) |
|
349
|
0 |
0 |
if $^O eq 'MSWin32' |
|
353
|
0 |
0 |
if ($^O ne 'MSWin32' and $ENV{'PWD'} =~ m[(/[^/]+(/[^/]+/[^/]+))(.*)]s) |
|
356
|
0 |
0 |
if (defined $pd and defined $dd and $di == $pi and $dd == $pd) |
|
364
|
0 |
0 |
@_ ? : |
|
365
|
0 |
0 |
if ($^O eq 'cygwin') { } |
|
|
0 |
0 |
elsif ($^O ne 'MSWin32') { } |
|
372
|
0 |
0 |
unless $chdir_init |
|
374
|
0 |
0 |
if ($^O eq 'MSWin32') |
|
379
|
0 |
0 |
unless CORE::chdir $newdir |
|
381
|
0 |
0 |
if ($^O eq 'VMS') { } |
|
|
0 |
0 |
elsif ($^O eq 'MacOS') { } |
|
|
0 |
0 |
elsif ($^O eq 'MSWin32') { } |
|
392
|
0 |
0 |
if (ref $newdir eq 'GLOB') { } |
|
|
0 |
0 |
elsif ($newdir =~ m[^/]s) { } |
|
398
|
0 |
0 |
unless @curdir |
|
401
|
0 |
0 |
if $component eq '.' |
|
402
|
0 |
0 |
if $component eq '..' |
|
413
|
0 |
0 |
@_ ? : |
|
416
|
0 |
0 |
unless (@cst = stat $start) |
|
422
|
0 |
0 |
unless (-d _) |
|
426
|
0 |
0 |
unless my($dir, $file) = $start =~ m[^(.*)/(.+)$] |
|
430
|
0 |
0 |
if (-l $start) |
|
432
|
0 |
0 |
unless defined $link_target |
|
435
|
0 |
0 |
unless 'File::Spec'->file_name_is_absolute($link_target) |
|
441
|
0 |
0 |
$dir ? : |
|
451
|
0 |
0 |
unless (opendir PARENT, $dotdots) |
|
457
|
0 |
0 |
unless (@cst = stat $dotdots) |
|
463
|
0 |
0 |
if ($pst[0] == $cst[0] and $pst[1] == $cst[1]) { } |
|
471
|
0 |
0 |
unless (defined($dir = readdir PARENT)) |
|
477
|
0 |
0 |
unless @tst = lstat "$dotdots/$dir" |
|
482
|
0 |
0 |
defined $dir ? : |
|
485
|
0 |
0 |
unless $cwd eq '/' |
|
495
|
0 |
0 |
@_ ? : |
|
502
|
0 |
0 |
unless (-e $path) |
|
506
|
0 |
0 |
unless (-d _) |
|
510
|
0 |
0 |
unless length $dir |
|
512
|
0 |
0 |
if (-l $path) |
|
514
|
0 |
0 |
unless defined $link_target |
|
516
|
0 |
0 |
unless 'File::Spec'->file_name_is_absolute($link_target) |
|
522
|
0 |
0 |
$dir eq 'File::Spec'->rootdir ? : |
|
527
|
0 |
0 |
unless (CORE::chdir $path) |
|
531
|
0 |
0 |
unless (-d $cwd and CORE::chdir $cwd) |
|
557
|
0 |
0 |
unless @_ |
|
563
|
0 |
0 |
if (defined &VMS::Filespec::vmsrealpath) |
|
567
|
0 |
0 |
if $path =~ m[(?<=\^)/] |
|
568
|
0 |
0 |
if $path =~ /^\.\.?$/ |
|
569
|
0 |
0 |
if $path =~ /[\[<\]]/ |
|
570
|
0 |
0 |
if $path =~ /^--?$/ |
|
573
|
0 |
0 |
if ($efs) |
|
575
|
0 |
0 |
if ($path_vms == $path_unix) { } |
|
578
|
0 |
0 |
if $path_vms |
|
582
|
0 |
0 |
if ($unix_mode) |
|
592
|
0 |
0 |
if -d $path |
|
599
|
0 |
0 |
if (-l $path) |
|
601
|
0 |
0 |
unless defined $link_target |
|
608
|
0 |
0 |
if defined $pathified |
|
641
|
0 |
0 |
if (not defined &Dos::GetCwd) { } |
|
665
|
0 |
0 |
@_ ? : |
|
668
|
0 |
0 |
unless defined(open(REALPATH, '-|') || exec('/usr/bin/fullpath', '-t', $path)) |