Branch Coverage

blib/lib/PAR/SetupTemp.pm
Criterion Covered Total %
branch 17 30 56.6


line true false branch
43 0 7 unless defined $PAR::SetupProgname::Progname
46 3 4 if (defined $ENV{'PAR_TEMP'} and $ENV{'PAR_TEMP'} =~ /(.+)/)
52 0 4 unless $stmpdir
55 2 2 if (not $ENV{'PAR_CLEAN'} and my $mtime = (stat $PAR::SetupProgname::Progname)[9]) { }
59 2 0 if ($ctx and open my $fh, "<$PAR::SetupProgname::Progname")
65 2 0 $ctx ? :
78 4 0 if defined $ENV{'PAR_TEMP'} and $ENV{'PAR_TEMP'} =~ /(.+)/
99 0 4 unless defined $path and -d $path and -w $path
106 0 1 unless (mkdir $temp_path, 448 or $!{'EEXIST'})
111 4 0 unless ($^O eq 'MSWin32')
113 0 4 unless (@st = lstat $temp_path)
117 0 4 if (not S_ISDIR($st[2]) or $st[4] != $< or ($st[2] & 511) != 448)
135 4 0 if defined $>
137 0 4 if (defined &Win32::LoginName) { }
4 0 elsif (defined $pwuid) { }