/ 
Regexp-Common-Email-Address-1.01
River stage two • 8 direct dependents • 13 total dependents
/ Regexp::Common::Email::Address

NAME

Regexp::Common::Email::Address - Returns a pattern for Email Addresses

SYNOPSIS

use Regexp::Common qw[Email::Address];
use Email::Address;

while (<>) {
    my (@found) = /($RE{Email}{Address})/g;
    my (@addrs) = map $_->address,
                      Email::Address->parse("@found");
    print "X-Addresses: ",
          join(", ", @addrs),
          "\n";
}

DESCRIPTION

$RE{Email}{Address}

Provides a regex to match email addresses as defined by RFC 2822. Under {-keep}, the entire match is kept as $1. If you want to parse that further then pass it to Email::Address->parse(). Don't worry, it's fast.

SEE ALSO

Email::Address, Regexp::Common, perl.

AUTHOR

Casey West, <casey@geeknest.com>.

COPYRIGHT

Copyright (c) 2005 Casey West.  All rights reserved.
This module is free software; you can redistribute it and/or modify it
under the same terms as Perl itself.