It looks like the format of your data in the final section "How can I correct the code so that my output is clean" is still fairly garbled. I'll assume that you wanted things lined up like:

If you download the code and view it with tab width 8, it will show up correctly. It doesn't in the node as perlmonks has a simpler idea about displaying tab characterss in code tags than is required here.