Fix unescaped left brace in regex

bucardo · Mar 5, 2017 · f483bd1 · f483bd1
1 parent cd6fb9f
commit f483bd1
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/scripts/bucardo_rrd b/scripts/bucardo_rrd
@@ -51,7 +51,7 @@ push @q, [$db,$query] if defined $query and length $query;
 for (@q) {
   my ($db,$sql) = @$_;
   chomp $sql;
-  $sql =~ s/ARG{(\w+)}/$ARG->{$1}/ge;
+  $sql =~ s/ARG\{(\w+)\}/$ARG->{$1}/ge;
   $verbose and warn "SQL: -->$sql<--\n";
   my $sth = $dbh->{$db}->prepare($sql);
   $sth->execute();