:- use_module(library(http/http_open)).
-
?- http_set_authorization('http://www.example.com/private/', basic('John', 'Secret'))