Ls3's Computers

Computer One - Windows 2000 Professional
Processor Pentium IIII 700 MHz
Motherboard Abit BX133-RAID
Memory 448 Mb PC133 SDRAM
Storage Western Digital Caviar 20GB ATA66
Western Digital Caviar 40GB ATA66
Creative Labs 48X CDROM
Creative Labs 8X DVDROM
TDK VeloCD 12X/10X/32X
Teac 3.5" Floppy
Network D-Link DFE530TX 10/100 NIC
Sound Creative Labs Soundblaster Live!
Monitor Mitsubishi Diamond Plus 71 17" CRT
Graphics Creative Labs 3D Annihilator 2 Ultra

Computer Two - Redhat Linux 7.2
Processor AMD Athlon 900 MHz
Motherboard Abit KT7A-RAID
Memory 512 Mb PC133 SDRAM
Storage Western Digital Caviar 20GB ATA66
Kenwood 72X CDROM
Network 3Com 3905C 10/100 NIC
Graphics ATi Rage Fury Pro AGP

Computer Three - Windows 2000 Professional, Redhat Linux 7.2
Processor AMD Athlon Thunderbird 1.2 GHz
Motherboard Asus A7M266
Memory 256 Mb PC2100 DDR
Storage Pioneer 12XDVDROM
TDK VeloCD 12X/10X/32X
Network 3com 3905C 10/100 NIC
Graphics Elsa Gladiac Geforce2 Ultra

All HTML and Graphics Copyright 2001 Ls3.net Designs

#!/usr/local/bin/perl #################################################################### # # # SSI Text Counter # # Kastle Internet Services # # http://www.kastle.net # # kastle@kastle.net # # # #################################################################### # $ # THIS PROGRAM MAY BE USED AND DISTRIBUTED FREELY PROVIDED # # NO MODIFICATIONS ARE MADE TO THE CODE. # # # # Copyright (c) 1998 - Kastle Internet Services # # All rights reserved # # Written & Tested by Kastle Internet Services # # gatekeeper@kastle.net # # # # # #################################################################### # DISCLAIMER: # # # # In no event will Kastle Internet Services be liable to the user # # of this script or any third party for any damages, including # # any lost profits, lost savings or other incidental, # # consequential or special damages arising out of the operation # # of or inability to operate this script, even if user has been # # advised of the possibility of such damages. # # # #################################################################### require "counter.conf"; ######################################### # DO NOT EDIT BELOW THIS LINE # ######################################### $pagepath = $ENV{'DOCUMENT_URI'}; print "Content-type: text/html\n\n"; open(FILE, ">>$counter_file"); close(FILE); open(FILE, "$counter_file"); @indata = ; close(FILE); $onoff = 0; open(FILE, ">$counter_file"); foreach $temp (@indata) { chop($temp); ($uri, $count) = split(/\|/, $temp); if ($uri eq $pagepath) { $count++; $onoff = 1; print FILE "$uri|$count\n"; print "$count"; } else { print FILE "$uri|$count\n"; } } if ($onoff eq 0) { print FILE "$pagepath|1\n"; print "1"; } close(FILE);