- more statistics

diff --git a/docbot.pl b/docbot.pl
index 845618168a2340c5888f08bc6febc416fa2737f9..09dbf8ff1f4f8d502767d234dc1675381354dd32 100755 (executable)
--- a/docbot.pl
+++ b/docbot.pl
@@ -283,6 +283,9 @@ sub init_statistics {
     $main::statistics{'command_counter_status'} = 0;
     $main::statistics{'command_access_denied'} = 0;
 
+    $main::statistics{'database_connects'} = 0;
+    $main::statistics{'database_queries'} = 0;
+
     $main::statistics{'connects'} = 0;
 
 }
@@ -1500,6 +1503,9 @@ sub handle_command_status {
     $irc->yield( privmsg => $channel, 'Number of executed commands: ' . join(", ", @commands) );
     $irc->yield( privmsg => $channel, 'Number of denied requests: ' . $main::statistics{'command_access_denied'} );
 
+    $irc->yield( privmsg => $channel, 'Number of executed database queries: ' . $main::statistics{'database_queries'} );
+    $irc->yield( privmsg => $channel, 'Number of executed database (re)connects: ' . $main::statistics{'database_connects'} );
+
 
     return '';
 }