@files = map {substr $_ => 18}
             sort
             map {sprintf "%017.10f %s" => -M, $_} <*.log>;