@line = split(/some expression that only matches commas not within quotes/, $_);