The one thing that jumps out at me quickly is that the object-structure has you doing a lot of dereferencing, array lookups, and hash lookups to get to your actual content. You might consider if there are places you can benefit from creating temporary references deeper into your strucure before loop and avoid dereferencing through $self->[xxxx] each time through.

xdg