The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.

NAME

Mail::Message::Field::AddrGroup - A group of Mail::Message::Field::Address objects

INHERITANCE

 Mail::Message::Field::AddrGroup
   is an User::Identity::Collection::Emails
   is an User::Identity::Collection
   is an User::Identity::Item

SYNOPSIS

 my $g = Mail::Message::Field::AddrGroup->new(name => 'name');

 my $a = Mail::Message::Field::Address->new(...);
 $g->addAddress($a);
 
 my $f = Mail::Message::Field::Addresses->new;
 $f->addGroup($g);

DESCRIPTION

An address group collects a set of e-mail addresses (in this case they are Mail::Message::Field::Address objects).

OVERLOADED

overload: @{}

overload: stringification

METHODS

$obj->string

    Returns the address group as string. When no name is specified, it will only be a comma separated list of addresses. With a name, the groups name will be prepended and a semi-colon appended. When no addresses where included and there is no name, then undef is returned.

Constructors

$obj->coerce(OBJECT)

Mail::Message::Field::AddrGroup->new([NAME], OPTIONS)

Attributes

$obj->description

$obj->itemType

$obj->name([NEWNAME])

$obj->roles

Collections

$obj->add(COLLECTION, ROLE)

$obj->addCollection(OBJECT | ([TYPE], OPTIONS))

$obj->collection(NAME)

$obj->parent([PARENT])

$obj->removeCollection(OBJECT|NAME)

$obj->type

Mail::Message::Field::AddrGroup->type

$obj->user

Maintaining roles

$obj->addRole(ROLE| ( [NAME],OPTIONS ) | ARRAY-OF-OPTIONS)

$obj->removeRole(ROLE|NAME)

$obj->renameRole(ROLE|OLDNAME, NEWNAME)

$obj->sorted

Searching

$obj->find(NAME|CODE|undef)

Addresses

$obj->addAddress(STRING|ADDRESS|OPTIONS)

    Add one e-mail address to the list which is maintained in the group. This is a wrapper around addRole() adding flexibility on how addresses are specified. An ADDRESS can be anything which is acceptable for Mail::Message::Field::Address::coerce() or a list of options which will create such an object.

    Example: of adding an address to an address group

     my @data = (full_name => "Myself", address => 'me@tux.org');
     $group->addAddress(@data);
    
     my $addr = Mail::Message::Field::Address->new(@data);
     $group->addAddress(@data);
    
     my $ma = Mail::Address->new(...);
     $group->addAddress($ma);

$obj->addresses

    Returns all addresses defined in this group. The addresses will be ordered alphabetically to make automated testing possible: roles are stored in a hash, so have an unpredictable order by default.

    Example: getting all addresses from a group

     my @addrs = $group->addresses;
     my @addrs = map { $_->address } $self->roles; #same

Error handling

DIAGNOSTICS

Error: $object is not a collection.

The first argument is an object, but not of a class which extends User::Identity::Collection.

Error: Cannot coerce a $type into a Mail::Message::Field::AddrGroup

Error: Cannot create a $type to add this to my collection.

Some options are specified to create a $type object, which is native to this collection. However, for some reason this failed.

Error: Cannot load collection module for $type ($class).

Either the specified $type does not exist, or that module named $class returns compilation errors. If the type as specified in the warning is not the name of a package, you specified a nickname which was not defined. Maybe you forgot the 'require' the package which defines the nickname.

Error: Cannot rename $name into $newname: already exists

Error: Cannot rename $name into $newname: doesn't exist

Error: Creation of a collection via $class failed.

The $class did compile, but it was not possible to create an object of that class using the options you specified.

Error: Don't know what type of collection you want to add.

If you add a collection, it must either by a collection object or a list of options which can be used to create a collection object. In the latter case, the type of collection must be specified.

Warning: No collection $name

The collection with $name does not exist and can not be created.

Error: Wrong type of role for $collection: requires a $expect but got a $type

Each $collection groups sets of roles of one specific type ($expect). You cannot add objects of a different $type.

SEE ALSO

This module is part of Mail-Box distribution version 2.070, built on March 25, 2007. Website: http://perl.overmeer.net/mailbox/

LICENSE

Copyrights 2001-2007 by Mark Overmeer.For other contributors see ChangeLog.

This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself. See http://www.perl.com/perl/misc/Artistic.html