More than 5 years have passed since last update.

画像を保存

Scheme

Posted at 2012-04-05

(use rfc.http)
(use rfc.uri)
(use file.util)
(define (img uri)
  (receive 
    (uri-scheme user-info hostname port path query fragment) 
    (uri-parse uri)
    (receive 
      (dir file ext) 
      (decompose-path path)
      (receive 
        (status head body) 
        (http-get hostname path)
        (with-output-to-file 
          (string-append file "." ext) 
          (pa$ print body))))))

You get articles that match your needs
You can efficiently read back useful information
You can use dark theme

What you can do with signing up