Peržiūrėti šaltinį El pašto adresų gavimas

 perl -ne'if(/[\w\.\-\_]+@([\w\-\_]+\.)+[A-Za-z]{2,4}/g){print "$&\n"}' tekstas.txt | sort | uniq > pasto_adresai.txt
Pastarasis būdas netinka jeigu daug adresų surašyta į vieną eilutę (sql dump'as ir t.t.), tuomet galime pasinaudoti egrep visiems adresatams išgauti
 grep -h -E -o "\b[A-Za-z0-9._%+-]+@[A-Za-z0-9.-]+\.[A-Za-z]{2,6}\b" tekstas.txt | sort | uniq > pasto_adresai.txt
= Atrinkimas =
Atrinkti tiktai unikalius adresus
 cat vienas_failas antras_failas |awk '!x[$0]++' > unikalus.txt
Surikiuoti abeceles tvarka ir sudeti tiktai unikalius
 cat vienas_failas antras_failas| sort -u > unikalus_surikiuotas.txt

= Pastu skirstymas =
LT:
 cat pasto_adresai.txt |grep -i \.lt > lietuviski_emailai.txt
KITI:
 cat pasto_adresai.txt |grep -vi \.lt > kiti_emailai.txt

[[Category:Scripts]]