From a5f325cdd00e23a0c695cddef228889651e92edc Mon Sep 17 00:00:00 2001 From: Scott Severtson <scott@severtson.us> Date: Tue, 25 Sep 2012 13:08:45 -0400 Subject: [PATCH] Unescape all commas in configuration parameters --- lib/Resmon/Config.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/lib/Resmon/Config.pm b/lib/Resmon/Config.pm index ddbaaae..a7bf00e 100755 --- a/lib/Resmon/Config.pm +++ b/lib/Resmon/Config.pm @@ -63,7 +63,7 @@ sub new { my $kvs = {}; my $check_name = $1; my @params = split(/(?<!\\),/, $2); - grep { s/\\(.)/$1/ } @params; + grep { s/\\(.)/$1/g } @params; grep { $kvs->{$1} = $2 if /^\s*(\S+)\s*=>\s*(\S(?:.*\S)?)\s*$/ } @params; my $object; -- GitLab