remove trailing comma for $servip.

git-svn-id: https://svn.code.sf.net/p/xcat/code/xcat-core/trunk@7366 8638fb3e-16cb-4fca-ae20-7b5d299a9bcd

xCAT/postscripts/xcataixpost

@@ -447,6 +447,7 @@ sub  updateflag {
     my $port = "3002";
     my $servip = `host $servnode | awk '{print \$3}'`;
     chomp($servip);
+    $servip =~ s/,$//; # remove trailing comma
     my $remote = IO::Socket::INET->new( Proto => "tcp", PeerAddr  => $servip, PeerPort  => $port, Timeout => 0);
 
     my $try = 10;