HTTP DOM parser

(require (planet synx/html-dom)) (let ((dom (produce-dom))) (for-each (lambda (a) (display (format "Link: ~a~n" (send a get-attr 'href)))) (send dom find-all (lambda (e) (is-element? e 'a)))))

(require (planet synx/html-dom/parser)) (let ([parser (make-parser ...everything like foof 's parser ,pretty much)]))