I assume that you just want to make the HTTP GET equivalent.
(require net/url) (define google (string->url "http://google.com"))
Use get-pure-port to perform an HTTP GET; it returns the input port. In addition, the URL above is redirected, so we must include the following redirects.
(define in (get-pure-port google
If you need a single line response, you can use port->string :
(define response-string (port->string in)) (close-input-port in)
Or you can pass it to some function that parses it as HTML or XML. There are several such libraries on PLaneT ; I recommend (planet neil / html-parsing: 1) .
See also call/input-url , which automatically handles port closures.
Ryan culpepper
source share