fix the issue with XCATHOST=ipv6-lla%eth0:3001 and remote xcatd

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

perl-xCAT/xCAT/Client.pm

@@ -180,7 +180,7 @@ if (ref($request) eq 'HASH') { # the request is an array, not pure XML
     $xcathost=$ENV{XCATHOST};
   }
   my %connargs=();
-  if ($xcathost =~ s/%([^\]]*)//) {
+  if ($xcathost =~ s/%([^\]|:]*)//) {
       $connargs{PeerScope} = $1;
   }
   $connargs{PeerAddr} = $xcathost;