Dream OCaml
/pixel.gif కు వచ్చే రిక్వెస్ట్లకు empty GIF తో జవాబిచ్చే, Dream కోసం OCaml స్నిపెట్. GIF స్టార్టప్లో ఒక్కసారే డీకోడ్ అవుతుంది.
Dream OCaml
(* dune: (executable (name pixel) (libraries dream base64)) *)
let gif = Base64.decode_exn "R0lGODlhAQABAIAAAP///wAAACH5BAEAAAAALAAAAAABAAEAAAICRAEAOw=="
let () =
Dream.run ~interface:"0.0.0.0" ~port:8080
@@ Dream.logger
@@ Dream.router
[
Dream.get "/pixel.gif" (fun _ ->
Dream.respond
~headers:[ ("Content-Type", "image/gif"); ("Cache-Control", "no-store") ]
gif);
]
ఫ్రేమ్వర్క్ ప్రస్తుత డాక్యుమెంటేషన్తో పోల్చి చెక్ చేశాం.
చెక్ చేయండి
curl -sI http://localhost:8080/pixel.gif