I downloaded your code, and couldn't spot the problem for certain (since I don't have @data_one, two, etc to look at)

Where you print out "We are in the MAIN loop", try printing out $count and $element. Since it doesn't look like $element is increasing anywhere, this should help you figure out why $count isn't ever exceeding $element.

Maybe $element isn't set correctly above? Or maybe you just have an OBOE (off by one error) with $count? I'd have to see more code to be sure...

Hope this helped,
Scot