Manual Reference Pages - EMAIL::DATE (3)
Email::Date - Find and Format Date Headers
my $email = join , <>;
my $date = find_date($email);
my $header = format_date($date->epoch);
header => [
Date => $header,
body => ...,
<B>Achtung!B> Probably youll be find just using Email::Date::Format to
produce dates or Date::Parse to parse dates. This module isnt much needed
anymore, but does provide find_date, described below.
RFC 2822 defines the Date: header. It declares the header a required
part of an email message. The syntax for date headers is clearly laid
out. Stil, even a perfectly planned world has storms. The truth is, many
programs get it wrong. Very wrong. Or, they dont include a Date: header
at all. This often forces you to look elsewhere for the date, and hoping
to find something.
For this reason, the tedious process of looking for a valid date has been
encapsulated in this software. Further, the process of creating RFC
compliant date strings is also found in this software.
my $time_piece = find_date $email;
find_date accepts an email message in any format
Email::Abstract can understand. It looks through the email
message and finds a date, converting it to a Time::Piece object.
If it cant find a date, it returns false.
find_date is exported by default.
my $date = format_date; # now
my $date = format_date( time - 60*60 ); # one hour ago
format_date accepts an epoch value, such as the one returned by time.
It returns a string representing the date and time of the input, as
specified in RFC 2822. If no input value is provided, the current value
of time is used.
format_date is exported by default.
my $date = format_gmdate;
format_gmdate is identical to format_date, but it will return a string
indicating the time in Greenwich Mean Time, rather than local time.
format_gmdate is exported on demand, but not by default.
COPYRIGHT AND LICENSE
This software is copyright (c) 2004 by Casey West.
This is free software; you can redistribute it and/or modify it under
the same terms as the Perl 5 programming language system itself.
|perl v5.20.3 ||EMAIL::DATE (3) ||2013-08-02 |
Visit the GSP FreeBSD Man Page Interface.
Output converted with manServer 1.07.