fix(ibm/tsamp): correct regexp (#3301)
This commit is contained in:
parent
654e5de65d
commit
37890b6074
|
@ -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 };
|
||||
|
|
|
@ -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}/) {
|
||||
|
|
Loading…
Reference in New Issue