Mail-Box-4.02/0000755000175000001440000000000015166136362013576 5ustar00markovusers00000000000000Mail-Box-4.02/lib/0000755000175000001440000000000015166136362014344 5ustar00markovusers00000000000000Mail-Box-4.02/lib/Mail/0000755000175000001440000000000015166136362015226 5ustar00markovusers00000000000000Mail-Box-4.02/lib/Mail/Message/0000755000175000001440000000000015166136362016612 5ustar00markovusers00000000000000Mail-Box-4.02/lib/Mail/Message/Head/0000755000175000001440000000000015166136362017453 5ustar00markovusers00000000000000Mail-Box-4.02/lib/Mail/Message/Head/Delayed.pm0000644000175000001440000000321615166136344021362 0ustar00markovusers00000000000000# This code is part of Perl distribution Mail-Box version 4.02. # The POD got stripped from this file by OODoc version 3.06. # 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. # SPDX-License-Identifier: Artistic-1.0-Perl OR GPL-1.0-or-later package Mail::Message::Head::Delayed;{ our $VERSION = '4.02'; } use parent 'Mail::Message::Head'; use strict; use warnings; use Log::Report 'mail-box', import => [ qw/__x error/ ]; use Object::Realize::Later becomes => 'Mail::Message::Head::Complete', realize => 'load', believe_caller => 1; use Scalar::Util qw/weaken/; #-------------------- sub build(@) { error __x"cannot build() a delayed header." } sub init($$) { my ($self, $args) = @_; $self->SUPER::init($args); if(defined $args->{message}) { $self->{MMHD_message} = $args->{message}; weaken($self->{MMHD_message}); } $self; } sub modified(;$) { return 0 if @_==1 || !$_[1]; $_[0]->forceRealize->modified(1); } sub isDelayed() { 1 } sub isModified() { 0 } sub isEmpty() { 0 } #-------------------- sub get($;$) { shift->load->get(@_) } #-------------------- sub guessBodySize() { undef } sub guessTimestamp() { undef } #-------------------- sub read($) { my ($self, $parser, $headtype, $bodytype) = @_; # $parser->skipHeader not implemented... returns where $self->{MMH_where} = 0; $self; } sub load() { $_[0] = $_[0]->message->loadHead } sub setNoRealize($) { error __x"attempt to set field on a delayed header." } 1; Mail-Box-4.02/lib/Mail/Message/Head/Subset.pm0000644000175000001440000000367615166136343021271 0ustar00markovusers00000000000000# This code is part of Perl distribution Mail-Box version 4.02. # The POD got stripped from this file by OODoc version 3.06. # 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. # SPDX-License-Identifier: Artistic-1.0-Perl OR GPL-1.0-or-later package Mail::Message::Head::Subset;{ our $VERSION = '4.02'; } use parent 'Mail::Message::Head'; use strict; use warnings; use Log::Report 'mail-box', import => [ qw// ]; use Object::Realize::Later becomes => 'Mail::Message::Head::Complete', realize => 'load', believe_caller => 1; use Date::Parse qw/str2time/; #-------------------- sub count($) { my ($self, $name) = @_; my @values = $self->get($name) or return $self->load->count($name); scalar @values; } sub get($;$) { my $self = shift; if(wantarray) { my @values = $self->SUPER::get(@_); return @values if @values; } else { my $value = $self->SUPER::get(@_); return $value if defined $value; } $self->load->get(@_); } #-------------------- sub guessBodySize() { my $self = shift; my $cl = $self->SUPER::get('Content-Length'); return $1 if defined $cl && $cl =~ m/(\d+)/; my $lines = $self->SUPER::get('Lines'); # 40 chars per lines defined $lines && $lines =~ m/(\d+)/ ? $1 * 40 : undef } # Be careful not to trigger loading: this is not the thoroughness # we want from this method. sub guessTimestamp() { my $self = shift; return $self->{MMHS_timestamp} if $self->{MMHS_timestamp}; my $stamp; if(my $date = $self->SUPER::get('date')) { $stamp = str2time($date, 'GMT'); } unless($stamp) { foreach my $time ($self->SUPER::get('received')) { $stamp = str2time($time, 'GMT'); last if $stamp; } } $self->{MMHS_timestamp} = $stamp; } #-------------------- sub load() { $_[0] = $_[0]->message->loadHead } 1; Mail-Box-4.02/lib/Mail/Message/Head/Subset.pod0000644000175000001440000001402015166136344021421 0ustar00markovusers00000000000000=encoding utf8 =head1 NAME Mail::Message::Head::Subset - subset of header information of a message =head1 INHERITANCE Mail::Message::Head::Subset realizes a Mail::Message::Head::Complete Mail::Message::Head::Subset is a Mail::Message::Head is a Mail::Reporter =head1 SYNOPSIS my $subset = Mail::Message::Head::Subset->new(...) $subset->isa('Mail::Message::Head') # true $subset->guessBodySize # integer or undef $subset->isDelayed # true =head1 DESCRIPTION Some types of folders contain an index file which lists a few lines of information per messages. Especially when it is costly to read header lines, the index speeds-up access considerably. For instance, the subjects of all messages are often wanted, but waiting for a thousand messages of the folder to be read may imply a thousand network reads (IMAP) or file openings (MH) When you access header fields which are not in the header subset, the whole header has to be parsed (which may consume considerable time, depending on the type of folder). Extends L<"DESCRIPTION" in Mail::Message::Head|Mail::Message::Head/"DESCRIPTION">. =head1 OVERLOADED Extends L<"OVERLOADED" in Mail::Message::Head|Mail::Message::Head/"OVERLOADED">. =over 4 =item overload: B<""> stringifaction Inherited, see L =item overload: B true/false Inherited, see L =back =head1 METHODS Extends L<"METHODS" in Mail::Message::Head|Mail::Message::Head/"METHODS">. =head2 Constructors Extends L<"Constructors" in Mail::Message::Head|Mail::Message::Head/"Constructors">. =over 4 =item $class-EB( [PAIR|$field]-LIST ) Inherited, see L =item $class-EB(%options) Inherited, see L =back =head2 Attributes Extends L<"Attributes" in Mail::Message::Head|Mail::Message::Head/"Attributes">. =head2 The header Extends L<"The header" in Mail::Message::Head|Mail::Message::Head/"The header">. =over 4 =item $obj-EB() Inherited, see L =item $obj-EB() Inherited, see L =item $obj-EB() Inherited, see L =item $obj-EB() Inherited, see L =item $obj-EB( [$message] ) Inherited, see L =item $obj-EB( [BOOLEAN] ) Inherited, see L =item $obj-EB() Inherited, see L =back =head2 Access to the header Extends L<"Access to the header" in Mail::Message::Head|Mail::Message::Head/"Access to the header">. =over 4 =item $obj-EB($name) Count the number of fields with this C<$name>. If the C<$name> cannot be found, the full header get loaded. In case we find any C<$name> field, it is decided we know all of them, and loading is not needed. =item $obj-EB( $name, [$index] ) Get the data which is related to the field with the C<$name>. The case of the characters in C<$name> does not matter. When a C<$name> is used which is not known yet, realization will take place. Improves base, see L =item $obj-EB( $name, [$index] ) Inherited, see L =back =head2 About the body Extends L<"About the body" in Mail::Message::Head|Mail::Message::Head/"About the body">. =over 4 =item $obj-EB() The body size is defined in the C field. However, this field may not be known. In that case, a guess is made based on the known C field. When also that field is not known yet, C is returned. Improves base, see L =item $obj-EB() Inherited, see L =back =head2 Internals Extends L<"Internals" in Mail::Message::Head|Mail::Message::Head/"Internals">. =over 4 =item $obj-EB($field) Inherited, see L =item $obj-EB($fields) Inherited, see L =item $obj-EB() Inherited, see L =item $obj-EB() Inherited, see L =item $obj-EB($distance) Inherited, see L =item $obj-EB($parser) Inherited, see L =item $obj-EB($field) Inherited, see L =back =head2 Error handling Extends L<"Error handling" in Mail::Message::Head|Mail::Message::Head/"Error handling">. =over 4 =item $obj-EB() Inherited, see L =item $obj-EB() Inherited, see L =back =head2 Cleanup Extends L<"Cleanup" in Mail::Message::Head|Mail::Message::Head/"Cleanup">. =over 4 =item $obj-EB() Inherited, see L =back =head1 DETAILS Extends L<"DETAILS" in Mail::Message::Head|Mail::Message::Head/"DETAILS">. =head1 DIAGNOSTICS =over 4 =item Error: class $package does not implement method $method. Fatal error: the specific C<$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 C =back =head1 SEE ALSO This module is part of Mail-Box version 4.02, built on April 10, 2026. Website: F =head1 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. Mail-Box-4.02/lib/Mail/Message/Head/Delayed.pod0000644000175000001440000001401015166136344021522 0ustar00markovusers00000000000000=encoding utf8 =head1 NAME Mail::Message::Head::Delayed - a not-read header of a Mail::Message =head1 INHERITANCE Mail::Message::Head::Delayed realizes a Mail::Message::Head::Complete Mail::Message::Head::Delayed is a Mail::Message::Head is a Mail::Reporter =head1 SYNOPSIS my $delayed = Mail::Message::Head::Delayed->new(...) $delayed->isa('Mail::Message::Head') # true $delayed->guessBodySize # undef $delayed->isDelayed # true =head1 DESCRIPTION This object is used as place-holder, to be replaced by a L when someone accesses the header of a message. Extends L<"DESCRIPTION" in Mail::Message::Head|Mail::Message::Head/"DESCRIPTION">. =head1 OVERLOADED Extends L<"OVERLOADED" in Mail::Message::Head|Mail::Message::Head/"OVERLOADED">. =over 4 =item overload: B<""> stringifaction Inherited, see L =item overload: B true/false Inherited, see L =back =head1 METHODS Extends L<"METHODS" in Mail::Message::Head|Mail::Message::Head/"METHODS">. =head2 Constructors Extends L<"Constructors" in Mail::Message::Head|Mail::Message::Head/"Constructors">. =over 4 =item $class-EB($fields) You cannot create a delayed header with fields. Improves base, see L =item $class-EB(%options) Inherited, see L =back =head2 Attributes Extends L<"Attributes" in Mail::Message::Head|Mail::Message::Head/"Attributes">. =head2 The header Extends L<"The header" in Mail::Message::Head|Mail::Message::Head/"The header">. =over 4 =item $obj-EB() Inherited, see L =item $obj-EB() Inherited, see L =item $obj-EB() Inherited, see L =item $obj-EB() Inherited, see L =item $obj-EB( [$message] ) Inherited, see L =item $obj-EB( [BOOLEAN] ) Inherited, see L =item $obj-EB() Inherited, see L =back =head2 Access to the header Extends L<"Access to the header" in Mail::Message::Head|Mail::Message::Head/"Access to the header">. =over 4 =item $obj-EB( $name, [$index] ) Get the information about the header line C<$name>. Realization will take place. Improves base, see L =item $obj-EB( $name, [$index] ) Inherited, see L =back =head2 About the body Extends L<"About the body" in Mail::Message::Head|Mail::Message::Head/"About the body">. =over 4 =item $obj-EB() On a delayed head, this returns C, because when there is no header there is also no body. For messages in directory or network organized folders, L usually will give a figure for the whole message without much cost. Subtract a few hundred bytes for the header, and you will get a good estimate. Improves base, see L =item $obj-EB() Make a guess about when the message was originally posted. On a delayed head, this returns C. For messages in directory or network organized folders, L usually will give a figure without much cost. =item $obj-EB() Inherited, see L =back =head2 Internals Extends L<"Internals" in Mail::Message::Head|Mail::Message::Head/"Internals">. =over 4 =item $obj-EB($field) Inherited, see L =item $obj-EB($fields) Inherited, see L =item $obj-EB() Inherited, see L =item $obj-EB() Inherited, see L =item $obj-EB($distance) Inherited, see L =item $obj-EB($parser) Inherited, see L =item $obj-EB($field) Not possible. Improves base, see L =back =head2 Error handling Extends L<"Error handling" in Mail::Message::Head|Mail::Message::Head/"Error handling">. =over 4 =item $obj-EB() Inherited, see L =item $obj-EB() Inherited, see L =back =head2 Cleanup Extends L<"Cleanup" in Mail::Message::Head|Mail::Message::Head/"Cleanup">. =over 4 =item $obj-EB() Inherited, see L =back =head1 DETAILS Extends L<"DETAILS" in Mail::Message::Head|Mail::Message::Head/"DETAILS">. =head1 DIAGNOSTICS =over 4 =item Error: attempt to set field on a delayed header. Cast by C =item Error: cannot build() a delayed header. A delayed message header cannot contain any information, so cannot be build. You can construct complete or subset headers. Cast by C =item Error: class $package does not implement method $method. Fatal error: the specific C<$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 C =back =head1 SEE ALSO This module is part of Mail-Box version 4.02, built on April 10, 2026. Website: F =head1 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. Mail-Box-4.02/lib/Mail/Message/Body/0000755000175000001440000000000015166136362017507 5ustar00markovusers00000000000000Mail-Box-4.02/lib/Mail/Message/Body/Delayed.pod0000644000175000001440000000744515166136344021574 0ustar00markovusers00000000000000=encoding utf8 =head1 NAME Mail::Message::Body::Delayed - body of a Mail::Message but not read yet. =head1 INHERITANCE Mail::Message::Body::Delayed realizes a Mail::Message::Body Mail::Message::Body::Delayed is a Mail::Reporter Mail::Message::Body::Delayed is a Mail::Reporter =head1 SYNOPSIS See Mail::Message::Body =head1 DESCRIPTION Message bodies of this type will be replaced by another type the moment you access the content. In this documentation you will find the description of how a message body gets delay loaded. Extends L<"DESCRIPTION" in Mail::Reporter|Mail::Reporter/"DESCRIPTION">. =head1 OVERLOADED =over 4 =item overload: B<""> stringification Returns the body as string --which will trigger completion-- unless called to produce a string for C. The latter to avoid deep recursions. » example: stringification of delayed body print $msg->body; # implicit by print my $body = $msg->body; my $x = "$body"; # explicit by interpolation =item overload: B<@{}> access as ARRAY When a body object is used as being an array reference, the lines of the body are returned. This is the same as using the C method. =item overload: B existence Always returns a C value, which is needed to have overloaded objects to be used as in C. Otherwise, C would be needed to avoid a runtime error. =back =head1 METHODS Extends L<"METHODS" in Mail::Reporter|Mail::Reporter/"METHODS">. =head2 Constructors Extends L<"Constructors" in Mail::Reporter|Mail::Reporter/"Constructors">. =over 4 =item $class-EB(%options) Inherited, see L -Option --Default message =over 2 =item message => MESSAGE The MESSAGE object which contains this delayed body. =back =back =head2 Attributes Extends L<"Attributes" in Mail::Reporter|Mail::Reporter/"Attributes">. =head2 Error handling Extends L<"Error handling" in Mail::Reporter|Mail::Reporter/"Error handling">. =over 4 =item $obj-EB() Inherited, see L =item $obj-EB() Inherited, see L =back =head2 Cleanup Extends L<"Cleanup" in Mail::Reporter|Mail::Reporter/"Cleanup">. =over 4 =item $obj-EB() Inherited, see L =back =head2 The body =over 4 =item $obj-EB() Z<> =back =head2 About to the payload =over 4 =item $obj-EB() Z<> =item $obj-EB() Z<> =item $obj-EB() Z<> =item $obj-EB() Z<> =item $obj-EB() Z<> =item $obj-EB() Z<> =back =head2 Internals =over 4 =item $obj-EB( [$begin, $end] ) Z<> =item $obj-EB() Returns the loaded version of this body. =item $obj-EB($distance) Z<> =item $obj-EB($parser, $head, $bodytype) Z<> =back =head1 DIAGNOSTICS =over 4 =item Error: a message must be specified to a delayed body. Cast by C =item Error: class $package does not implement method $method. Fatal error: the specific C<$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 C =back =head1 SEE ALSO This module is part of Mail-Box version 4.02, built on April 10, 2026. Website: F =head1 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. Mail-Box-4.02/lib/Mail/Message/Body/Delayed.pm0000644000175000001440000000442315166136343021416 0ustar00markovusers00000000000000# This code is part of Perl distribution Mail-Box version 4.02. # The POD got stripped from this file by OODoc version 3.06. # 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. # SPDX-License-Identifier: Artistic-1.0-Perl OR GPL-1.0-or-later package Mail::Message::Body::Delayed;{ our $VERSION = '4.02'; } use parent 'Mail::Reporter'; use strict; use warnings; use Log::Report 'mail-box', import => [ qw/__x error/ ]; use Object::Realize::Later becomes => 'Mail::Message::Body', realize => 'load', warn_realization => 0, believe_caller => 1; use Scalar::Util qw/weaken/; #-------------------- use overload '""' => 'string_unless_carp', bool => sub {1}, '@{}' => sub { $_[0]->load->lines }; #-------------------- sub init($) { my ($self, $args) = @_; $self->SUPER::init($args); $self->{MMB_seqnr} = -1; # for overloaded body comparison $self->{MMBD_message} = $args->{message} or error __x"a message must be specified to a delayed body."; weaken($self->{MMBD_message}); $self; } #-------------------- sub message() { $_[0]->{MMBD_message} } #-------------------- sub modified(;$) { return 0 if @_==1 || !$_[1]; shift->forceRealize(shift); } sub isModified() { 0 } sub isDelayed() { 1 } sub isMultipart() { $_[0]->message->head->isMultipart } sub guessSize() { $_[0]->{MMBD_size} } sub nrLines() { $_[0]->{MMBD_lines} // $_[0]->forceRealize->nrLines } sub string_unless_carp() { my $self = shift; return $self->load->string if (caller)[0] ne 'Carp'; my $class = ref $self =~ s/^Mail::Message/MM/gr; "$class object"; } #-------------------- sub read($$;$@) { my ($self, $parser, $head, $bodytype) = splice @_, 0, 4; $self->{MMBD_parser} = $parser; @$self{ qw/MMBD_begin MMBD_end MMBD_size MMBD_lines/ } = $parser->bodyDelayed(@_); $self; } sub fileLocation(;@) { my $self = shift; @_ ? (@$self{ qw/MMBD_begin MMBD_end/ } = @_) : @$self{ qw/MMBD_begin MMBD_end/ }; } sub moveLocation($) { my ($self, $dist) = @_; $self->{MMBD_begin} -= $dist; $self->{MMBD_end} -= $dist; $self; } sub load() { $_[0] = $_[0]->message->loadBody } 1; Mail-Box-4.02/lib/Mail/Message/Dummy.pm0000644000175000001440000000176615166136343020254 0ustar00markovusers00000000000000# This code is part of Perl distribution Mail-Box version 4.02. # The POD got stripped from this file by OODoc version 3.06. # 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. # SPDX-License-Identifier: Artistic-1.0-Perl OR GPL-1.0-or-later package Mail::Message::Dummy;{ our $VERSION = '4.02'; } use parent 'Mail::Message'; use strict; use warnings; use Log::Report 'mail-box', import => [ qw/__x error/ ]; #-------------------- sub init($) { my ($self, $args) = @_; @$args{ qw/modified trusted/ } = (0, 1); $self->SUPER::init($args); exists $args->{messageId} or error __x"the messageId is required for a dummy."; $self; } sub isDummy() { 1 } sub head(;$) { error __x"you cannot take the head of a dummy message." } sub body(;$) { error __x"you cannot take the body of a dummy message." } 1; Mail-Box-4.02/lib/Mail/Message/Dummy.pod0000644000175000001440000003541515166136344020421 0ustar00markovusers00000000000000=encoding utf8 =head1 NAME Mail::Message::Dummy - a placeholder for a missing messages =head1 INHERITANCE Mail::Message::Dummy is a Mail::Message is a Mail::Reporter =head1 SYNOPSIS =head1 DESCRIPTION Dummy messages are used by modules which maintain ordered lists of messages, usually based on message-id. A good example is L, which detects related messages by scanning the known message headers for references to other messages. As long as the referenced messages are not found inside the mailbox, their place is occupied by a dummy. Be careful when using modules which may create dummies. Before trying to access the header or body use L to check if the message is a dummy message. Extends L<"DESCRIPTION" in Mail::Message|Mail::Message/"DESCRIPTION">. =head1 METHODS Extends L<"METHODS" in Mail::Message|Mail::Message/"METHODS">. =head2 Constructors Extends L<"Constructors" in Mail::Message|Mail::Message/"Constructors">. =over 4 =item $obj-EB(%options) Inherited, see L =item $class-EB($message_id, %options) Create a new dummy message to occupy the space for a real message with the specified C<$message_id>. Improves base, see L -Option --Defined in --Default body Mail::Message body_type Mail::Message Mail::Message::Body::Lines deleted Mail::Message false field_type Mail::Message head Mail::Message head_type Mail::Message labels Mail::Message +{} messageId Mail::Message message_id Mail::Message undef modified Mail::Message trusted Mail::Message =over 2 =item body => $object =item body_type => $class =item deleted => BOOLEAN =item field_type => $class =item head => $object =item head_type => $class =item labels => \@pairs|\%settings =item messageId => $id =item message_id => $id =item modified => BOOLEAN =item trusted => BOOLEAN =back » example: my $message = Mail::Message::Dummy->new($msgid); if($message->isDummy) {...} =back =head2 Attributes Extends L<"Attributes" in Mail::Message|Mail::Message/"Attributes">. =over 4 =item $obj-EB() Inherited, see L =item $obj-EB() Inherited, see L =item $obj-EB() Inherited, see L =item $obj-EB() Inherited, see L =back =head2 Constructing a message Extends L<"Constructing a message" in Mail::Message|Mail::Message/"Constructing a message">. =over 4 =item $obj-EB( [<$rg_object|%options>] ) Inherited, see L =item $class-EB( [$message|$part|$body], @fields, %options ) Inherited, see L =item $class-EB($body, [$head], $headers) Inherited, see L =item $obj-EB(%options) Inherited, see L =item $obj-EB(%options) Inherited, see L =item $obj-EB(%options) Inherited, see L =item $obj-EB(%options) Inherited, see L =item $obj-EB(%options) Inherited, see L =item $obj-EB() Inherited, see L =item $obj-EB() Inherited, see L =item $obj-EB(STRING) Inherited, see L =item $class-EB($fh|$text|\$text|\@lines, %options) Inherited, see L =item $obj-EB(%options) Inherited, see L =item $obj-EB(%options) Inherited, see L =item $obj-EB( [STRING|$field|$address|\@addrs|\@fields] ) Inherited, see L =item $any-EB(STRING) Inherited, see L =back =head2 The message Extends L<"The message" in Mail::Message|Mail::Message/"The message">. =over 4 =item $obj-EB() Inherited, see L =item $obj-EB() Inherited, see L =item $obj-EB() Inherited, see L =item $obj-EB() Inherited, see L =item $obj-EB() Inherited, see L =item $obj-EB( [$fh] ) Inherited, see L =item $obj-EB( [$mailer], %options ) Inherited, see L =item $obj-EB() Inherited, see L =item $obj-EB() Inherited, see L =item $obj-EB( [$fh] ) Inherited, see L =back =head2 The header Extends L<"The header" in Mail::Message|Mail::Message/"The header">. =over 4 =item $obj-EB() Inherited, see L =item $obj-EB() Inherited, see L =item $obj-EB() Inherited, see L =item $obj-EB() Inherited, see L =item $obj-EB() Inherited, see L =item $obj-EB($fieldname) Inherited, see L =item $obj-EB() Inherited, see L =item $obj-EB( [$head] ) Inherited, see L =item $obj-EB() Inherited, see L =item $obj-EB() Inherited, see L =item $obj-EB($fieldname) Inherited, see L =item $obj-EB() Inherited, see L =item $obj-EB() Inherited, see L =item $obj-EB() Inherited, see L =back =head2 The body Extends L<"The body" in Mail::Message|Mail::Message/"The body">. =over 4 =item $obj-EB( [$body] ) Inherited, see L =item $obj-EB() Inherited, see L =item $obj-EB(%options) Inherited, see L =item $obj-EB(%options) Inherited, see L =item $obj-EB() Inherited, see L =item $obj-EB() Inherited, see L =item $obj-EB( [<'ALL'|'ACTIVE'|'DELETED'|'RECURSE'|$filter>] ) Inherited, see L =back =head2 Flags Extends L<"Flags" in Mail::Message|Mail::Message/"Flags">. =over 4 =item $obj-EB() Inherited, see L =item $obj-EB( [BOOLEAN] ) Inherited, see L =item $obj-EB() Inherited, see L =item $obj-EB() Inherited, see L =item $obj-EB