xref: /plan9/rc/bin/ups (revision 39dc14208bd73723190dc96abcf59ed5c10cfd3b)
1#!/bin/rc
2# ups - look up a UPS tracking number
3rfork en
4
5if(! ~ $#* 1) {
6	echo usage: ups 1ZA41W190338680961 >[1=2]
7	exit usage
8}
9
10hget 'http://wwwapps.ups.com/WebTracking/processInputRequest?tracknum='^$1^ \
11	'&TypeOfInquiryNumber=T' >/tmp/ups.1
12
13sed 's/<[Tt][Dd]>/& «TD»/g; s/<[Tt][Rr]>/&<td> «TR» /g' /tmp/ups.1 |
14	htmlfmt >/tmp/ups.2
15sam -d /tmp/ups.2 >[2] /dev/null <<'!'
16/^Tracking results.*/p
17.,$d
18/Help/d
191,.d
20$-2,$d
21/Status:/+1
22.,/«TR»/-2d
23,s/\n/ /g
24,sTR»/\n/g
25,sTD»/	/g
26,s/ *	 */	/g
27,s/^[ 	]*//g
28,s/[ 	]*$//g
29,s/\n\n+/\n\n/g
30,p
31!
32echo
33