Expert profile: Mr. Greg Sutton
| [ ID = 2182 ] |
Mr. Greg Sutton |
|---|
| Name |
Sutton, Mr. Greg |
| Job Title | CEO |
| Organisation |
TinyEYE |
| Address | 127g-116 Research Drive |
| Postal Code | S7N 3R3 |
| City | Saskatoon |
| Country | Canada |
| Phone | +396 955-1911 |
| Fax | +877 846-9393 |
| Mobile | + |
| Email |
gsutton_(on)_tinyeye.com
[@ replaced for spam protection] |
| Organisation URL |
http://www.TinyEYE.com |
| Personal URL |
|
| Membership |
|
| Languages | English |
| Specialism |
Technology Implementation |
| Photograph | Description or CV |
|---|
 |
|
 Update your profile
|
Last update: 2008-01-23 16:47:24
#!/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"
|
|---|
|
