($c_epoch, $frac) = $ep_time =~ /(\d+)\.(\d+)/; #courtesy of perlmonks
$c_epoch += $time; # converts to local time from internal date -> $FD
$str = localtime $c_epoch) =~ s/(.*:\d+)/$1.$frac/; #courtesy of perlmonks