The London Perl and Raku Workshop takes place on 26th Oct 2024. If your company depends on Perl, please consider sponsoring and/or attending.

NAME

Email::Simple::Header - the header of an Email::Simple message

VERSION

version 2.218

SYNOPSIS

my $email = Email::Simple->new($text);

my $header = $email->header_obj;
print $header->as_string;

DESCRIPTION

This method implements the headers of an Email::Simple object. It is a very minimal interface, and is mostly for private consumption at the moment.

PERL VERSION

This library should run on perls released even a long time ago. It should work on any version of perl released in the last five years.

Although it may work on older versions of perl, no guarantee is made that the minimum required version will not be increased. The version may be increased for any reason, and there is no promise that patches will be accepted to lower the minimum required perl.

METHODS

new

my $header = Email::Simple::Header->new($head, \%arg);

$head is a string containing a valid email header, or a reference to such a string. If a reference is passed in, don't expect that it won't be altered.

Valid arguments are:

crlf - the header's newline; defaults to CRLF

as_string

my $string = $header->as_string(\%arg);

This returns a stringified version of the header.

header_names

This method returns a list of the unique header names found in this header, in no particular order.

header_raw_pairs

my @pairs = $header->header_raw_pairs;
my $first_name  = $pairs[0];
my $first_value = $pairs[1];

This method returns a list of all the field/value pairs in the header, in the order that they appear in the header. (Remember: don't try assigning that to a hash. Some fields may appear more than once!)

header_pairs

header_pairs is another name for header_raw_pairs, which was the original name for the method and which you'll see most often. In general, though, it's better to be explicit and use header_raw_pairs. (In Email::MIME, header_str_pairs exists for letting the library do the header decoding for you.)

header_raw

my $first_value = $header->header_raw($field);
my $nth_value   = $header->header_raw($field, $index);
my @all_values  = $header->header_raw($field);

This method returns the value or values of the given header field. If the named field does not appear in the header, this method returns false.

This method just calls header_raw. It's the older name for header_raw, but it can be a problem because Email::MIME, a subclass of Email::Simple, makes header return the header's decoded value.

header_raw_set

$header->header_raw_set($field => @values);

This method updates the value of the given header. Existing headers have their values set in place. Additional headers are added at the end. If no values are given to set, the header will be removed from to the message entirely.

header_set

header_set is another name for header_raw_set, which was the original name for the method and which you'll see most often. In general, though, it's better to be explicit and use header_raw_set. (In Email::MIME, header_str_set exists for letting the library do the header encoding for you.)

header_raw_prepend

$header->header_raw_prepend($field => $value);

This method adds a new instance of the name field as the first field in the header.

header_rename

$header->header_rename($field, $new_name, $nth);

This renames the named field to the new name. If $nth is given, only the nth instance of the field will be renamed. It is fatal to rename an instance that does not exist. The first instance of a header is the 0th.

If $nth is omitted, all instances of the header are renamed.

When picking headers to rename, $field is matched case insensitively. So, given this header:

happythoughts: yes
HappyThoughts: so many
hapPyThouGhts: forever

Then this code...

$header->rename_header('happythoughts', 'Delights');

...will result in this:

Delights: yes
Delights: so many
Delights: forever

Headers may be rewrapped as a result of renaming.

crlf

This method returns the newline string used in the header.

AUTHORS

  • Simon Cozens

  • Casey West

  • Ricardo SIGNES <cpan@semiotic.systems>

COPYRIGHT AND LICENSE

This software is copyright (c) 2003 by Simon Cozens.

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