sub iso_time { 
  require POSIX;
  POSIX::strftime("%Y-%m-%d %H:%M:%S",
      localtime( shift( @_ ) || time ) );
}