download and parse web pages with racket

http.rkt

#!  /usr/bin/racket
#lang racket

(require net/url)
(require net/uri-codec)
(require (planet neil/html-parsing:2:0))
(require (planet clements/sxml2:1:3))

(define (get-http process)
  (compose
    process
    html->xexp
    port->string
    get-pure-port
    string->url))

(provide (all-defined-out))