-module(examples@password).
-compile([no_auto_import, nowarn_unused_vars, nowarn_unused_function, nowarn_nomatch]).

-export([main/0]).

-spec main() -> {ok, nil} | {error, {integer(), binary()}}.
main() ->
    _pipe = [<<"zenity"/utf8>>],
    _pipe@1 = gu:new_password(_pipe, true),
    _pipe@2 = gu:set_title(_pipe@1, <<"Password"/utf8>>),
    _pipe@3 = gu:prompt(_pipe@2),
    gleam@result:map(
        _pipe@3,
        fun(Answer) -> case gleam@string:split(Answer, <<"|"/utf8>>) of
                [Username, Password] ->
                    _ = begin
                        _pipe@4 = [<<"zenity"/utf8>>],
                        _pipe@5 = gu:new_info(_pipe@4),
                        _pipe@6 = gu:set_text(
                            _pipe@5,
                            <<<<<<"Username: "/utf8, Username/binary>>/binary,
                                    "\nPassword: "/utf8>>/binary,
                                Password/binary>>
                        ),
                        _pipe@7 = gu:set_timeout(_pipe@6, 10),
                        gu:show(_pipe@7, true)
                    end,
                    nil;

                _ ->
                    nil
            end end
    ).