Fix missing arg problem in msg() calls. Remove debug line.

diff --git a/check_postgres.pl b/check_postgres.pl
index 8f4c9d30639efff303c25cdbfcdf09d78ba46b1a..f49f00f5eb063ced775ed022975401eb2d9cb039 100755 (executable)
--- a/check_postgres.pl
+++ b/check_postgres.pl
@@ -718,7 +718,8 @@ sub msg {
 
        my $x=1;
        {
-               last unless $msg =~ s/\$$x/$_[$x-1]/ge;
+               my $val = $_[$x-1];
+               last unless $msg =~ s/\$$x/$val/g;
                $x++;
                redo;
        }
@@ -2115,7 +2116,6 @@ sub check_backends {
 
        for $db (@{$info->{db}}) {
                my ($limit,$total,$grandtotal) = (0,0,0);
-               warn $db->{slurp};
          SLURP: while ($db->{slurp} =~ /(\d+) \| (\d+)\s+\|\s+(\w+)\s*/gsm) {
                        $grandtotal++;
                        $limit ||= $2;