From b53caa85b3e4390e61ad4e2e6f0a39f2b7f5d93d Mon Sep 17 00:00:00 2001 From: jjhua Date: Tue, 29 Nov 2011 06:20:22 +0000 Subject: [PATCH] If the mtms becomes ####*###, the lshwconn will not work well. enhance it git-svn-id: https://svn.code.sf.net/p/xcat/code/xcat-core/trunk@11062 8638fb3e-16cb-4fca-ae20-7b5d299a9bcd --- perl-xCAT/xCAT/FSPconn.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/perl-xCAT/xCAT/FSPconn.pm b/perl-xCAT/xCAT/FSPconn.pm index 83845709f..eedc6f9c8 100644 --- a/perl-xCAT/xCAT/FSPconn.pm +++ b/perl-xCAT/xCAT/FSPconn.pm @@ -616,7 +616,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;