let insert_underscores input =
  insert_delimiter input ~delimiter:'_'