|
|||||||||||||||||||||||||||||||||||||||||
|
[ ID = 0757 ] | Stefan Werner |
---|---|
Name | Werner, Stefan |
Job Title | |
Organisation | University of Joensuu |
Address | P.O. Box 111 |
Postal Code | FIN-80101 |
City | Joensuu |
Country | Finland |
Phone | + 358-13-2514334 |
Fax | + 358-13-2514211 |
Mobile | + |
stefan.werner_(on)_joensuu.fi [@ replaced for spam protection] | |
Organisation URL | http://www.joensuu.fi/joyindex.html |
Personal URL | http://cc.joensuu.fi/~werner/ |
Membership | ISCA ISPhS, IPA |
Languages | English Finnish, German |
Specialism | Speech Synthesis
Acoustic Phonetics Prosody Speech pathologies |
Photograph | Description or CV |
![]() |
|
![]() |
Last update: 2008-08-31 20:35:59 #!/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" |