02 Aug 2013 22:02:10 UTC
- Distribution: Email-Date
- Module version: 1.104
- Source (raw)
- Browse (raw)
- How to Contribute
- Issues (1)
- Testers (1329 / 0 / 0)
- KwaliteeBus factor: 1
- 96.15% Coverage
- License: perl_5
- Activity24 month
- Download (13.82KB)
- MetaCPAN Explorer
- Subscribe to distribution
- This version
- Latest versionRJBS Ricardo SIGNES 😄and 1 contributors
- Casey West
Take me over?The maintainer of this distribution is looking for someone to take over! If you're interested then please contact them via email.
- COPYRIGHT AND LICENSE
Email::Date - Find and Format Date Headers
use Email::Date; my $email = join '', <>; my $date = find_date($email); print $date->ymd; my $header = format_date($date->epoch); Email::Simple->create( header => [ Date => $header, ], body => '...', );
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 don't 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;
If it can't find a date, it returns false.
find_dateis exported by default.
my $date = format_date; # now my $date = format_date( time - 60*60 ); # one hour ago
format_dateaccepts 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
format_dateis exported by default.
my $date = format_gmdate;
format_gmdateis identical to
format_date, but it will return a string indicating the time in Greenwich Mean Time, rather than local time.
format_gmdateis exported on demand, but not by default.
Ricardo SIGNES <firstname.lastname@example.org>
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.