in reply to Help with parsing through a comma delimted file

since no-one else has mentioned it, and since your data might really be CSV and not whitespace delimited as your sample shows, you may want to look at Text::Parsewords (this is a standard module). Use like-
@line = quotewords(',',0,$_);
slurp and sort left to your imagination... of course the best data structure will depend on what else you plan on doing with the data.