open MYPIPE, "-|", "$UNID_CLIC $Host $Port $Base $User $Passwd $Query"
  or ($RSLT = "Can't pop: $!");
  while (<MYPIPE>) { $RSLT .= decode utf8=>$_; }
close MYPIPE;
my @rslt = split /$RES_STX/, $RSLT;