use Date::Parse;
use DateTime;

my $time = str2time("26/Aug/2005:01:05:43 -0400");

my $dt = DateTime->from_epoch( epoch => $time );

print $dt->ymd(''), $dt->hms(''), "Z\n";