From 37890b60744661c162a720583edbd6952bb59970 Mon Sep 17 00:00:00 2001
From: qgarnier <garnier.quentin@gmail.com>
Date: Tue, 7 Dec 2021 10:57:21 +0100
Subject: [PATCH] fix(ibm/tsamp): correct regexp (#3301)

---
 apps/ibm/tsamp/local/mode/listresourcegroups.pm | 2 +-
 apps/ibm/tsamp/local/mode/resourcegroups.pm     | 2 +-
 2 files changed, 2 insertions(+), 2 deletions(-)

diff --git a/apps/ibm/tsamp/local/mode/listresourcegroups.pm b/apps/ibm/tsamp/local/mode/listresourcegroups.pm
index 3f670dbbd..c35bb7181 100644
--- a/apps/ibm/tsamp/local/mode/listresourcegroups.pm
+++ b/apps/ibm/tsamp/local/mode/listresourcegroups.pm
@@ -49,7 +49,7 @@ sub manage_selection {
     );
 
     my $rg = [];
-    while ($stdout =~ /^(.*)\s+IBM.ResourceGroup:(.*?)\s+.*?Nominal=(.*)\s*$/mig) {
+    while ($stdout =~ /^(\S.*)\s+IBM.ResourceGroup:(.*?)\s+.*?Nominal=(.*)\s*$/mig) {
         my ($name, $opState, $nominalState) = ($2, lc($1), lc($3));
         
         push @$rg, { name => $name, state => $opState, nominal => $nominalState };
diff --git a/apps/ibm/tsamp/local/mode/resourcegroups.pm b/apps/ibm/tsamp/local/mode/resourcegroups.pm
index 84decbde2..1756f1f06 100644
--- a/apps/ibm/tsamp/local/mode/resourcegroups.pm
+++ b/apps/ibm/tsamp/local/mode/resourcegroups.pm
@@ -120,7 +120,7 @@ sub manage_selection {
     };
 
     $self->{rg} = {};
-    while ($stdout =~ /^(.*)\s+IBM.ResourceGroup:(.*?)\s+.*?Nominal=(.*)\s*$/mig) {
+    while ($stdout =~ /^(\S.*)\s+IBM.ResourceGroup:(.*?)\s+.*?Nominal=(.*)\s*$/mig) {
         my ($name, $opState, $nominalState) = ($2, lc($1), lc($3));
         if (defined($self->{option_results}->{filter_rg_name}) && $self->{option_results}->{filter_rg_name} ne '' &&
             $name !~ /$self->{option_results}->{filter_rg_name}/) {