OCaml HTTP cookie handling library with support for Eio-based storage jars
1let () =
2 Eio_main.run @@ fun env ->
3 let args = Sys.argv in
4 if Array.length args < 2 then (
5 Printf.eprintf "Usage: %s <cookies.txt>\n" args.(0);
6 exit 1
7 );
8 let file_path = args.(1) in
9 let fs = Eio.Stdenv.fs env in
10 let clock = Eio.Stdenv.clock env in
11 let path = Eio.Path.(fs / file_path) in
12 let jar = Cookeio_jar.load ~clock path in
13 Format.printf "%a@." Cookeio_jar.pp jar