---
name: "Mail::Message::Body::Nested"
section: "3pm"
platform: "linux"
package: "perl-mail-message"
version: "4.05-1"
release: "Arch Linux 2026-11-01"
platforms: ["linux"]
url: "https://new.carta.tech/Mail::Message::Body::Nested"
---

# Mail::Message::Body::Nested(3pm)

body of a message which contains a message

## NAME

Mail::Message::Body::Nested - body of a message which contains a message

## INHERITANCE

```
 Mail::Message::Body::Nested
   is a Mail::Message::Body
   is a Mail::Reporter
   Mail::Message::Body also extends Mail::Reporter
   is a Mail::Reporter
```

## SYNOPSIS

```
  See Mail::Message::Body
  if($body->isNested) {
     my $nest = $body->nested;
     $nest->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 a nested message, like `"message/rfc822"`.

A nested message is different from a multipart message which contains only one element, because a nested message has a full set of message header fields defined by the RFC882, where a part of a multipart has only a few.  But because we do not keep track whether all fields are presented, a `"Mail::Message::Part"` is used anyway.

**WARNING:** Since 2023, at least outlook started to interpret RFC6533 incorrectly.  Bodies of type 'message/rfc822' can only be 'nested', but when they (illegally) have Content-Transfer-Encoding, they can now behave like normal message parts (the same as a pdf or image).

Extends "DESCRIPTION" in Mail::Message::Body.

## OVERLOADED

Extends "OVERLOADED" in Mail::Message::Body.

- overload: **'""'** stringification

  Inherited, see "OVERLOADED" in Mail::Message::Body

- overload: **'=='** numerical comparison

  Inherited, see "OVERLOADED" in Mail::Message::Body

- overload: **'@{}'** addressed as array

  Inherited, see "OVERLOADED" in Mail::Message::Body

- overload: **bool** true/false

  Inherited, see "OVERLOADED" in Mail::Message::Body

## METHODS

Extends "METHODS" in Mail::Message::Body.

### Constructors

Extends "Constructors" in Mail::Message::Body.

- $obj-\>**clone**()

  Inherited, see "Constructors" in Mail::Message::Body

- $class-\>**new**(%options)

  Inherited, see "Constructors" in Mail::Message::Body

  ```
   -Option           --Defined in         --Default
    based_on           Mail::Message::Body  undef
    charset            Mail::Message::Body  'PERL'
    checked            Mail::Message::Body  false
    content_id         Mail::Message::Body  undef
    data               Mail::Message::Body  undef
    description        Mail::Message::Body  undef
    disposition        Mail::Message::Body  undef
    eol                Mail::Message::Body  'NATIVE'
    file               Mail::Message::Body  undef
    filename           Mail::Message::Body  undef
    language           Mail::Message::Body  undef
    message            Mail::Message::Body  undef
    mime_type          Mail::Message::Body  'message/rfc822'
    modified           Mail::Message::Body  false
    nested                                  undef
    transfer_encoding  Mail::Message::Body  'none'
  ```

  - based\_on =\> $body

    - charset =\> $charset\|'PERL'\|\<undef\>

    - checked =\> BOOLEAN

    - content\_id =\> STRING

    - data =\> \\@lines\|$text

    - description =\> STRING\|$field

    - disposition =\> STRING\|$field

    - eol =\> 'CR'\|'LF'\|'CRLF'\|'NATIVE'

    - file =\> $file\|$handle\|$io

    - filename =\> $file

    - language =\> STRING\|\\@lang\|$field

    - message =\> $message

    - mime\_type =\> STRING\|$field\|$mime

    - modified =\> BOOLEAN

    - nested =\> $message

    The `$message` which is encapsulated within this body.

  - transfer\_encoding =\> STRING\|$field

    » example:

  ```
    my $msg   = $folder->message(3);
    my $encaps= Mail::Message::Body::Nested->new(nested => $msg);
    # The body will be coerced into a message, which lacks a few
    # lines but we do not bother.
    my $intro = Mail::Message::Body->new(data => ...);
    my $body  = Mail::Message::Body::Nested->new(nested  => $intro);
  ```

### Attributes

Extends "Attributes" in Mail::Message::Body.

- $obj-\>**charsetDetectAlgorithm**( \[CODE\|undef\|METHOD\] )

  Inherited, see "Attributes" in Mail::Message::Body::Encode

### Constructing a body

Extends "Constructing a body" in Mail::Message::Body.

- $obj-\>**attach**(@messages, %options)

  Inherited, see "Constructing a body" in Mail::Message::Body::Construct

- $obj-\>**charsetDetect**(%options)

  Inherited, see "Constructing a body" in Mail::Message::Body::Encode

- $obj-\>**check**()

  Inherited, see "Constructing a body" in Mail::Message::Body::Encode

- $obj-\>**concatenate**(@components)

  Inherited, see "Constructing a body" in Mail::Message::Body::Construct

- $obj-\>**decoded**(%options)

  Inherited, see "Constructing a body" in Mail::Message::Body

- $obj-\>**encode**(%options)

  Inherited, see "Constructing a body" in Mail::Message::Body::Encode

- $obj-\>**encoded**(%options)

  Inherited, see "Constructing a body" in Mail::Message::Body::Encode

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

  Inherited, see "Constructing a body" in Mail::Message::Body::Encode

- $obj-\>**foreachLine**((CODE))

  It is NOT possible to call some code for each line of a nested because that would damage the header of the encapsulated message Improves base, see "Constructing a body" in Mail::Message::Body::Construct

- $obj-\>**stripSignature**(%options)

  Inherited, see "Constructing a body" in Mail::Message::Body::Construct

- $obj-\>**unify**($body)

  Inherited, see "Constructing a body" in Mail::Message::Body::Encode

### The body

Extends "The body" in Mail::Message::Body.

- $obj-\>**isDelayed**()

  Inherited, see "The body" in Mail::Message::Body

- $obj-\>**isMultipart**()

  Inherited, see "The body" in Mail::Message::Body

- $obj-\>**isNested**()

  Inherited, see "The body" in Mail::Message::Body

- $obj-\>**message**( \[$message\] )

  Inherited, see "The body" in Mail::Message::Body

- $obj-\>**partNumberOf**($part)

  Inherited, see "The body" in Mail::Message::Body

### About the payload

Extends "About the payload" in Mail::Message::Body.

- $obj-\>**charset**()

  Inherited, see "About the payload" in Mail::Message::Body

- $obj-\>**checked**( \[BOOLEAN\] )

  Inherited, see "About the payload" in Mail::Message::Body

- $obj-\>**contentId**( \[STRING\|$field\] )

  Inherited, see "About the payload" in Mail::Message::Body

- $obj-\>**description**( \[STRING\|$field\] )

  Inherited, see "About the payload" in Mail::Message::Body

- $obj-\>**disposition**( \[STRING\|$field\] )

  Inherited, see "About the payload" in Mail::Message::Body

- $obj-\>**dispositionFilename**( \[$directory\] )

  Inherited, see "About the payload" in Mail::Message::Body::Encode

- $obj-\>**isBinary**()

  Inherited, see "About the payload" in Mail::Message::Body::Encode

- $obj-\>**isText**()

  Inherited, see "About the payload" in Mail::Message::Body::Encode

- $obj-\>**language**( \[@langs\|\\@langs\|$langs\|$field\] )

  Inherited, see "About the payload" in Mail::Message::Body

- $obj-\>**mimeType**()

  Inherited, see "About the payload" in Mail::Message::Body

- $obj-\>**nrLines**()

  Inherited, see "About the payload" in Mail::Message::Body

- $obj-\>**size**()

  Inherited, see "About the payload" in Mail::Message::Body

- $obj-\>**transferEncoding**( \[STRING\|$field\] )

  Inherited, see "About the payload" in Mail::Message::Body

- $obj-\>**type**( \[STRING\|$field\] )

  Inherited, see "About the payload" in Mail::Message::Body

### Access to the payload

Extends "Access to the payload" in Mail::Message::Body.

- $obj-\>**endsOnNewline**()

  Inherited, see "Access to the payload" in Mail::Message::Body

- $obj-\>**file**()

  Inherited, see "Access to the payload" in Mail::Message::Body

- $obj-\>**forNested**(CODE)

  Execute the `"CODE"` for the nested message.  This returns a new nested body object.  Returns `"undef"` when the `"CODE"` returns `"undef"`.

- $obj-\>**lines**()

  Inherited, see "Access to the payload" in Mail::Message::Body

- $obj-\>**nested**()

  Returns the Mail::Message::Part message which is enclosed within this body.

- $obj-\>**print**( \[$fh\] )

  Inherited, see "Access to the payload" in Mail::Message::Body

- $obj-\>**printEscapedFrom**($fh)

  Inherited, see "Access to the payload" in Mail::Message::Body

- $obj-\>**string**()

  Inherited, see "Access to the payload" in Mail::Message::Body

- $obj-\>**stripTrailingNewline**()

  Inherited, see "Access to the payload" in Mail::Message::Body

- $obj-\>**write**(%options)

  Inherited, see "Access to the payload" in Mail::Message::Body

### Internals

Extends "Internals" in Mail::Message::Body.

- $any-\>**addTransferEncHandler**( $name, \<$class\|$object\> )

  Inherited, see "Internals" in Mail::Message::Body::Encode

- $obj-\>**contentInfoFrom**($head)

  Inherited, see "Internals" in Mail::Message::Body

- $obj-\>**contentInfoTo**($head)

  Inherited, see "Internals" in Mail::Message::Body

- $obj-\>**fileLocation**( \[$begin, $end\] )

  Inherited, see "Internals" in Mail::Message::Body

- $obj-\>**getTransferEncHandler**($type)

  Inherited, see "Internals" in Mail::Message::Body::Encode

- $obj-\>**isModified**()

  Inherited, see "Internals" in Mail::Message::Body

- $obj-\>**load**()

  Inherited, see "Internals" in Mail::Message::Body

- $obj-\>**modified**( \[BOOLEAN\] )

  Inherited, see "Internals" in Mail::Message::Body

- $obj-\>**moveLocation**( \[$distance\] )

  Inherited, see "Internals" in Mail::Message::Body

- $obj-\>**read**( $parser, $head, $bodytype, \[$chars, \[$lines\]\] )

  Inherited, see "Internals" in Mail::Message::Body

### Error handling

Extends "Error handling" in Mail::Message::Body.

- $obj-\>**AUTOLOAD**()

  Inherited, see "Error handling" in Mail::Message::Body

- $obj-\>**notImplemented**()

  Inherited, see "Error handling" in Mail::Reporter

- $obj-\>**notImplemented**()

  Inherited, see "Error handling" in Mail::Reporter

### Cleanup

Extends "Cleanup" in Mail::Message::Body.

- $obj-\>**DESTROY**()

  Inherited, see "Cleanup" in Mail::Reporter

- $obj-\>**DESTROY**()

  Inherited, see "Cleanup" in Mail::Reporter

## DETAILS

Extends "DETAILS" in Mail::Message::Body.

## DIAGNOSTICS

- Warning: Content-Transfer-Encoding '$te' requires explicit charset, defaulted to utf-8.

  Cast by `encode()`

- Error: cannot concatenate element $which

  Cast by `concatenate()`

- Fault: cannot open $file to write body: $!

  Cast by `write()`

- Warning: charset '$name' is not known.

  The encoding or decoding of a message body encounters a character set which is not understood by Perl's Encode module. Cast by `encode()`

- Error: class $package does not implement method $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. Cast by `notImplemented()`

- Error: class $package does not implement method $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. Cast by `notImplemented()`

- Error: data not convertible to a message (type is $class)

  Cast by `new()`

- Fault: error closing $file after write body: $!

  Cast by `write()`

- Warning: no decoder defined for transfer encoding '$encoding'.

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

- Warning: no encoder defined for transfer encoding '$encoding'.

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

- Error: no filename parameter for **write()** body.

  Cast by `write()`

- Error: part number needs multi-part or nested.

  Cast by `partNumberOf()`

- Error: unknown line terminator '$eol'.

  Cast by `eol()`

- Error: you cannot use foreachLine on a nested.

  **foreachLine()** should be used on decoded message bodies only, because it would modify the header of the encapsulated message. which is clearly not acceptable. Cast by `foreachLine()`

## SEE ALSO

This module is part of Mail-Message version 4.05, built on April 10, 2026. Website: *http://perl.overmeer.net/mailbox/*

## LICENSE

For contributors see file ChangeLog.

This software is copyright (c) 2001-2026 by Mark Overmeer.

This is free software; you can redistribute it and/or modify it under the same terms as the Perl 5 programming language system itself.
