sub localtime
{
  my $time = shift || time;
  # code to convert to @time_parts
  if (wantarray)
  {
    return @time_parts;
  }
  elsif (defined wantarray)
  {
    return sprintf("...",@time_parts);
  }
}