shithub: riscv

ref: 0d5b33a9e821ab0c3230bd25596b6567f2b28cd6
dir: /rc/bin/webpaste/

View raw version
#!/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'