Fixing regex expression get_pid

diff --git a/tools/altperl/slon-tools.pm b/tools/altperl/slon-tools.pm
index c7a6e06c91d22164d3cad16930361fae5ae9e4b0..c98d203a60a5152fd26e14d9c8d0a39bdf985043 100644 (file)
--- a/tools/altperl/slon-tools.pm
+++ b/tools/altperl/slon-tools.pm
@@ -134,7 +134,7 @@ sub get_pid {
   #  print "Searching for PID for $dbname on port $dbport\n";
   if ($config) {
     my $config_regexp = quotemeta( $config );
-    $command =  ps_args() . "| egrep \"[s]lon -f $config_regexp \" | sort -n | awk '{print \$2}'";
+    $command =  ps_args() . "| egrep \"[s]lon -f $config_regexp\" | sort -n | awk '{print \$2}'";
   } else {
     $dsn = quotemeta($dsn);
     $command =  ps_args() . "| egrep \"[s]lon .* $CLUSTER_NAME \" | egrep \"$dsn\" | sort -n | awk '{print \$2}'";