home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
HTML - Publishing on the Internet
/
html_cdrom.iso
/
tools
/
html
/
linux
/
check
/
htmlchkp.sh
< prev
next >
Wrap
Linux/UNIX/POSIX Shell Script
|
1995-02-19
|
2KB
|
52 lines
#!/bin/sh
#
# Shell script to run htmlchek.pl with options checking. (In this release of
# the htmlchek package, htmlchek.pl actually does internal options checking.)
#
nonvar='NO'
for px
do
case $px
in *=* ) if test $nonvar = 'YES'
then echo "Error: An option=value argument $px followed" >&2
echo "a filename argument on the command line." >&2
exit 1
else
case $px
in append=* | arena=* | configfile=* | deprecated=* |\
dirprefix=* | dlstrict=* | html3=* | htmlplus=* | loosepair=* |\
lowlevelnonpair=* | lowlevelpair=* | map=* | metachar=* |\
netscape=* | nogtwarn=* | nonblock=* | nonpair=* |\
nonrecurpair=* | novalopts=* | nowswarn=* | refsfile=* |\
reqopts=* | strictpair=* | subtract=* | sugar=* | tagopts=* |\
usebase=* | xref=* | cf=* | inline=* | lf=* | listfile=* ) ;;
* ) echo "Error: In the option=value argument $px, the part" >&2
echo "before the equals sign \`=' is not a recognized option." >&2
exit 1;;
esac
fi;;
* ) nonvar='YES';;
esac
done
#
case ${HTMLCHEK:-"/"}
in */ ) ;;
* ) HTMLCHEK="$HTMLCHEK/";;
esac
if test -s ${HTMLCHEK}htmlchek.pl
then
echo "Checking file(s) now... (using perl)" >&2
perl ${HTMLCHEK}htmlchek.pl $@
if test $? -ne 0
then echo "Note: there was apparently an error in running perl" >&2
exit 1
fi
else
echo "htmlchek.pl is not found. Either copy it to the current directory, or
set the environment variable HTMLCHEK to the pathname where it is located.
Do \`setenv HTMLCHEK /somedir/' in csh and tcsh, \`HTMLCHEK=/somedir/;
export HTMLCHEK' in sh and its offspring." >&2
exit 1
fi
exit 0