On Thu, 24 Jun 2004 18:17:41 +1000
Owen <[EMAIL PROTECTED]> wrote:
> On Thu, 24 Jun 2004 13:29:12 +0600
> "LRMK" <[EMAIL PROTECTED]> wrote:
>
> > I am using following code to validate e-mail addresses
> >
> > if ($mail =~ m/^(\w+(\.|-))*\w+\@(\w+(\.|-)*)+\w+$/){
> > valid
> > }else{
> > invalid
> > }
>
> A comprehensive regex for checking e-mail addresses may be found at;
>
> http://www.foad.org/~abigail/Perl/url3.regex
Ooops, that was for URLs, now I can't find the posting to c.l.p.m
Sorry
Owen
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
<http://learn.perl.org/> <http://learn.perl.org/first-response>
