Great comments, used every single one so far. I'm ecstatic to have that nasty for loop looking decent. The format I was using for it was based off one in "The Perl Cookbook" for printing all the elements of a multi-dimensional array, and used $#LoL to define the upper range, but when I switched stuff into subroutines and started passing refs I couldn't figure out anything other than what I had.

Appreciate the help everyone on this site has offered, between it and the sheer quantity and quality of the docs perl has won yet another convert!