diff options
-rwxr-xr-x | server/client.perl | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/server/client.perl b/server/client.perl index 14b6a26b1..eca5e388f 100755 --- a/server/client.perl +++ b/server/client.perl @@ -1,7 +1,8 @@ #!/usr/bin/env perl # -# Sample client for mosesserver, illustrating allignment info +# Sample client for mosesserver, illustrating allignment info and +# report all factors # use Encode; @@ -16,7 +17,7 @@ $text = "il a souhaité que la présidence trace à nice le chemin pour l' aveni # Work-around for XMLRPC::Lite bug $encoded = SOAP::Data->type(string => Encode::encode("utf8",$text)); -my %param = ("text" => $encoded, "align" => "true"); +my %param = ("text" => $encoded, "align" => "true", "report-all-factors" => "true"); $result = $proxy->call("translate",\%param)->result; print $result->{'text'} . "\n"; if ($result->{'align'}) { |