diff --git a/perl-xCAT/xCAT/DBobjUtils.pm b/perl-xCAT/xCAT/DBobjUtils.pm index 1595e5cfc..df28181ad 100644 --- a/perl-xCAT/xCAT/DBobjUtils.pm +++ b/perl-xCAT/xCAT/DBobjUtils.pm @@ -1556,10 +1556,10 @@ sub getGroupMembers foreach my $testattr (keys %whereHash) { - if ($whereHash{$testattr} =~ /^\//) + if ($whereHash{$testattr} =~ /^\|/) { # wherevals includes regular expression my $tmpwherestring = $whereHash{$testattr}; - $tmpwherestring =~ /^\/(.*)\/$/g; + $tmpwherestring =~ /^\|(.*)\|$/g; $tmpwherestring = $1; if (!defined($myhash{$objname}{$testattr}) || ($myhash{$objname}{$testattr} !~ /$tmpwherestring/) ) {