OS Manuals

Mail::Address(3pm)

Mail::Address(3) User Contributed Perl Documentation Mail::Address(3)

 foreach $addr (@addrs) {
     print $addr->format,"\n";
 }

"Mail::Address" extracts and manipulates email addresses from a message header. It cannot be used to extract addresses from some random text. You can use this module to create RFC822 compliant fields.

Although "Mail::Address" is a very popular subject for books, and is used in many applications, it does a very poor job on the more complex message fields. It does only handle simple address formats (which covers about 95% of what can be found). Problems are with

Often requests are made to the maintainers of this code improve this situation, but this is not a good idea, where it will break zillions of existing applications. If you wish for a fully RFC2822 compliant implementation you may take a look at Mail::Message::Field::Full, part of MailBox.

  my @g = $s->groups;          # all groups, at least one
  # ref $g[0] isa Mail::Message::Field::AddrGroup;
  my $ga = $g[0]->addresses;   # group addresses
  my @a = $s->addresses;       # all addresses
  # ref $a[0] isa Mail::Message::Field::Address;

=c_method new $phrase, $address, [ $comment ] Create a new "Mail::Address" object which represents an address with the elements given. In a message these 3 elements would be seen like:

 PHRASE <ADDRESS> (COMMENT)
 ADDRESS (COMMENT)

Note: This function tries to be smart with the "phrase" of the email address, which is probably a very bad idea. Consider to use phrase() itself.

Hey! The above document had some coding errors, which are explained below:

Unknown directive: =chapter
Unknown directive: =chapter
Unknown directive: =chapter
Unknown directive: =examples
Unknown directive: =chapter
Unknown directive: =section
Unknown directive: =example
Unknown directive: =method
Unknown directive: =example
Unknown directive: =section
Unknown directive: =method
Unknown directive: =method
Unknown directive: =method
Unknown directive: =method
Unknown directive: =section
Unknown directive: =method
Deleting unknown formatting code M<>
Unknown directive: =method
Unknown directive: =method
2026-10-24 perl v5.44.0

perl-mailtools 2.22-r4 · os · ingested 2026-10-25