sub unix_to_datetime {
  my @time_vec;
  @time_vec = @_ if @_>1;
  unless (@time_vec) {
    my $time = shift;
    @time_vec = (defined $time ? localtime($time) : localtime);
  }
  return strftime('%Y-%m-%d %H:%M:%S', @time_vec);
}