| line |
true |
false |
branch |
|
24
|
0 |
30 |
if -l $_
|
|
25
|
10 |
20 |
unless -f _
|
|
332
|
0 |
11 |
unless $files and @$files
|
|
340
|
0 |
9 |
$digest_args ? :
|
|
350
|
0 |
11 |
if grep {not /\A-/;} keys %args
|
|
352
|
0 |
11 |
if ($detail)
|
|
358
|
2 |
9 |
$authoritative_dirs && @$authoritative_dirs ? :
|
|
361
|
0 |
2 |
unless -d $dir
|
|
362
|
0 |
2 |
unless my $abs_dir = abs_path($dir)
|
|
371
|
0 |
0 |
if (ref $re0 eq 'Regexp') { }
|
|
375
|
0 |
0 |
if $@
|
|
376
|
0 |
0 |
if Regexp::Util::regexp_seen_evals($re)
|
|
384
|
0 |
0 |
if (ref $re0 eq 'Regexp') { }
|
|
388
|
0 |
0 |
if $@
|
|
389
|
0 |
0 |
if Regexp::Util::regexp_seen_evals($re)
|
|
394
|
5 |
6 |
if ($recurse)
|
|
396
|
0 |
35 |
if (-l $_) { }
|
|
|
10 |
25 |
elsif (-d _) { }
|
|
410
|
0 |
87 |
if (-l $f)
|
|
414
|
12 |
75 |
if (-d _)
|
|
418
|
0 |
75 |
unless (-f _)
|
|
423
|
0 |
75 |
if (@include_re)
|
|
426
|
0 |
0 |
if ($f =~ /$re/)
|
|
428
|
0 |
0 |
unless ($included)
|
|
433
|
0 |
75 |
if (@exclude_re)
|
|
435
|
0 |
0 |
if ($f =~ /$re/)
|
|
443
|
0 |
75 |
if ($exclude_empty_files and not $size)
|
|
447
|
0 |
75 |
if (defined $min_size and $size < $min_size)
|
|
451
|
0 |
75 |
if (defined $max_size and $size > $max_size)
|
|
469
|
75 |
0 |
unless grep {$_ eq $f;} @{$basename_paths{$basename};}
|
|
481
|
0 |
75 |
unless (@st)
|
|
501
|
0 |
75 |
unless defined $path_sizes{$f}
|
|
504
|
9 |
66 |
if ($algorithm eq '' or $algorithm eq 'none' or $algorithm eq 'size') { }
|
|
|
0 |
66 |
elsif ($algorithm eq 'name') { }
|
|
509
|
6 |
60 |
if $size_counts{$path_sizes{$f}} == 1
|
|
512
|
0 |
60 |
unless $res->[0] == 200
|
|
527
|
0 |
75 |
unless defined $path_sizes{$f}
|
|
528
|
6 |
69 |
if (not defined $path_digests{$f}) { }
|
|
537
|
9 |
2 |
unless @authoritative_dirs
|
|
542
|
6 |
4 |
unless @files > 1
|
|
544
|
0 |
12 |
unless (my $abs_file = abs_path($file))
|
|
556
|
0 |
10 |
if ($file_a =~ m[\A\Q$d\E(?:/|\z)(.*)])
|
|
562
|
2 |
8 |
if ($file_b =~ m[\A\Q$d\E(?:/|\z)(.*)])
|
|
568
|
0 |
10 |
$file_a_in_authoritative_dirs ? :
|
|
|
2 |
8 |
$file_b_in_authoritative_dirs ? :
|
|
|
0 |
2 |
unless ($file_a_in_authoritative_dirs ? $subdir_len_file_a : 9999) <=> ($file_b_in_authoritative_dirs ? $subdir_len_file_b : 9999)
|
|
580
|
24 |
51 |
if ($path_counts{$f} == 1) { }
|
|
582
|
14 |
10 |
if $report_unique
|
|
587
|
6 |
45 |
if ($report_duplicate == 0) { }
|
|
|
15 |
30 |
elsif ($report_duplicate == 1) { }
|
|
|
21 |
9 |
elsif ($report_duplicate == 2) { }
|
|
|
9 |
0 |
elsif ($report_duplicate == 3) { }
|
|
592
|
6 |
15 |
if $is_first_copy
|
|
594
|
6 |
3 |
unless $is_first_copy
|
|
603
|
10 |
1 |
unless $group_by_digest
|
|
606
|
0 |
7 |
unless $path_sizes{$a} <=> $path_sizes{$b}
|
|
617
|
4 |
5 |
if ($group_by_digest and defined $last_digest and $digest ne $last_digest)
|
|
618
|
4 |
0 |
$show_count || $show_digest || $show_size ? :
|
|
622
|
19 |
22 |
if ($show_count or $show_digest or $show_size) { }
|
|
624
|
5 |
14 |
if $show_count
|
|
625
|
12 |
7 |
if $show_digest
|
|
626
|
2 |
17 |
if $show_size
|
|
634
|
3 |
7 |
if $show_count or $show_digest or $show_size
|