alias Web {
sockopen Web www.website.com 80
}
on *:sockopen:Web: {
sockwrite -n GET /path/page.htm HTTP/1.0
sockwrite -n Host: www.website.com
sockwrite -n $sockname Accept: */* $+ $crlf $+ $crlf
}
on *:sockread:Web: {
if ($sockerr) {
echo -a Error.
halt
}
else {
var %temptext
sockread %temptext
echo -a %temptext
}
}