Organisation profile: Proglobo
[ ID = 1961 ] | Proglobo |
Organisation name | Proglobo |
Short name or acronym | Proglobo |
Organisation type | Company |
Activity type | Speech technology |
Address | Rua Prof. Prado Coelho, nº 34 1º Esq. |
Postal Code | 1600-634 |
City | Telheiras |
Country | Portugal |
Phone | + +35 1 21 754 06 52 3 |
Fax | + +35 1 21 754 06 56 |
Email | info_(on)_proglobo.com |
Organisation URL | http://www.proglobo.pt |
Logo | Description |
 |
|
| Contact |
Name | |
Function | |
Department | |
Email | |
Phone | + |
Fax | + |
Update this profile
|
Last update: 2002-04-10 12:32:58
#!/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"
|
|