Re: [PERL] email grab

[Thomas Eibner <sslug@sslug>]

On Fri, Jun 15, 2001 at 08:36:04AM +0200, Jesper Bunch wrote:
> -CUT-
> > s/fisk(?:a|b|c)hest/$1/i;
> >
> > vil matche de samme ord, men uden at der gemmes ting
> > i en reference, dvs. den fungere bare som en parentes for
> > (a|b|c) udtrykket.
> 
> Smart! Det vidste jeg ikke :)
> 
> >
> > > Men anyway...
> > > (?:(?:[a-z0-9]+[a-z0-9-]*)+\.) kan ikke laves om med \w da
> der
> > > ikke må være _ i et domæne navn og du må ikke have et domæne
> navn
> > > med - til at starte med (hvilket din såvidt jeg kan se din
> > > tillader).
> >
> > Det er sandt. Men typisk vil risikoen for at folk indtaster
> > syntaktisk ukorrekte email addresser der ikke virker, være ret
> > begrænset, og så længe whitespaces ikke er inkluderet så burde
> > forskellen være stort set det samme..
> 
> Jeg vil helst være sikker på at jeg ikke får ukorrekte emails,
> men ellers ja.

Ville det saa ikke vaere en ide at koere dem igennem Email::Valid
modulets checker? Det skulle vist nok kunne hive emailadresser ud af
tekst efter rfc-et-eller-andet's opskrift.

-- 
  Thomas Eibner <http://thomas.eibner.dk/> DnsZone <http://dnszone.org/>
  mod_pointer <http://stderr.net/mod_pointer>