blib/lib/Venus/Path.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
condition | 16 | 27 | 59.2 |
line | !l | l&&!r | l&&r | condition |
---|---|---|---|---|
200 | 0 | 42 | 1 | -e $path && -d $path |
208 | 3 | 3 | 5 | -e $path && !(-d $path) |
line | l | !l | condition |
---|---|---|---|
85 | 2 | 0 | $_ || -1 |
142 | 1 | 1 | ($basename =~ /\.?.+\.([^\.]+)$/u)[0] || undef |
179 | 58 | 1 | $expr ||= "*" |
220 | 1 | 1 | $separator //= "\n" |
533 | 36 | 1 | $spec || 'e' |
560 | 2 | 0 | $handle->syswrite($data) // -1 |
line | l | !l&&r | !l&&!r | condition |
---|---|---|---|---|
392 | 0 | 0 | 0 | binmode $handle, $binmode or do { $self->throw("error_on_read_binmode", $path, $binmode, $!)->error } |
415 | 2 | 0 | 0 | $path ||= $self->default |
556 | 0 | 0 | 0 | binmode $handle, $binmode or do { $self->throw("error_on_write_binmode", $path, $binmode, $!)->error } |