use strict;
use Date::Manip;
my $dt = new Date::Manip::Date;
my $datestr  = "2016-07-30-15:30:00 GMT";
$dt->parse($datestr);

# Print date in local time, if I knew how to do that...