Branch Coverage

lib/lib/abs.pm
Criterion Covered Total %
branch 18 30 60.0


line true false branch
111 7 0 unless defined &DEBUG
124 0 65 unless length $file
136 0 0 $! ? :
0 12 unless my $ret = abs_path($abs)
145 24 83 ref $_ || m[^/] ? :
150 12 71 if (index($abs, '*') != -1 or index($abs, '?') != -1) { }
154 0 0 $! ? :
0 0 unless $x = abs_path($_) and -d $x or $SOFT
156 30 0 defined $x ? :
159 2 0 $! ? :
2 2 unless $_ = abs_path($abs) and -d $_ or $SOFT
162 68 1 defined $_ ? :
170 1 53 unless @_
172 2 51 if ($_[0] eq '-soft')
185 0 12 unless @_