remove cache

* remove cache, cache setup is not easy, todays servers do not really
* need it anymore
* add prototypes and fix parameter issues
* suppress redefinition

website/agenda/comments.cgi

@@ -1,7 +1,8 @@
-#! /usr/bin/perl -w
+#!/usr/bin/perl
 
-use warnings "all";
 use strict;
+use warnings;
+no warnings 'redefine';
 
 use Data::Dumper;
 
@@ -11,7 +12,6 @@ use comments();
 use db();
 use markup();
 use time();
-use cache();
 use log();
 my $r = shift;
 ( my $cgi, my $params, my $error ) = params::get($r);
@@ -19,20 +19,20 @@ my $r = shift;
 binmode STDOUT, ":encoding(UTF-8)";
 
 if ( $0 =~ /comments.*?\.cgi$/ ) {
-	my $config = config::get('config/config.cgi');
-	my $debug  = $config->{system}->{debug};
+    my $config = config::get('config/config.cgi');
+    my $debug  = $config->{system}->{debug};
 
-	my $request = {
-		url    => $ENV{QUERY_STRING},
-		params => {
-			original => $params,
-			checked  => comments::check_params( $config, $params ),
-		},
-	};
+    my $request = {
+        url    => $ENV{QUERY_STRING},
+        params => {
+            original => $params,
+            checked  => comments::check_params( $config, $params ),
+        },
+    };
 
-	my $output = '';
-	comments::get_cached_or_render( $output, $config, $request, 'filter_locked' );
-	print $output;
+    my $output = '';
+    comments::get_cached_or_render( $output, $config, $request, 'filter_locked' );
+    print $output;
 }
 
 #do not delete last line