New program to exchange a long URL for a shorter URL utilizing the API at tinyurl.com.

Reference: /n/sources/patch/applied/tinyurl
Date: Sun Dec 12 11:13:58 CET 2010
Signed-off-by: stanley.lieber@gmail.com

--- /rc/bin/tinyurl	Thu Jan  1 00:00:00 1970
+++ /rc/bin/tinyurl	Sun Jan 23 05:33:14 2011
@@ -0,0 +1,7 @@
+#!/bin/rc
+if(! ~ $#* 1) {
+	echo usage: tinyurl http://research.swtch.com/2008/02/hideous-name.html >[1=2]
+	exit usage
+}
+hget http://tinyurl.com/api-create.php?url'='$1
+echo
--- /sys/man/1/tinyurl	Thu Jan  1 00:00:00 1970
+++ /sys/man/1/tinyurl	Sun Dec 12 11:24:37 2010
@@ -0,0 +1,13 @@
+.TH TINYURL 1
+.SH NAME
+tinyurl \- shrink a URL
+.SH SYNOPSIS
+.B tinyurl
+.I URL
+.SH DESCRIPTION
+.I Exchanges
+a long URL for a shorter URL utilizing the API at tinyurl.com.
+.SH SOURCE
+.B /rc/bin
+.SH BUGS
+Redesigns of the source website can break this program.