line |
!l |
l&&!r |
l&&r |
condition |
72
|
0 |
0 |
0 |
$fwrite and not $fappend
|
148
|
0 |
0 |
0 |
fcwrite($flags) and not fctrunc($flags)
|
366
|
0 |
0 |
0 |
packsize($_[0], 0) == packsize($_[0], 0, 0) && !($_[0] =~ /\*|(?:\[(?:[2-9]|[0-9]{2,})\])|(?:[[:alpha:]].*[[:alpha:]])/)
|
434
|
0 |
0 |
0 |
($_[0] <= 0 || $_[0] >= 0) && $_[0] != 'INF' && $_[0] != '-INF'
|
461
|
0 |
0 |
0 |
defined $_ and $_ > $max
|
470
|
0 |
0 |
0 |
defined $_ and $_ < $min
|
489
|
0 |
0 |
0 |
defined $tmp && $tmp eq $_
|
496
|
0 |
0 |
0 |
defined $tmp && $tmp eq $_
|
507
|
0 |
0 |
0 |
defined $tmp && $tmp->[0] eq $_->[0]
|
595
|
0 |
0 |
0 |
$h == 0 and $m == 0
|
632
|
0 |
0 |
0 |
!ref($_) && -d $_
|
695
|
0 |
0 |
0 |
'File::Copy'->can('syscopy') and 'File::Copy'->can('syscopy') ne 'File::Copy'->can('copy')
|
705
|
0 |
0 |
0 |
$rc &&= chown($uid, $gid, $dst)
|
707
|
0 |
0 |
0 |
$rc &&= chmod($perm & 4095, $dst)
|
709
|
0 |
0 |
0 |
$rc &&= utime($atime, $mtime, $dst)
|
732
|
0 |
0 |
0 |
@layers0 and @layers1
|
|
0 |
0 |
0 |
@layers0 and @layers1 and $layers0[0] eq $layers1[0]
|
1004
|
0 |
0 |
0 |
not ref $type and 'PDL'->can($type)
|
1068
|
0 |
0 |
0 |
not $filename =~ m[^/] and defined $opts{'DIR'}
|
1069
|
0 |
0 |
0 |
not $filename =~ m[^/] and $opts{'TMPDIR'}
|
1203
|
0 |
0 |
0 |
0 < $njobs and $njobs < 1
|
line |
l |
!l |
condition |
63
|
0 |
0 |
$flags //= 'r'
|
375
|
0 |
0 |
$val //= 305419896
|
489
|
0 |
0 |
$_[0] // []
|
496
|
0 |
0 |
$_[0] // []
|
503
|
0 |
0 |
$keyfunc //= \&overload::StrVal
|
511
|
0 |
0 |
$l // []
|
519
|
0 |
0 |
$_[0] // []
|
582
|
0 |
0 |
$sfmt ||= '%06.3f'
|
618
|
0 |
0 |
(stat $_[0])[9] // 0
|
632
|
0 |
0 |
(!ref($_) && -d $_ ? du_glob("$_/*") : -s $_) // 0
|
655
|
0 |
0 |
$opts{'method'} || \&File::Copy::copy
|
656
|
0 |
0 |
$opts{'label'} || 'copyto()'
|
871
|
0 |
0 |
$opts{'class'} // 'PDL'
|
872
|
0 |
0 |
$opts{'mmap'} // 1
|
873
|
0 |
0 |
!$mmap || (exists $opts{'ReadOnly'} ? $opts{'ReadOnly'} : !(-w "$file.hdr")) || 0
|
1059
|
0 |
0 |
shift() // 'tmpXXXXX'
|
1099
|
0 |
0 |
$template //= 'dcdbXXXXXX'
|
1100
|
0 |
0 |
$opts{'SUFFIX'} //= '.tmpa'
|
1123
|
0 |
0 |
$template //= 'dcdbXXXXXX'
|
1124
|
0 |
0 |
$opts{'SUFFIX'} //= '.pf'
|
1148
|
0 |
0 |
$template //= 'dcdbXXXXXX'
|
1149
|
0 |
0 |
$opts{'SUFFIX'} //= '.tmph'
|
1173
|
0 |
0 |
shift() || '/proc/cpuinfo'
|
1190
|
0 |
0 |
$NCORES{$filename} //= 0
|
1201
|
0 |
0 |
$njobs //= -1
|
line |
l |
!l&&r |
!l&&!r |
condition |
67
|
0 |
0 |
0 |
$flags =~ /[a]/ || $flags =~ />>/
|
88
|
0 |
0 |
0 |
($flags & 0) == 0 || ($flags & 2) == 2
|
95
|
0 |
0 |
0 |
($flags & 1) == 1 || ($flags & 2) == 2
|
133
|
0 |
0 |
0 |
$perms //= 438 & ~(umask)
|
328
|
0 |
0 |
0 |
$ENV{'DIACOLLO_SORT'} || $ENV{'SORT'} || 'sort ' . $that->sortJobs(@_)
|
388
|
0 |
0 |
0 |
not $packas or $packas eq 'raw'
|
409
|
0 |
0 |
0 |
not $packas or $packas eq 'raw'
|
426
|
0 |
0 |
0 |
$_[0] <= 0 || $_[0] >= 0
|
430
|
0 |
0 |
0 |
!($_[0] <= 0 || $_[0] >= 0) || $_[0] == 'INF' || $_[0] == '-INF'
|
461
|
0 |
0 |
0 |
not defined $max or defined $_ and $_ > $max
|
470
|
0 |
0 |
0 |
not defined $min or defined $_ and $_ < $min
|
571
|
0 |
0 |
0 |
!exists $_[1] || $_[1]
|
666
|
0 |
0 |
0 |
-d $dstdir or make_path($dstdir)
|
1037
|
0 |
0 |
0 |
not -e $_ or unlink $_
|
1049
|
0 |
0 |
0 |
$TMPDIR || 'File::Spec'->tmpdir
|
1152
|
0 |
0 |
0 |
$opts{'flags'} //= fcflags('rw' . ($opts{'APPEND'} ? 'a' : ''))
|
1212
|
0 |
0 |
0 |
!$njobs || $njobs < 1
|