The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.
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.