$ ls -d vskatusa/*/*/*
vskatusa/blarg/blorg/blech	vskatusa/foo/bar/baz

$ perl -Mstrict -MPath::Tiny -wE 'say for path("vskatusa")->children'
vskatusa/blarg
vskatusa/foo

$ echo 'frooble' > vskatusa/textfile

$ perl -Mstrict -MPath::Tiny -wE 'say for path("vskatusa")->children'
vskatusa/blarg
vskatusa/textfile
vskatusa/foo

$ perl -Mstrict -MPath::Tiny -wE 'path("vskatusa")->visit(sub { say if $_->is_dir });'
vskatusa/blarg
vskatusa/foo