It sounds like you might be trying to write Tree::Trie, which creates a nested, searchable list based on the characters in it.

Check it out, and also the thread word association problem

-jackdied