Branch Coverage

blib/lib/Mac/Path/Util.pm
Criterion Covered Total %
branch 36 48 75.0


line true false branch
94 10 0 unless $$args{'type'} and $$args{'type'} eq 'darwin' || $$args{'type'} eq 'macos'
111 0 10 if $$self{'type'} eq 'Bad Path'
115 1 9 if ($self->type eq 'macos') { }
4 5 elsif ($self->type eq 'darwin') { }
120 1 0 if (index($self->path, '0', 1) ne ':') { }
129 0 0 if $self->_is_startup($$self{'volume'}) eq 'true'
137 0 4 if (index($self->path, '0', 1) eq '/')
142 4 0 unless (defined $self->volume)
145 4 0 if $self->_is_startup($$self{'volume'}) eq 'true'
202 1 1 $_[0] ? :
224 3 5 if (substr($name, 0, 1) ne '/') { }
2 3 elsif ($name =~ m[^/Volumes/([^/]+)(/.*)]) { }
3 0 elsif (substr($name, 0, 1) eq '/') { }
270 8 2 if (defined $$self{'starting_path'})
275 4 6 if ($colons == 0 and $slashes == 0) { }
1 5 elsif ($colons != 0 and $slashes == 0) { }
4 1 elsif ($colons == 0 and $slashes != 0) { }
1 0 elsif ($colons != 0 and $slashes != 0) { }
305 3 0 if ref $self
313 2 11 if defined $self->startup
314 6 5 if defined $Startup
317 0 5 if ($$self{'use_carbon'} and eval { do { require MacPerl } }) { }
340 3 3 unless defined $self->startup
342 5 1 $name eq $Startup ? :