Stewart,
I'm guessing it can be done with split, but I used a regex to do it,
and that way
I don't have to worry about taking out the extra ", <, and >.
my $full_address='"My Name" <[EMAIL PROTECTED]>';
my ($user, $email);
print "$full_address\n";
$full_address=~/^"(.+)" <(.+)>$/;
$user=$1;
$email=$2;
print "$user\'s email is $email\n";
If the format is ALWAYS going to be this way, this works, otherwise you
might
want to make the regex conditional and do some error checking. Hope that
helps.
Pete
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
