in reply to split on commas

How about @fields = split /[>)],[<(]/ , $line;

In Section Seekers of Perl Wisdom