NAME

Mail::Message::Body::Multipart - body of a message with attachments

INHERITANCE

 Mail::Message::Body::Multipart
   is a Mail::Message::Body
   is a Mail::Reporter

SYNOPSIS

 See Mail::Message::Body

 if($body->isMultipart) {
    my @attachments = $body->parts;
    my $attachment3 = $body->part(2);
    my $before      = $body->preamble;
    my $after       = $body->epilogue;
    $body->part(1)->delete;
 }

DESCRIPTION

The body (content) of a message can be stored in various ways. In this manual-page you find the description of extra functionality you have when a message contains attachments (parts).

OVERLOADED

overload: ""

See Mail::Message::Body/"OVERLOADED"

overload: '==' and '!='

See Mail::Message::Body/"OVERLOADED"

overload: @{}

See Mail::Message::Body/"OVERLOADED"

overload: bool

See Mail::Message::Body/"OVERLOADED"

METHODS

Constructors

$obj->clone

See Mail::Message::Body/"Constructors"

Mail::Message::Body::Multipart->new(OPTIONS)

 Option           --Defined in     --Default
 based_on           Mail::Message::Body  undef
 boundary                            undef
 charset            Mail::Message::Body  'us-ascii'
 checked            Mail::Message::Body  <false>
 data               Mail::Message::Body  undef
 description        Mail::Message::Body  undef
 disposition        Mail::Message::Body  undef
 eol                Mail::Message::Body  'NATIVE'
 epilogue                            undef
 file               Mail::Message::Body  undef
 log                Mail::Reporter   'WARNINGS'
 message            Mail::Message::Body  undef
 mime_type          Mail::Message::Body  'multipart/mixed'
 modified           Mail::Message::Body  <false>
 parts                               undef
 preamble                            undef
 trace              Mail::Reporter   'WARNINGS'
 transfer_encoding  Mail::Message::Body  'none'

. based_on => BODY

. boundary => STRING

Separator to be used between parts of the message. This separator must be unique in case the message contains nested multiparts (which are not unusual). If undef, a nice unique boundary will be generated.

. charset => STRING

. checked => BOOLEAN

. data => ARRAY-OF-LINES | STRING

. description => STRING|FIELD

. disposition => STRING|FIELD

. eol => 'CR'|'LF'|'CRLF'|'NATIVE'

. epilogue => BODY|STRING

The text which is included in the main body after the final boundary. This is usually empty, and has no meaning.

Provide a BODY object or a STRING which will automatically translated into a text/plain body.

. file => FILENAME|FILEHANDLE|IOHANDLE

. log => LEVEL

. message => MESSAGE

. mime_type => STRING|FIELD|MIME

. modified => BOOLEAN

. parts => ARRAY-OF-(MESSAGES|BODIES)

Specifies an initial list of parts in this body. These may be full MESSAGES, or BODIES which transformed into messages before use. Each message is coerced into a Mail::Message::Part object.

MIME::Entity and Mail::Internet objects are acceptable in the list, because they are coercible into Mail::Message::Part's. Values of undef will be skipped silently.

. preamble => BODY|STRING

The text which is included in the body before the first part. It is common use to include a text to warn the user that the message is a multipart. However, this was useful in earlier days: most mail agents are very capable in warning the user themselves.

Provide a BODY object or a STRING which will automatically translated into a text/plain body.

. trace => LEVEL

. transfer_encoding => STRING|FIELD

example:

 my $intro = Mail::Message::Body->new(data => ['part one']);
 my $pgp   = Mail::Message::Body->new(data => ['part three']);

 my $body  = Mail::Message::Body::Multipart->new
   ( boundary => time . '--it-s-mine'
   , preamble => "This is a multi-part message in MIME format.\n\n"
   , parts    => [ $intro, $folder->message(3)->decoded, $pgp ]
   );

Constructing a body

$obj->attach(MESSAGES|BODIES)

Attach a list of MESSAGES to this multipart. A new body is returned. When you specify BODIES, they will first be translated into real messages. MIME::Entity and Mail::Internet objects may be specified too. In any case, the parts will be coerced into Mail::Message::Part's.

$obj->check

See Mail::Message::Body::Encode/"Constructing a body"

$obj->concatenate(COMPONENTS)

See Mail::Message::Body::Construct/"Constructing a body"

$obj->decoded(OPTIONS)

See Mail::Message::Body/"Constructing a body"

$obj->encode(OPTIONS)

See Mail::Message::Body::Encode/"Constructing a body"

$obj->encoded

See Mail::Message::Body::Encode/"Constructing a body"

$obj->eol(['CR'|'LF'|'CRLF'|'NATIVE'])

See Mail::Message::Body/"Constructing a body"

$obj->foreachComponent(CODE)

Execute the CODE for each component of the message: the preamble, the epilogue, and each of the parts.

Each component is a body and is passed as second argument to the CODE. The first argument is a reference to this multi-parted body. The CODE returns a body object. When any of the returned bodies differs from the body which was passed, then a new multi-part body will be returned. Reference to the not-changed bodies and the changed bodies will be included in that new multi-part.

example:

 my $checked = $multi->foreachComponent(sub {$_[1]->check});

$obj->foreachLine((CODE))

It is NOT possible to call some code for each line of a multipart, because that would not only inflict damage to the body of each message part, but also to the headers and the part separators.

$obj->stripSignature(OPTIONS)

Removes all parts which contains data usually defined as being signature. The MIME::Type module provides this knowledge. A new multipart is returned, containing the remaining parts. No OPTIONS are defined yet, although some may be specified, because this method overrules the stripSignature method for normal bodies.

 Option     --Defined in     --Default
 max_lines    Mail::Message::Body::Construct  10
 pattern      Mail::Message::Body::Construct  qr/^--\s?$/
 result_type  Mail::Message::Body::Construct  <same as current>

. max_lines => INTEGER|undef

. pattern => REGEX|STRING|CODE

. result_type => CLASS

$obj->unify(BODY)

See Mail::Message::Body::Encode/"Constructing a body"

The body

$obj->isDelayed

See Mail::Message::Body/"The body"

$obj->isMultipart

See Mail::Message::Body/"The body"

$obj->isNested

See Mail::Message::Body/"The body"

$obj->message([MESSAGE])

See Mail::Message::Body/"The body"

About the payload

$obj->charset

See Mail::Message::Body/"About the payload"

$obj->checked([BOOLEAN])

See Mail::Message::Body/"About the payload"

$obj->description([STRING|FIELD])

See Mail::Message::Body/"About the payload"

$obj->disposition([STRING|FIELD])

See Mail::Message::Body/"About the payload"

$obj->dispositionFilename([DIRECTORY])

See Mail::Message::Body::Encode/"About the payload"

$obj->isBinary

See Mail::Message::Body::Encode/"About the payload"

$obj->isText

See Mail::Message::Body::Encode/"About the payload"

$obj->mimeType

See Mail::Message::Body/"About the payload"

$obj->nrLines

See Mail::Message::Body/"About the payload"

$obj->size

See Mail::Message::Body/"About the payload"

$obj->transferEncoding([STRING|FIELD])

See Mail::Message::Body/"About the payload"

$obj->type([STRING|FIELD])

See Mail::Message::Body/"About the payload"

Access to the payload

$obj->boundary([STRING])

Returns the boundary which is used to separate the parts in this body. If none was read from file, then one will be assigned. With STRING you explicitly set the boundary to be used.

$obj->endsOnNewline

See Mail::Message::Body/"Access to the payload"

$obj->epilogue

Returns the epilogue; the text after the last message part (after the last real attachment). The epilogue is stored in a BODY object, and its encoding is taken from the general multipart header.

$obj->file

See Mail::Message::Body/"Access to the payload"

$obj->lines

See Mail::Message::Body/"Access to the payload"

$obj->part(INDEX)

Returns only the part with the specified INDEX. You may use a negative value here, which counts from the back in the list. Parts which are flagged to be deleted are included in the count.

example:

 $message->body->part(2)->print;
 $body->part(1)->delete;

$obj->parts(['ALL'|'ACTIVE'|'DELETED'|'RECURSE'|FILTER])

Return all parts by default, or when ALL is specified. ACTIVE returns the parts which are not flagged for deletion, as opposite to DELETED. RECURSE descents into all nested multiparts to collect all parts.

You may also specify a code reference which is called for each nested part. The first argument will be the message part. When the code returns true, the part is incorporated in the return list.

example:

 print "Number of attachments: ",
     scalar $message->body->parts('ACTIVE');

 foreach my $part ($message->body->parts) {
     print "Type: ", $part->get('Content-Type');
 }

$obj->preamble

Returns the preamble; the text before the first message part (before the first real attachment). The preamble is stored in a BODY object, and its encoding is taken from the multipart header.

$obj->print([FILEHANDLE])

See Mail::Message::Body/"Access to the payload"

$obj->printEscapedFrom(FILEHANDLE)

See Mail::Message::Body/"Access to the payload"

$obj->string

See Mail::Message::Body/"Access to the payload"

$obj->stripTrailingNewline

See Mail::Message::Body/"Access to the payload"

$obj->write(OPTIONS)

See Mail::Message::Body/"Access to the payload"

Internals

$obj->addTransferEncHandler(NAME, CLASS|OBJECT)

Mail::Message::Body::Multipart->addTransferEncHandler(NAME, CLASS|OBJECT)

See Mail::Message::Body::Encode/"Internals"

$obj->contentInfoFrom(HEAD)

See Mail::Message::Body/"Internals"

$obj->contentInfoTo(HEAD)

See Mail::Message::Body/"Internals"

$obj->fileLocation([BEGIN,END])

See Mail::Message::Body/"Internals"

$obj->getTransferEncHandler(TYPE)

See Mail::Message::Body::Encode/"Internals"

$obj->isModified

See Mail::Message::Body/"Internals"

$obj->load

See Mail::Message::Body/"Internals"

$obj->modified([BOOLEAN])

See Mail::Message::Body/"Internals"

$obj->moveLocation([DISTANCE])

See Mail::Message::Body/"Internals"

$obj->read(PARSER, HEAD, BODYTYPE [,CHARS [,LINES]])

See Mail::Message::Body/"Internals"

Error handling

$obj->AUTOLOAD

See Mail::Message::Body/"Error handling"

$obj->addReport(OBJECT)

See Mail::Reporter/"Error handling"

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

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

See Mail::Reporter/"Error handling"

$obj->errors

See Mail::Reporter/"Error handling"

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

Mail::Message::Body::Multipart->log([LEVEL [,STRINGS]])

See Mail::Reporter/"Error handling"

$obj->logPriority(LEVEL)

Mail::Message::Body::Multipart->logPriority(LEVEL)

See Mail::Reporter/"Error handling"

$obj->logSettings

See Mail::Reporter/"Error handling"

$obj->notImplemented

See Mail::Reporter/"Error handling"

$obj->report([LEVEL])

See Mail::Reporter/"Error handling"

$obj->reportAll([LEVEL])

See Mail::Reporter/"Error handling"

$obj->trace([LEVEL])

See Mail::Reporter/"Error handling"

$obj->warnings

See Mail::Reporter/"Error handling"

Cleanup

$obj->DESTROY

See Mail::Reporter/"Cleanup"

$obj->inGlobalDestruction

See Mail::Reporter/"Cleanup"

DETAILS

DIAGNOSTICS

Error: Data not convertible to a message (type is $type)

An object which is not coercable into a Mail::Message::Part object was passed to the initiation. The data is ignored.

Warning: No decoder defined for transfer encoding $name.

The data (message body) is encoded in a way which is not currently understood, therefore no decoding (or recoding) can take place.

Warning: No encoder defined for transfer encoding $name.

The data (message body) has been decoded, but the required encoding is unknown. The decoded data is returned.

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.

Error: Unknown criterium $what to select parts.

Valid choices fdr part selections are ALL, ACTIVE, DELETED, RECURSE or a code reference. However, some other argument was passed.

Error: You cannot use foreachLine on a multipart

foreachLine() should be used on decoded message bodies only, because it would attempt to modify part-headers and separators as well, which is clearly not acceptible.

SEE ALSO

This module is part of Mail-Box distribution version 2.082, built on April 28, 2008. Website: http://perl.overmeer.net/mailbox/

LICENSE

Copyrights 2001-2008 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