Select Code to Download

use DateTime::Format::Strptime;
use strict;
...
my $parser   = DateTime::Format::Strptime->new(pattern => '%Y-%m-%d %H
+:%M:%S');
my $dt       = $parser->parse_datetime($datetime);
print $dt->epoch;

use DateTime::Format::HTTP;
use strict;
...
my $datetime = "2005-03-28 12:00:00";
my $dt       = DateTime::Format::HTTP->parse_datetime($datetime);
print $dt->epoch;