ref: 3167f5f7e3d2363ab57a107c838e1c5ef1fcda80
dir: /rc/bin/wurl2txt/
#!/bin/rc
switch($#*){
case 0
exit
case 1
name = /`{echo $1 | sed 's;.*//;;
s;/.*;;'}^/webpage
# send hget errors to 2 so they appear in window
hget $1 >[2=1]| {echo $1; echo; htmlfmt} >[2=1] | plumb -i -d edit -a 'action=showdata filename='$name
exit
case *
for(i in *)
wurl2txt $i
}