in reply to Split file using perl and regexp

Have you looked into using any of the various CSV modules?

In Section Seekers of Perl Wisdom