#!/usr/bin/sh
echo "Content-type: text/html\n\n"
echo "Random Bible Verse"
cat /data/WWW/data/Org/UCSC/body.h
echo ""
cat /data/WWW/data/Org/UCSC/logo.h
echo ""
echo "A Random Bible Verse using "
echo "The Bible Gateway"
echo " (reload for another verse)"
echo "
"
echo "
"
echo ""
libwww-perl-0.40/get -q `./genverse.pl` | grep -v BODY | \
grep -v HEAD | sed -e 's/HREF/href/g' |sed -e 's/href=\"/href=\"http:\/\/www.gospelcom.net/g' | \
sed -e's/src=\"/src=\"http:\/\/www.gospelcom.net/g'
#/data/WWW/data/Org/UCSC/cgi-bin/count.pl '/Org/UCSC/cgi-bin/rbv.cgi' $REMOTE_ADDR