lshwconn is splitting the output incorrectly, because the state= information contains commas. fixed it
git-svn-id: https://svn.code.sf.net/p/xcat/code/xcat-core/trunk@10093 8638fb3e-16cb-4fca-ae20-7b5d299a9bcd
This commit is contained in:
parent
c0d91efef9
commit
fb52e5b25a
@ -612,7 +612,7 @@ sub lshwconn
|
||||
my @data_a = split("\n", $values);
|
||||
foreach my $data(@data_a) {
|
||||
if( $data =~ /state/) {
|
||||
$data =~ /state=([\w\s]+), type=([\w-]+), MTMS=([\w-\*]+), ([\w=]+), slot=([\w]+), ipadd=([\w.]+), alt_ipadd=([\w.]+)/ ;
|
||||
$data =~ /state=([\w\s\,]+), type=([\w-]+), MTMS=([\w-\*]+), ([\w=]+), slot=([\w]+), ipadd=([\w.]+), alt_ipadd=([\w.]+)/ ;
|
||||
#$data =~ /state=([\w\s]+),\(type=([\w-]+)\),\(serial-number=([\w]+)\),\(machinetype-model=([\w-]+)\),sp=([\w]+),\(ip-address=([\w.]+),([\w.]+)\)/ ;
|
||||
print "parsing: $1,$2,$3,$4,$5,$6,$7\n";
|
||||
my $state = $1;
|
||||
|
Loading…
Reference in New Issue
Block a user