21 lines
326 B
Text
21 lines
326 B
Text
|
#!/bin/rc
|
||
|
|
rfork en
|
||
|
|
|
||
|
|
|
||
|
|
if(! ~ $#* 1) {
|
||
|
|
echo usage: usps 01601531218002685498 >[1=2]
|
||
|
|
exit usage
|
||
|
|
}
|
||
|
|
|
||
|
|
rfork e
|
||
|
|
|
||
|
|
hget -p 'origTrackNum='^$1 http://trkcnfrm1.smi.usps.com/PTSInternetWeb/InterLabelInquiry.do |
|
||
|
|
htmlfmt > /tmp/usps.$pid
|
||
|
|
|
||
|
|
sam -d /tmp/usps.$pid >[2] /dev/null <<'!'
|
||
|
|
0,/Label/-1d
|
||
|
|
/^Enter Label/,$d
|
||
|
|
,p
|
||
|
|
!
|
||
|
|
rm /tmp/usps.$pid
|