#!/bin/sh
echo "$( sed 's/(/ /g' emails )" > emails
echo "$( sed 's/)/ /g' emails )" > emails
echo "$( sed 's/;/,/g' emails )" > emails
echo "$( sed 's/,/ /g' emails )" > emails
echo "$( sed 's/ /\n/g' emails )" > emails
echo "$( sed 's/"//g' emails )" > emails
perl email.perl emails > temp
cat temp > emails
echo "$( grep -v " " emails )" > emails 
echo "$( sed 's/$//g' emails )" > emails
echo "$( tr 'A-Z' 'a-z' < emails )" > emails
echo "$( cat emails |sort | uniq )" > emails
echo "$( sed 's/$//g' emails )" > emails
rm -f temp
less emails
echo `wc -l emails`