Two stylistic notes, if you don't mind: you're using @toc, @body and so on like globals: everybody is accessing them freely. In that case, consider declaring them package globals with our (or use vars if you care about this running on older perls); and also, using ALL_UPPERCASE names, or at least Capitalized ones.

(Lexicals do work here. It's a matter of *how* you're working with them that suggests the package globals. If you decide to modularize this code, you will probably have to rework them into something else -- *because* they're used like globals. So at least make it explicit :-)