$line =~ /^(?:[^,]+|"[^"]+")(?:,(?:[^,]+|"[^"]+"))*$/