|
|||||||||||||||||||||||||||||||||||||||||
|
[ ID = 1187 ] | Joe Weber |
---|---|
Name | Weber, Joe |
Job Title | CEO |
Organisation | Narratek, Inc. |
Address | 484 Savoie Drive |
Postal Code | 33410 |
City | Palm Beach Gardens, FL |
Country | United States |
Phone | + 561-775-7705 |
Fax | + |
Mobile | + |
joeweber_(on)_alum.mit.edu [@ replaced for spam protection] | |
Organisation URL | |
Personal URL | |
Membership | |
Languages | English |
Specialism | Speechtechnology:
Medical Applications |
Photograph | Description or CV |
Update your profile | Last update: 2009-02-22 13:43:13 #!/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" |