RosettaCodeData/Task/Web-scraping/Racket/web-scraping.rkt

#lang racket
(require net/url)
((compose1 car (curry regexp-match #rx"[^ <>][^<>]+ UTC")
           port->string get-pure-port string->url)
 "https://tycho.usno.navy.mil/cgi-bin/timer.pl")
Sync 2013-10-27 22:24:23 +00:00			`#lang racket`
			`(require net/url)`
			`((compose1 car (curry regexp-match #rx"[^ <>][^<>]+ UTC")`
			`port->string get-pure-port string->url)`
September Morn Update 2019-09-12 10:33:56 -07:00			`"https://tycho.usno.navy.mil/cgi-bin/timer.pl")`