#!/bin/sh -
PATH=$PATH:/l/palm/bin

url='http://www.paramountstations.com/common/schedule/episode.tin?'\
'Station=WKBD&BigPage=1'
urls=
urls="$urls $url&Show=EP446583"			# Star Trek: Enterprise

title='UPN Schedules'
dest="${PALMINST-$HOME/l/palm/install}/upnsched.pdb"

# clipupn - personalized Palm web clipper for local UPN broadcast schedules
# Steve Kinzler, steve@kinzler.com, Jan 99
# https://kinzler.com/me/home.html#palm

case "$#" in
0)	;;
*)	echo "usage: $0" 1>&2; exit 1;;
esac

case "$urls" in
'')	exit 0;;
esac

tmpA=/tmp/cuA$$
tmpB=/tmp/cuB$$
trap "rm -f $tmpA $tmpB; exit" 0 1 2 13 15

for url in $urls
do
	lynx -source "$url"
done > $tmpA
grep '^lynx: ' $tmpA && exit $?

html2pdbtxt -t"$title" $tmpA > $tmpB

txt2pdbdoc "$title" $tmpB "$dest"