Shell Script needed - I have to collect time stamps from appserver logs
perl -MTime::Local -ne '
    ($ts, $y, $m, $d, $H, $M, $S, $frac) =
        /((d{4})-(dd)-(dd) (dd):(dd):(dd).(d+))/;
    $time = timelocal($S, $M, $H, $d, $m-1, $y-1900) + "0.$frac";
    print $ts, ",", $time, "n";
' log.file > output.file

2011-04-12 06:49:02.874,1302605342.874