Branch Coverage

lib/App/Followme/FIO.pm
Criterion Covered Total %
branch 70 90 77.7


line true false branch
37 0 0 if ($page) { }
59 0 3 $filename eq '.' ? :
62 2 1 if defined $ext
73 3 289 if (ref $data eq "HASH")
83 5 287 if (ref $data eq "ARRAY")
101 95 46 unless defined $format
112 16 129 if file_name_is_absolute($directories[-1])
121 989 0 if (no_upwards($dir)) { }
124 0 0 unless $dir eq "."
138 242 11 if (-e $filename) { }
155 1 0 if (-e $filename) { }
172 86 32 if ($patterns)
176 0 100 if ($pattern eq '*') { }
181 75 25 if ($pattern =~ s/^\*//) { }
188 25 75 if ($pattern =~ s/\*$//) { }
212 13 3 -e $target ? :
215 0 20 unless defined $source
217 1 19 unless -e $source
218 0 19 if fio_same_file($target, $source)
221 14 5 if $source_date >= $target_date
234 73 68 if $file =~ /$pattern/
254 68 73 unless fio_match_patterns($file, $globs)
256 4 69 if ($exclude_index)
258 1 3 if $base eq "index"
263 44 28 if ($file_date > $newest_date)
277 0 342 unless defined $filename
281 14 328 unless $fd
283 15 313 if defined $binmode
295 19 24 unless defined $case_sensitivity
296 0 43 unless defined $filename1 and defined $filename2
300 8 35 unless @path1 == @path2
306 264 0 unless ($case_sensitivity)
311 12 252 unless $part1 eq $part2
323 12 15 if ($date =~ /[^\d]/)
324 0 12 unless $date =~ /T/
343 57 1106 if (-d $filename) { }
362 3 3 if -d $file
376 0 220 unless $dd
380 440 1052 unless no_upwards($file)
383 106 946 if (-d $path) { }
406 0 182 unless (-e $dir)
407 0 0 unless mkdir $dir
412 0 182 unless $fd
414 3 179 if defined $binmode
418 0 182 unless -e $filename