if ($subpath eq $target || 0 == index $subpath, "$target/") {