summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorGreg Sabino Mullane2009-02-20 14:49:31 +0000
committerGreg Sabino Mullane2009-02-20 14:49:31 +0000
commit54b650217c94455592a7ebb4f1a3bd597869d9d3 (patch)
treeea381205910127199eb3d329d2f3aa9ba745b920
parent3c29a894837f484d9a0a4b7fb61c4676eeb582a2 (diff)
Fix missing arg problem in msg() calls. Remove debug line.
-rwxr-xr-xcheck_postgres.pl4
1 files changed, 2 insertions, 2 deletions
diff --git a/check_postgres.pl b/check_postgres.pl
index 8f4c9d306..f49f00f5e 100755
--- 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;