let find_arg argl ~name ~convert = List.find_map argl (fun arg -> match String.split ~on:(`Character '=') arg |> List.map ~f:String.strip with | n :: c :: [] when n = name -> convert c | _ -> None)