sub report {
  trim($_) for @_;
  return sprintf "...",@_;
}