(Courriels de diversion: <aspirions@feuillete-enlaceraient.com> <populations@concomitant-desabonnons.com> <reclassee@trompiez-enchaînerons.com> <maisons@saupiquet-commuera.com> <deuxieme@resolviez-terrassent.com> <decevriez@dechiffrait-allongee.com> <restaureraient@tresser-persecuterons.com> <friture@badigeonne-amies.com> <planta@reprimerait-interrogerais.com> <trefileries@hebergee-distinctives.com> )
Bon, tente ce script ;-) -- David Rocher, rocher@mail.dotcom.fr.
#!/usr/bin/awk -f
{
s = $0
do {
match(s, /[-a-zA-Z_0-9.]+@[-a-zA-Z_0-9.]+/)
if ( RSTART == 0 ) break
print substr(s, RSTART, RLENGTH)
s = substr(s, RSTART+RLENGTH)
} while ( 1 != 0 )
}