Her csv kaydının farklı sayıda alana sahip olabileceği bir metin dosyası düşünün. Görev, dosyanın her kaydında kaç alan bulunduğunu göstermek için kod yazmaktır. Dosyada başlık satırı olmadığını ve istediğiniz gibi bir dosyadan veya standart girdiden okuyabileceğini varsayabilirsiniz.

Dosyanın her satırının tanımı için aşağıda açıklayacağım csv kuralları için rfc4180'in bir sürümünü varsayabilirsiniz . Spesifikasyonun ilgili bölümünün hafifçe düzenlenmiş bir versiyonu:

CSV Formatının Tanımı

1. Her kayıt, satır sonu (CRLF) ile ayrılmış ayrı bir satırda bulunur. Örneğin:

   aaa,bbb,ccc CRLF
   zzz,yyy,xxx CRLF

2. Dosyadaki son kaydın bir bitiş sonu kesmesi olabilir veya olmayabilir. Örneğin:

   aaa,bbb,ccc CRLF
   zzz,yyy,xxx

(Kural 3. bu sorun için geçerli değildir)

4. Her kayıtta, virgülle ayrılmış bir veya daha fazla alan olabilir. Boşluklar bir alanın parçası olarak kabul edilir ve göz ardı edilmemelidir.

5. Her alan çift tırnak içine alınabilir veya alınmayabilir. Alanlar çift tırnak içine alınmazsa, alanların içinde çift tırnak görünmeyebilir. Örneğin:

   "aaa","bbb","ccc" CRLF
   zzz,yyy,xxx

6. Satır sonu (CRLF), çift tırnak ve virgül içeren alanlar çift tırnak içine alınmalıdır. Örneğin:

   "aaa","b CRLF
   bb","ccc" CRLF
   zzz,yyy,xxx

7. Alanları kapatmak için çift tırnak işareti kullanılıyorsa, alanın içinde görünen çift tırnaktan önce başka bir çift tırnak işareti kullanılmalıdır. Örneğin:

   "aaa","b""bb","ccc"

Misal

Giriş:

,"Hello, World!"
"aaa","b""bb","ccc"
zzz,yyy,
"aaa","b 
bb","ccc","fish",""

Çıktı vermelidir:

2, 3, 3, 5

Çıkış değerlerini en uygun bulduğunuz şekilde verebilirsiniz.

Kütüphaneler

İstediğiniz herhangi bir kütüphaneyi kullanabilirsiniz.

Şimdiye kadar harika yanıtlar ama özellikle harika olacak bir komut satırı / bash cevabı eksik.

Stax , 19 12 bayt

èJ§3‼}vAà○L>

Çalıştır ve hata ayıkla

Ambalajından çıkarılmış, golf edilmemiş ve yorum yapılmış gibi görünüyor.

_'"/    split *all* of standard input by double quote characters
2::     keep only the even numbered elements
|j      split on newlines (implicitly concatenates array of "strings")
m       for each line, execute the rest of the program and output
  ',#^  count the number of commas occurring as substrings, and increment

Bunu çalıştır

R , 40 bayt

(x=count.fields(stdin(),","))[!is.na(x)]

Çevrimiçi deneyin!

Başına belgelere ait count.fields, satır sonları alanlar ilk hat için NA'nın bir saha sayısı elde, bu yüzden onları filtre.

JavaScript (ES2018), 42 59 bayt

s=>s.replace(/".+?"/sg).split`\n`.map(c=>c.split`,`.length)

f=
s=>s.replace(/".+?"/sg).split`\n`.map(c=>c.split`,`.length)

console.log(f(
`,"Hello, World!"
"aaa","b""bb","ccc"
zzz,yyy,
"aaa","b 
bb","ccc","fish",""`))

Jöle , 12 bayt

ṣ”"m2FỴ=”,§‘

Bir bağlantı noktası özyinelemenin Stax cevap - git kredi ver!

Çevrimiçi deneyin!

Nasıl?

ṣ”"m2FỴ=”,§‘ - Link: list of characters, V
 ”"          - a double quote character = '"'
ṣ            - split (V) at ('"')
   m2        - modulo slice with two (1st, 3rd, 5th, ... elements of that)
     F       - flatten list of lists to a list
      Ỵ      - split at newlines
        ”,   - comma character = ','
       =     - equal? (vectorises)
          §  - sum each
           ‘ - increment (vectorises)
             - (as a full program implicit print)

Belki tercih edersiniz ṣ”"m2ẎỴċ€”,‘- Ẏsıkın ve ċ€her birinde virgül sayar.

Python, 63 bayt

import csv
def f(s):return map(len,csv.reader(s.split("\n"))

Çıkarılabilir bir mapnesnede çıktıyı döndürür .

Wolfram Dili (Mathematica) , 30 bayt

Length/@ImportString[#,"CSV"]&

Çevrimiçi deneyin!

Perl 5.10.0, 55 53 bayt

$_=shift;s/"(""|[^"])*"//g;s/^.*$/1+$&=~y:,::/gem;say

Çevrimiçi deneyin!

Açıklama:

$_=shift;          # first command-line arg
s/"(""|[^"])*"//g; # remove quoted fields
s/^.*$/            # replace each line       
  1+$&=~y:,::      # by the number of commas plus 1
/gem;
say                # print

Java 10, 101 bayt

s->{for(var p:s.replaceAll("\"[^\"]*\"","x").split("\n"))System.out.println(p.split(",",-1).length);}

Çevrimiçi deneyin.

Açıklama:

s->{                                    // Method with String parameter and no return-type
  for(var p:s.replaceAll("\"[^\"]*\"","x") 
                                        //  Replace all words within quotes with an "x"
             .split("\n"))              //  Then split by new-line and loop over them:
    System.out.println(p.split(",",-1)  //   Split the item by comma's
                        .length);}      //   And print the length of this array

Jöle , 17 bayt

=”"ÄḂżṣ⁷Ż¤ṣ€0,”,Ẉ

Çevrimiçi deneyin!

-1 Jonathan Allan sayesinde . duh duh duh ...