add /rc/bin/ok, tool for okturing.com pastebin

rc/bin/ok

@@ -0,0 +1,8 @@
+#!/bin/rc
+if(~ $#* 0)
+	file=/fd/0
+if not
+	file=$1
+hpost -u http://okturing.com -p / a_body@$file submit:submit fake:fake a_func:add_post url: |
+grep -e '\/body\"' |
+sed 1q | sed 's/^.*href=\"//g; s/body\".*$/body/g; s/^/http:\/\/okturing.com/g'

sys/man/1/hget

@@ -1,6 +1,6 @@
 .TH HGET 1
 .SH NAME
-hget, hpost, urlencode \- retrieve, post to a web page corresponding to a url
+hget, hpost, ok, urlencode \- retrieve, post to a web page corresponding to a url
 .SH SYNOPSIS
 .B hget
 [
@@ -48,6 +48,9 @@ hget, hpost, urlencode \- retrieve, post to a web page corresponding to a url
 ]
 .I ...
 .PP
+.B ok
+.I file
+.PP
 .B urlencode
 [
 .B -d
@@ -175,6 +178,13 @@ flag), the file has to be seekable as
 .IR file (1)
 is invoked to determine its mime type.
 .PP
+.I Ok
+uploads the contents either of its standard input or
+.I file
+to the pastebin website
+.B http://okturing.com
+and then prints a URL where the contents may be retrieved.
+.PP
 .I Urlencode
 is a helper program to URL encode and decode files. The
 .B -d
@@ -209,20 +219,32 @@ Upload a file, print the resulting URL
 .EX
 % hpost -l http://i.intma.in file@/tmp/screen.png | rc
 .EE
+.PP
+Upload the output of
+.IR ns (1)
+to
+.B http://okturing.com
+.IP
+.EX
+% ns | ok
+.EE
 .SH SOURCE
 .B /rc/bin/hget
 .br
 .B /rc/bin/hpost
 .br
+.B /rc/bin/ok
+.br
 .B /sys/src/cmd/urlencode.c
 .SH "SEE ALSO"
 .IR webfs (4),
 .IR ftpfs (4),
 .IR file (1)
 .SH DIAGNOSTICS
-.I Hget
-and
+.I Hget ,
 .I hpost
+and
+.I ok
 require
 .IR webfs (4)
 service mounted on