Expert profile: Dr. Diane Kewley-Port
| [ ID = 0447 ] |
Dr. Diane Kewley-Port |
|---|
| Name |
Kewley-Port, Dr. Diane |
| Job Title | Executive Vice-President |
| Organisation |
Communication Disorders Technology |
| Address | 501 N. Morton St., Suite 215 |
| Postal Code | 47404 |
| City | Bloomington, IN |
| Country | United States |
| Phone | + 812 336-1766 |
| Fax | + |
| Mobile | + |
| Email |
kewley_(on)_indiana.edu
[@ replaced for spam protection] |
| Organisation URL |
|
| Personal URL |
|
| Membership |
|
| Languages | English |
| Specialism |
Second Language Speech |
| Photograph | Description or CV |
|---|
 |
http://www.comdistec.com
|
 Update your profile
|
Last update: 2008-08-30 03:24:39
#!/usr/bin/ksh
# cntr.cgi --
# version 0
DOC=$DOCUMENT_ROOT$DOCUMENT_URI
VSTART=28-08-2008
WRONGLOG=${DOCUMENT_ROOT}/cntr.txt
echo Content-type:text/html
echo
case $DOC in
*experts*) CDIR=${DOCUMENT_ROOT}/cntex ;;
*orgs*) CDIR=${DOCUMENT_ROOT}/cntor ;;
*) WRONG=yes ;;
esac
CFILE=${DOC##*/}
case ${CFILE} in
[0-9][0-9][0-9][0-9].html) WRONG=no ;;
*) WRONG=yes ;;
esac
[ $WRONG = yes ] &&
{ echo "$(date) $REMOTE_ADDR ${DOC}" >> $WRONGLOG
exit
}
CCNT=${CDIR}/${CFILE%.html}.txt
CLCK=${CDIR}/${CFILE%.html}.lck
[ -s $CCNT ] && COUNT=$(head -1 $CCNT)
COUNT=$(( ${COUNT:-0} + 1 ))
[ -f $CLCK ] ||
{ touch $CLCK
echo $COUNT > $CCNT
rm -f $CLCK
}
echo " Visits since $VSTART: $COUNT"
|
|---|
|
