from the system tree command to show file structure
.
`-- a
    |-- b
    |   |-- c
    |   |   `-- file.tcl
    |   `-- sym2 -> c
    `-- sym1 -> b

6 directories, 1 file

../2perltree.pl: a/b/c/file.tcl
../2perltree.pl: a/b/sym2/file.tcl
../2perltree.pl: a/sym1/c/file.tcl
../2perltree.pl: a/sym1/sym2/file.tcl

Path::Tiny::visit: a/sym1/c/file.tcl
Path::Tiny::visit: a/sym1/sym2/file.tcl
Path::Tiny::visit: a/b/c/file.tcl
Path::Tiny::visit: a/b/sym2/file.tcl

File::Find a/b/c/file.tcl