#!/usr/bin/perl -w
use strict;

$ENV{TZ} = 'EST5EDT';

use Date::Manip;

my $gDate;

while(<DATA>)
{
  $gDate = ParseDate($_);
  print UnixDate($gDate,'%Y-%m-%d %H:%M:%S'),"\n";
}



__DATA__
2002-08-23 11:39:24.0
Fri Aug 23 12:14:04 2002