Perl 文字列日付 -> Unixtime

use Time::Local;

use DateTime::Format::Strptime;

my $strp   = DateTime::Format::Strptime->new(pattern => '%d-%b-%Y %H:%M');

my $dt = $strp->parse_datetime($s);

$s = timelocal(0,$dt->minute,$dt->hour,$dt->day,$dt->month-1,$dt->year);

Time, DateTime モジュール読み込み

my $strp に日付の分析パターン設定

my $dt で $s に入っている文字列を分析

$s = time() で日付をunixtimeで出力、　上の場合は、秒がないので、$dt-secondの部分は0