Branch Coverage

blib/lib/File/Spec/OS2.pm
Criterion Covered Total %
branch 18 34 52.9


line true false branch
29 0 0 if $_ eq ''
35 0 0 if defined $cached
48 25 17 unless m[/$]
55 2 51 unless defined $path
62 51 0 unless $path =~ m[^([a-z]:)?/\Z(?!\n)]is
73 12 8 if ($nofile) { }
110 0 11 if $volume =~ m[^([\\/])[\\/][^\\/]+[\\/][^\\/]+\Z(?!\n)]s and $directory =~ m[^[^\\/]]s
119 2 9 if (not $volume =~ /^[a-zA-Z]:\Z(?!\n)/s and $volume =~ m[[^\\/]\Z(?!\n)] and $file =~ m[[^\\/]])
124 2 0 $1 ? :
138 0 6 if (not $self->file_name_is_absolute($path)) { }
145 0 6 if (not defined $base or $base eq '') { }
0 6 elsif (not $self->file_name_is_absolute($base)) { }
156 4 2 unless $path_volume eq $base_volume
185 0 2 if ($path_directories ne '' and $base_directories ne '') { }
200 0 10 unless ($self->file_name_is_absolute($path))
202 0 0 if (not defined $base or $base eq '') { }
0 0 elsif (not $self->file_name_is_absolute($base)) { }