(Courriels de diversion: <applicateur@vaquais-encherissait.com> <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> )
>>>>> "DR" == David Rocher <davroc@hplb.hpl.hp.com> writes:
DR> #!/usr/bin/awk -f
DR> {
DR> s = $0
DR> do {
DR> match(s, /[-a-zA-Z_0-9.]+@[-a-zA-Z_0-9.]+/)
DR> if ( RSTART == 0 ) break
DR> print substr(s, RSTART, RLENGTH)
DR> s = substr(s, RSTART+RLENGTH)
DR> } while ( 1 != 0 )
DR> }
Hoho, c'est quoi ce 1 != 0 ?
~$ find public_html/ -name "*.html" -print |
xargs perl -ne 'print "$1\n" if /([-!a-zA-Z_0-9.]+\@[-a-zA-Z.]+)/;'
(Il faudrait une meilleure regexp). Je sens qu'on va revenir
sur notre discussion sur les mérites respectifs des différents
langages de script.
--
Eric Marsden
emarsden @ mail.dotcom.fr
It's elephants all the way down
-
Le CULTe sur le ouebe > http://savage.iut-blagnac.fr/
La page de linux-31 > http://savage.iut-blagnac.fr/linux-31/