http://www.perlmonks.org?node_id=374131


in reply to Tree Traversal Script/Nested Sets

How about DBIx::Tree or DBIx::Tree::NestedSet?