How to recursively list subdirectories in Bash without using “find” or “ls” commands?

Question

I know you can use the find command for this simple job, but I got an assignment not to use find or ls and do the job. How can I do th

Answer 1

Technically, neither find nor ls are used by find2perl|perl or File::Find directly.

$ find2perl -type d | perl
$ perl -MFile::Find -e'find(sub{-d&&print"$File::Find::name\n"},".")'