(send-http-post channel url mime body) -> null
Given a URL and a channel, send a HTTP request through the channel.
>> (define connection (tcp-connect "www.ephemeralsecurity.com" 80)) :: [stream 54A9A0] >> (send-http-post connection "www.ephemeralsecurity.com/non-existent"
"application/x-www-form-urlencoded" "&test=foobar")
:: null >> (wait connection) :: connect >> (wait connection) "<?xml version=\"1.0\" encoding=\"UTF-8\"?>\n<!DOCTYPE\n html PUBLIC \"> -//W3C//DTD XHTML 1.0 Strict//EN\"\n \"http://www.w3.org/TR/xhtml1/DTD/ xhtml1-strict.dtd\">\n<html\n xmlns=\"http://www.w3.org/1999/xhtml\"\n xml:lang=\"en\"><head>\n<title>Test Application</title>\n <link\n rel= \"stylesheet\"\n href=\"style.css\"\n type=\"text/css\" />
[rest of response omitted for brevity]
#f [primitive input]]]