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

NAME

Mail::Message::Head::ResentGroup - header fields tracking message delivery

INHERITANCE

 Mail::Message::Head::ResentGroup
   is a Mail::Message::Head::FieldGroup
   is a Mail::Reporter

SYNOPSIS

 my $rg = Mail::Message::Head::ResentGroup->new(head => $head,
              From => 'me@home.nl', To => 'You@tux.aq');
 $head->addResentGroup($rg);

 my $rg = $head->addResentGroup(From => 'me');

 my @from = $rg->From;

 my @rgs = $head->resentGroups;
 $rg[2]->delete if @rgs > 2;

DESCRIPTION

A resent group is a set of header fields which describe one intermediate step in the message transport. Resent groups have NOTHING to do with user activety; there is no relation to the user's sense of creating reply, forward, or bounce messages at all!

METHODS

Constructors

$obj->clone

$obj->from([HEAD|MESSAGE, OPTIONS])

    WARNING: this method has two very different purposes. For backward compatibility reasons, without arguments resentFrom() is called to return the From field of this resent group.

    With any arguments, a list of Mail::Message::Head::ResentGroup objects is returned, taken from the specified MESSAGE or message HEAD.

$obj->implementedTypes

Mail::Message::Head::ResentGroup->implementedTypes

Mail::Message::Head::ResentGroup->new([FIELDS], OPTIONS)

    Create an object which maintains one set of resent headers. The FIELDS are Mail::Message::Field objects from the same header.

    OPTIONS which start with capitals will be used to construct additional fields. These option names are prepended with Resent-, keeping the capitization of what is specified.

     Option      --Defined in     --Default
     Bcc                            undef
     Cc                             undef
     Date                           <now>
     Delivered-To                   undef
     From                           <required>
     Message-ID                     <uniquely created>
     Received                       <created>
     Return-Path                    undef
     Sender                         undef
     To                             undef
     head                           <created automatically>
     log           Mail::Reporter   'WARNINGS'
     message_head                   undef
     software      Mail::Message::Head::FieldGroup  undef
     trace         Mail::Reporter   'WARNINGS'
     type          Mail::Message::Head::FieldGroup  undef
     version       Mail::Message::Head::FieldGroup  undef

    . Bcc STRING|OBJECT|OBJECTS

    . Cc STRING|OBJECT|OBJECTS

    . Date STRING

      When this resent-group is dispatched by the resender of the message. Like the Date field, it is not the date and time that the message was actually transported.

    . Delivered-To STRING|FIELD

    . From STRING|OBJECT|OBJECTS

    . Message-ID STRING|FIELD

      The Resent-Message-ID which identifies this resent group. The FIELD must contain a message id.

    . Received STRING

      The Received field is the starting line for a resent group of header lines. If it is not defined, one is created using createReceived().

    . Return-Path STRING|FIELD

    . Sender STRING|OBJECT

      Only permitted when more than one from address is specified. In this case, it selects one of these addresses as the main originator of the message.

    . To STRING|OBJECT|OBJECTS

    . head OBJECT

    . log LEVEL

    . message_head HEAD

      The real header of the message where this resent group is part of. The head used in this class is only a container for a subset of fields.

    . software STRING

    . trace LEVEL

    . type STRING

    . version STRING

The header

$obj->add((FIELD => VALUE) | OBJECT)

    All fields appear only once, so add() behaves as set().

$obj->addFields([FIELDNAMES])

    Not applicable to resent-groups: the same name can appear in more than one group. Therefore, a FIELDNAME is sufficiently distinctive.

$obj->attach(HEAD)

$obj->delete

$obj->fieldNames

$obj->fields

$obj->head

$obj->messageHead([HEAD])

$obj->orderedFields

    Returns the fields in the order as should appear in header according to rfc2822. For the Resent- fields of the group, the order is not that important, but the Return-Path, Delivered-To, and Received must come first. Only fields mentioned in the RFC are returned.

$obj->set((FIELD => VALUE) | OBJECT)

    Set a FIELD to a (new) VALUE. The FIELD names which do not start with 'Resent-*' but need it will have that added. It is also an option to specify a fully prepared message field OBJECT. In any case, a field OBJECT is returned.

    Example:

     my $this = Mail::Message::Head::ResentGroup->new;
     $this->set(To => 'fish@tux.aq');
     $msg->addResentGroup($this);
     $msg->send;
    
     $msg->bounce(To => 'fish@tux.aq')->send;   # the same
    
     my $this = Mail::Message::Head::ResentGroup
         ->new(To => 'fish@tux.aq');

Access to the header

$obj->bcc

    In scalar context, the Resent-Bcc field is returned. In list context, the addresses as specified within the bcc field are returned as Mail::Address objects. Bcc fields are not transmitted (hidden for external parties).

$obj->cc

    In scalar context, the Resent-Cc field is returned. In list context, the addresses as specified within the cc field are returned as Mail::Address objects.

$obj->date

    Returns the Resent-Date field, or undef if it was not defined.

$obj->dateTimestamp

    The timestamp as stored within the Resent-Date field converted to local system time.

$obj->deliveredTo

    The field which describes the Delivered-To of this resent group.

$obj->destinations

    Returns a list of all addresses specified in the Resent-To, -Cc, and -Bcc fields of this resent group.

$obj->isResentGroupFieldName(NAME)

Mail::Message::Head::ResentGroup->isResentGroupFieldName(NAME)

$obj->messageId

    Returns the message-ID used for this group of resent lines.

$obj->received

    The field which describes the Received data of this resent group.

$obj->receivedTimestamp

    The timestamp as stored within the Received field converted to local system time.

$obj->resentFrom

    In scalar context, the Resent-From field is returned. In list context, the addresses as specified within the from field are returned as Mail::Address objects.

    For reasons of backward compatibility and consistency, the from() method will return the same as this method.

$obj->returnPath

    The field which describes the Return-Path of this resent group.

$obj->sender

    In scalar context, the Resent-Sender field is returned. In list context, the addresses as specified within the from field are returned as Mail::Address objects.

$obj->software

$obj->to

    In scalar context, the Resent-To field is returned. In list context, the addresses as specified within the to field are returned as Mail::Address objects.

$obj->type

$obj->version

Internals

$obj->collectFields([NAME])

$obj->createReceived([DOMAIN])

    Create a recieved field for this resent group. This is automatically called if none was specified during creation of this resent group object.

    The content of this field is described in RFC2821 section 4.4. It could use some improvement.

$obj->detected(TYPE, SOFTWARE, VERSION)

Error handling

$obj->AUTOLOAD

$obj->addReport(OBJECT)

$obj->defaultTrace([LEVEL]|[LOGLEVEL, TRACELEVEL]|[LEVEL, CALLBACK])

Mail::Message::Head::ResentGroup->defaultTrace([LEVEL]|[LOGLEVEL, TRACELEVEL]|[LEVEL, CALLBACK])

$obj->details

$obj->errors

$obj->log([LEVEL [,STRINGS]])

Mail::Message::Head::ResentGroup->log([LEVEL [,STRINGS]])

$obj->logPriority(LEVEL)

Mail::Message::Head::ResentGroup->logPriority(LEVEL)

$obj->logSettings

$obj->notImplemented

$obj->print([FILEHANDLE])

$obj->report([LEVEL])

$obj->reportAll([LEVEL])

$obj->trace([LEVEL])

$obj->warnings

Cleanup

$obj->DESTROY

$obj->inGlobalDestruction

DIAGNOSTICS

Error: Message header required for creation of ResentGroup.

It is required to know to which header the resent-group is created. Use the head option. Maybe you should use Mail::Message::Head::Complete::addResentGroup() with DATA, which will organize the correct initiations for you.

Error: Package $package does not implement $method.

Fatal error: the specific package (or one of its superclasses) does not implement this method where it should. This message means that some other related classes do implement this method however the class at hand does not. Probably you should investigate this and probably inform the author of the package.

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