streaming_split.gleam

import gleam/iterator
import gleam/string
import gleam/io

pub fn main() {
  iterator.unfold(["1,2,3,4,5,6,6,7"], fn(acc) {
    case acc {
      [] -> iterator.Done
      [e] | [e, ..] ->
        case binary_split(e, <<",":utf8>>) {
          [] -> iterator.Done
          [value, ..rest] -> iterator.Next(value, rest)
        }
    }
  })
  |> iterator.take(5)
  |> iterator.to_list()
  |> string.join(":")
  |> io.debug()
}

@external(erlang, "binary", "split")
fn binary_split(s: String, p: BitArray) -> List(String)