Current section
Files
Jump to
Current section
Files
src/joker.erl
-module(joker).
-compile([no_auto_import, nowarn_unused_vars, nowarn_unused_function, nowarn_nomatch]).
-export([main/0]).
-file("src/joker.gleam", 4).
-spec main() -> nil.
main() ->
gleam_stdlib:println(<<"Hello from JokeAPI!"/utf8>>),
Joke = jokeapi@api:get_any(),
case Joke of
{ok, J} ->
jokeapi@api:display_joke(J);
{error, Err} ->
gleam_stdlib:println(<<"Error fetching joke: "/utf8, (case Err of
{decode_error, Reason} ->
<<"Decode Error: "/utf8, Reason/binary>>;
{generic_error, Reason@1} ->
<<"Generic Error: "/utf8, Reason@1/binary>>;
{request_error, Reason@2} ->
<<"Request Error: "/utf8, Reason@2/binary>>
end)/binary>>)
end,
gleam_stdlib:println(<<"Category Joke"/utf8>>),
Category_joke = jokeapi@api:get_joke_from_category(<<"Dark"/utf8>>),
case Category_joke of
{ok, J@1} ->
jokeapi@api:display_joke(J@1);
{error, Err@1} ->
gleam_stdlib:println(
<<"Error fetching category joke: "/utf8, (case Err@1 of
{decode_error, Reason@3} ->
<<"Decode Error: "/utf8, Reason@3/binary>>;
{generic_error, Reason@4} ->
<<"Generic Error: "/utf8, Reason@4/binary>>;
{request_error, Reason@5} ->
<<"Request Error: "/utf8, Reason@5/binary>>
end)/binary>>
)
end,
gleam_stdlib:println(<<"Goodbye from joker!"/utf8>>).