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

NAME

Sietima::Role::Headers - adds standard list-related headers to messages

VERSION

version 1.1.2

SYNOPSIS

  my $sietima = Sietima->with_traits('Headers')->new({
   %args,
   name => $name_of_the_list,
  });

DESCRIPTION

A Sietima list with this role applied will add, to each outgoing message, the set of headers defined in RFC 2919 and RFC 2369.

This role uses the list_addresses method to determine what headers to add.

If the name attribute is set, a List-Id: header will be added, with a value built out of the name and the $self->list_addresses->{return_path} value (which is normally the same as the return_path attribute).

Other List-*: headers are built from the other values in the list_addresses hashref. Each of those values can be:

  • an Sietima::HeaderURI object

  • a thing that can be passed to that class's constructor:

  • an arrayref containing any mix of the above

As a special case, if $self->list_addresses->{post} exists and is false, the List-Post header will have the value NO to indicate that the list does not accept incoming messages (e.g. it's an announcement list).

ATTRIBUTES

name

Optional string, the name of the mailing list. If this attribute is set, a List-Id: header will be added, with a value built out of the name and the $self->list_addresses->{return_path} value (which is normally the same as the return_path attribute).

MODIFIED METHODS

munge_mail

This method adds list-management headers to each message returned by the original method.

AUTHOR

Gianni Ceccarelli <dakkar@thenautilus.net>

COPYRIGHT AND LICENSE

This software is copyright (c) 2023 by Gianni Ceccarelli <dakkar@thenautilus.net>.

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