hio/t/http1.hawk

20 lines
444 B
Plaintext

BEGIN {
x = sys::socket (sys::AF_INET, sys::SOCK_STREAM, 0);
sys::connect (x, "127.0.0.1:9988");
msg = b"GET /home/hyung-hwan/projects/hio/t/b.sh HTTP/1.1\r\n\
Host: www.google.com\r\n\
Connection: close\r\n\r\n";
#msg = b"GET /home/hyung-hwan/projects/hio/t/b.sh HTTP/1.1\r\n\
#Host: www.google.com\r\n\
#Connection: Keep-Alive\r\n\r\n";
sys::write (x, msg);
while (sys::read (x, buf) > 0) { printf ("%s", buf); }
sys::close (x);
}