Text::Header

I recently tried out Text::Header, a Perl module that provides two new functions, header and unheader, which allow for RFC 822 header construction and parsing. While not specifically tailored for HTTP, the module provides a straightforward toolset for parsing headers.

One of the features I appreciated was the module's similarity to popular interfaces like CGI.pm and HTTP::Headers. The headers function automatically performs three key functions: 1) changing the first letter of each tag token to uppercase and converting any underscores to hyphens, 2) adding a colon and a newline after each tag-value pair, and 3) combining list elements with commas for clarity.

To use the module, all that's needed is to call 'use Text::Header;' and both header and unheader are automatically imported. Then, to initiate a header construction, the header function can be called with named parameters. In one example from the documentation, the following parameters create an array of headers:

@HEADERS = header(
content_type => 'text/html',
author => 'Nathan Wiger',
last_modified => $date,
accept => [qw(text/html text/plain)]
);

In addition to the default HTTP-style headers, the module can format SMTP headers as well. For example:

@mail_headers = header(
from => 'Nathan Wiger',
to => '[email protected]'
);
print $MAIL @mail_headers, " Keep up the great work! ";

Overall, Text::Header is a reliable, efficient module that delivers on its promises for easy and accurate header parsing.