Branch Coverage

blib/lib/Venus/Path.pm
Criterion Covered Total %
branch 92 124 74.1


line true false branch
97 27 1 wantarray ? :
105 0 1 unless File::Copy::copy("$self", "$path")
122 19 1 wantarray ? :
142 2 2 unless $name
150 1 2 unless $expr
152 3 0 if ref $expr ne "Regexp"
159 0 42 $_->is_directory ? :
163 0 3 wantarray ? :
171 0 1 wantarray ? :
184 58 1 wantarray ? :
222 0 2 $binmode ? :
236 7 1 wantarray ? :
248 2 10 unless $handle->open($path, @args)
267 6 1 $args ? :
1 6 unless defined($result = $args ? `$path $args` : `$path`)
272 5 1 wantarray ? :
280 0 10 $mode ? :
2 8 unless $mode ? CORE::mkdir($path, $mode) : CORE::mkdir($path)
291 0 4 $self->is_file ? :
295 7 5 if ($path->exists) { }
303 0 4 wantarray ? :
327 1 8 if $self->exists
331 0 7 unless utime undef, undef, $path
342 0 3 unless File::Copy::move("$self", "$path")
363 7 0 defined $path ? :
371 5 0 if @paths
373 4 1 wantarray ? :
389 1 7194 unless CORE::open my $handle, "<", $path
392 0 7194 if defined $binmode
402 0 7194 unless defined $result
405 4 7190 if "Venus::Os"->is_win
425 2 0 if $path->is_relative
435 0 4 unless CORE::rmdir $path
447 0 1 if ($path->is_file) { }
457 1 1 wantarray ? :
466 5 0 if ($path->is_file) { }
474 0 1 wantarray ? :
483 1 11 if ($path->child($base)->test($spec))
489 0 1 -f $paths[0] ? :
1 1 @paths ? :
495 1 19 if ((my $path = $self->child($base))->test($spec)) { }
501 2 16 if $sought
526 0 1 wantarray ? :
542 1 10 unless CORE::unlink $path
553 1 2 unless CORE::open my $handle, ">", $path
556 0 2 if defined $binmode
560 0 2 unless ($handle->syswrite($data) // -1) == length $data
571 1 0 unless defined $err
586 1 1 unless defined $err
589 1 1 $err ? :
601 1 2 unless defined $err
615 1 0 unless defined $err
629 1 0 unless defined $err
644 1 2 unless defined $err
658 1 0 unless defined $err
673 1 0 unless defined $err
687 1 1 unless defined $err
701 1 0 unless defined $err
715 1 0 unless defined $err
730 1 0 unless defined $err
744 1 1 unless defined $err
758 1 1 unless defined $err