What are the fields in that thing? Looks to me rather like comma separated data with two sub-fields per field. If that is the case then maybe something like Text::xSV or Text::CSV is appropriate for a first pass over the line?