ldapsearch -x "(mail=*)" mail | grep "mail.*@" | perl -n -l -F. -e 's/mail:\s//g; {print lc($_) if $_ =~ /.*\..*@/}' | less