|
|||||||||||||||||||||||||||||||||||||||||||||||
|
[ ID = 1481 ] | Instituto das Comunicacoes de Portugal (ICP) |
---|---|
Organisation name | Instituto das Comunicacoes de Portugal (ICP) |
Short name or acronym | Instituto das Comunicacoes de Portugal (ICP) |
Organisation type | Association |
Activity type | Call centers |
Address | Av. José Malhoa, 12 |
Postal Code | 1099-017 |
City | Lisboa |
Country | Portugal |
Phone | + +351 21 7211000 |
Fax | + +351 21 7211001 |
info_(on)_icp.pt | |
Organisation URL | http://www.icp.pt/indexuk.html |
Logo | Description |
![]() |
ICP is the regulatory body of the Portuguese communications sector, reporting to the Minister of Social Equipment. |
Contact | |
Name | |
Function | |
Department | |
Phone | + |
Fax | + |
![]() |
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" |