in reply to Extracting code into a subroutine
My first thought on reading this is why are you writing lots of this stuff when Text::CSV and similar libraries will probably do all this for you, in a standard maintainable manner?
It seems you're committing the classic mistake of reinventing the wheel.....
In Section
Seekers of Perl Wisdom