blib/lib/File/System/Test.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
condition | 14 | 16 | 87.5 |
line | !l | l&&!r | l&&r | condition |
---|---|---|---|---|
651 | 494 | 320 | 436 | not $_[0]->path =~ m[/\.[^/]+$] and $_[0]->parent eq $obj |
654 | 522 | 292 | 436 | $_[0]->parent eq $obj and not $_[0]->path =~ m[/\.[^/]+$] |
659 | 964 | 58 | 228 | $_[0]->path =~ m[^$obj/?[^/]+/] and not $_[0]->path =~ m[^$obj/?[^/]+/[^/]+/] |
1022 | 58 | 170 | $_[0]->path =~ m[^$obj/?[^/]+/] and not $_[0]->path =~ m[^$obj/?[^/]+/[^/]+/] and not $_[0]->path =~ m[/\.[^/]+$] |
line | l | !l | condition |
---|---|---|---|
330 | 281 | 0 | eval {
do {
$lookup->path
}
} || ' |
331 | 281 | 0 | eval {
do {
$child->path
}
} || ' |