We don't bite newbies here... much | |
PerlMonks |
Re: Re: Skip 21 Linesby greenFox (Vicar) |
on Apr 25, 2001 at 04:22 UTC ( [id://75327]=note: print w/replies, xml ) | Need Help?? |
You are repeating quite a bit of code there :) Try this (partially tested)-
I am sure it could be reduced further with a judicious use of map but I can't get my head around it this morning :( Since you are parsing quoted CSV data you may want to look at Text::CSV which is a standard module or tilly's Text::xSV which is also available from CPAN. --
In Section
Seekers of Perl Wisdom
|
|