#!/bin/csh -f
echo "Content-type: text/html"
echo ""
setenv HD /data/globec
if ( ! -e /jgofsopt/$REMOTE_HOST ) then
mkdir /jgofsopt/$REMOTE_HOST
cp $HD/htmlsrc/setup/* /jgofsopt/$REMOTE_HOST
endif
cd /jgofsopt/$REMOTE_HOST
set tmp=$PATH_INFO
setenv OBJ $tmp:r
setenv FULLOBJ $OBJ
setenv UQOBJ $OBJ
setenv QS ""
unsetenv PATH_INFO
#
# 10/28/97 clh added a sed to remove final space introduced by htmlesc
# note: better idea when time available is to determine why htmlesc
# wants to introduce the space. Is it useful somewhere? Can we
# change THAT use to add the space? Seems better than having it
# added 'blindly'.
# 10/30/97 clh moved the sed to a script to strip the space.
#
if ( "$QUERY_STRING" != "" ) then
setenv QS "`$HD/htmlbin/chop < $HD/htmlbin/bin/htmlesc '$QUERY_STRING'`"
setenv FULLOBJ "$OBJ($QS)"
setenv UQOBJ "$OBJ($QUERY_STRING)"
endif
set CUROPT=(`cat plotopt`)
cat <Simple XY Plotting
Simple XY Plot
Current object is: $FULLOBJ
Select this link, if the form looks incomplete.