Expert profile: Mr Ardian Setiawan
[ ID = 2304 ] |
Mr Ardian Setiawan |
Name |
Setiawan, Mr Ardian |
Job Title | Vice director for networking affairs |
Organisation |
POLMAN TIMAH |
Address | KAWASAN INDUSTRI AIRKANTUNG |
Postal Code | 33211 |
City | SUNGAILIAT, BANGKA |
Country | Indonesia |
Phone | +62 717 93586 |
Fax | +62 717 93585 |
Mobile | +62 8117173756 |
Email |
ardian_(on)_polman-timah.ac.id
[@ replaced for spam protection] |
Organisation URL |
http://www.polman-timah.ac.id |
Personal URL |
|
Membership |
|
Languages | English |
Specialism |
Computer Assisted Language Learning |
Photograph | Description or CV |
|
|
Update your profile
|
Last update: 2009-03-27 02:23:18
#!/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"
|
|