arghly permission hose-ups fixed

[feisty_meow.git] / scripts / cgi / count.cgi

diff --git a/scripts/cgi/count.cgi b/scripts/cgi/count.cgi
old mode 100644 (file)
new mode 100755 (executable)
index 0e00e46..03993d2
--- a/scripts/cgi/count.cgi
+++ b/scripts/cgi/count.cgi
@@ -39,18 +39,11 @@ if ($server =~ /^www\./) {
 
 # translate some domains into other domains to avoid maintaining multiple
 # hit count lists for the same sites that have different names.
-if ($server =~ /^gruntose\.org/) {
-  $server =~ s/^gruntose\.org/gruntose.com/;
-}
-if ($server =~ /^gruntose\.net/) {
-  $server =~ s/^gruntose\.net/gruntose.com/;
-}
-if ($server =~ /^cromp\.net/) {
-  $server =~ s/^cromp\.net/cromp.org/;
-}
-if ($server =~ /^hoople\.net/) {
-  $server =~ s/^hoople\.net/hoople.org/;
-}
+#if ($server =~ /^gruntose\.org/) {
+#  $server =~ s/^gruntose\.org/gruntose.com/;
+#}
+
+#hmmm: what about koeritz.com / koeritz.org?
 
 #
 # increment count of hit document, but not if I'm the
@@ -70,7 +63,7 @@ $counts{$server.$doc}++;
 #
 seek(COUNTS, 0, 0);
 
-foreach $file (keys %counts) {
+foreach $file (sort {lc $a cmp lc $b} keys %counts) {
   print COUNTS $counts{$file}, ":", $file, "\n";
 }