John Edwards wrote: > > You can use the following code... > > $email = 'Name LastName <[EMAIL PROTECTED]>'; > $email =~ /<([\w@.]+)>/; > $email = $1; > print $email;
What about this valid e-mail address <[EMAIL PROTECTED]>? What if $1 is set from a previous match and this match fails? John -- use Perl; program fulfillment -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]
