grep sayısı çoklu oluşumlar

Tek bir komutta bir dosyada birden fazla olayın grep sayısını yapmak mümkün müdür? Örneğin:

$ cat > file
blah alfa
beta blah
blah blahgamma
gamma

Yapabilirim:

grep -c 'alfa' file 
1 
grep -c 'beta' file  
1
grep -c 'gamma' file  
2

Ancak böyle bir şey yapmak mümkün mü:

grep -c -e 'alfa' -e 'beta' -e 'gamma' -somemoreblackmagic file

ve her biri için sayıları almak?

alfa 1
beta 1
gamma 2

Grep'in yapmak istediğini yapabileceğini sanmıyorum.

Sadece bunun yerine awk kullanın :-)

Bu çözüm büyük dosyalar için iyi çalışmayabilir (optimize edilmemiştir). Ve sadece düz kelimeler için çalışır - regexps. Ancak istenirse bazı özellikler eklemek kolaydır.

Kısıtlamaları olan düşük uçlu versiyon, aşağıdaki açıklamalarda belirtilmiştir:

awk '
{
    split($0, b); for (i in b) ++A[b[i]]
}
END {
    split("'"$*"'", a)
    for (i in a) print sprintf("%s %d", a[i], A[a[i]])
}
'

sadece arama dizelerini doğrudan betiğe verin

[EDIT]
regex destekli sabit sürüm (aşağıdaki yoruma bakın). Lütfen hala herhangi bir açık sorun olup olmadığını söyle.

# ---- my favorite ----
awk -F' ?-c ' '
BEGIN { split("'"$*"'", a) }
{ for (i = 2; a[i]; ++i) if (match($0, a[i])) ++A[i] }
END { for (i = 2; a[i]; ++i) if (A[i]) print a[i] " " A[i] }
'
# ---- my favorite ----

örnek kullanım:

script_name -c alfa -c beta -c gamma << !
alfa
beta
gamma
gamma
!

verir:

alfa 1
beta 1
gamma 2

regex kullanımı:

script_name -c   "^al"    -c "beta" -c gamma -c "m.$" << !
alfa
beta
gamma
gamma
!

verir:

^al 1
beta 1
gamma 2
m.$ 2

[/DÜZENLE]

İhtiyacınız olanı sadece grep , sort ve uniq kullanarak elde edebilirsiniz .

grep -EIho 'alfa|beta|gamma' *|sort|uniq -c

awkKabuk betiği sarmalayıcısı ile birlikte atılmış başka bir çözüm:

#! / bin / sh -
garip
BEGIN {split ("alfa beta gamma", anahtar kelime)
        (anahtar kelimedeki i) için [anahtar sözcük [i]] = 0
}
/ alfa / {count ["alfa"] ++}
/ beta / {count ["beta"] ++}
/ gamma / {count ["gamma"] ++}
SON {
        (i anahtar kelimesindeki) için [i] anahtar kelimesini yazdır, say [anahtar kelimesi [i]]
}'

Çalışma zamanında arama anahtar kelimelerini seçebilmek (ve sparkie'nin cevabında olduğu gibi bunları bağımsız değişken olarak sunmak) istiyorsanız, bu komut awkdosyası komut dosyasını dinamik olarak oluşturmak için uyarlanabilir .

Perl çözümü:

perl -lne 'chomp;$s{$_}++ if /alpha|beta|gamma/ }{ print "$_ $s{$_}" for keys %s' file

Hiçbir geçiş bir seferde bunu yapamaz, awk kullanmanızı öneririm:

awk -v pat='alfa beta gamma' '
  BEGIN { split(pat, p) } 

  { for(k in p) if($0 ~ p[k]) c[k]++ }

  END { for(k in p) print p[k], c[k]?c[k]:0 }
'

Veya oldukça uzun bir gömlek:

awk -v pat='alfa beta gamma' 'BEGIN { split(pat, p) } { for(k in p) if($0 ~ p[k]) c[k]++ } END { for(k in p) print p[k], c[k]?c[k]:0 }'

açıklama

patpdiziye ayrılır ve ardından her satırdaki eşleşmeleri aramak için kullanılır ( $0 ~ p[k]). Sayaçlar cdizide tutulur . c[k]?c[k]:0Biraz zaman 0 yazdırmak için üçlü operatörü kullanan c[k]sıfırdır.

Desendinizde boşluk varsa pat, splitkomutları buna göre güncellemek için desenler arasında farklı bir sınırlayıcı kullanmanız gerekir .

Test yapmak

Giriş:

cat << EOF > file
alfa
beta
gamma
gamma
EOF

Çıkış pat='alfa beta gamma':

alfa 1
beta 1
gamma 2

Giriş:

cat << EOF > file
alfa beta
beta
gamma gamma
gamma alfa
alfalfa
alfa alfa
EOF

Çıkış pat='^a a$ alfa beta gamma':

beta 2                                          
gamma 2
^a 3
a$ 6
alfa 4

Çıktı her iki durumda da çıkışın grep -cher desenle ayrı ayrı çalışmasını sağlar.

uniq(İle sort) kullanmanızı öneririm .

$ sort file | uniq -c
1 alfa
1 beta
2 gamma

İhtiyacınız sortdosya sıralanabilir olmayabilir if (aslında, birden oluşumları ardışık hatlarda olmayabilir ise).

GÜNCELLEŞTİRME:

Önceden tanımlanmış kalıplara sahip olduğunuzu ve boşluk içermediğini varsayarsak:

$ PATTERNS='alfa beta gamma'

$ for P in $PATTERNS; do echo $P `grep -c $P file`; done
alfa 1
beta 1
gamma 2

İşte günlük işlerimden bir örnek:

FlowBase.java ile biten Tüm Dosyalar, "Girdi *"> 1 dizesinin oluşması

Örnek: dosya listelenecek

"İnputABD"

"İnputABD"

$ i için $ (find. | grep FlowBase.java); $ i $ (egrep "girişi. " $ i | sed 's / ^. "girişini yapın. // giriş | $ 2} 'yazdır | wc -l); bitti | awk '($ 2> 0) {$ $} yazdır