[Dart] documentation patch: how to submit results from Perl

[Ken Cox]

The attached patch documents as succinctly as I could, how to submit  
results to a Dart server from Perl using XMLRPC::Lite.

Regards,
Ken Cox
Vivox, Inc.
-------------- next part --------------
Index: Dart.tex
===================================================================
--- Dart.tex	(revision 421)
+++ Dart.tex	(working copy)
@@ -2207,6 +2207,27 @@
       print "Problem submitting XML-RPC for the file: %s" % xmlfile
 \end{verbatim}
 
+\section{Perl Submissions}
+Perl may also be used to submit Dart XML, as shown in the following
+snippit:
+
+\begin{verbatim}
+   use XMLRPC::Lite;
+   my $xml = slurp($dart_xml_file);
+   my $bindata = SOAP::Data->type(base64 => $xml);
+   my $url = "http://dartboard:8081/$project/Command/";
+   print "Sending results to $url...";
+   my $call = XMLRPC::Lite->proxy($url)->call('Submit.put',$bindata);
+   my $result = $call->result();
+   if ($call->fault()) {
+     print "\nERROR: ", $call->faultstring();
+   } elsif ($result ne '1') {
+     print "\nERROR: unexpected result \"$result\" (expected \"1\")\n";
+   } else {
+     print "ok\n";
+   }
+\end{verbatim}
+
 \section{DartClient.jar}
 DartClient.jar can used to submit proper  Dart XML files to a Dart server.  DartClient.jar will package the specified XML file into an xmlrpc message and transmit the message to the Dart server.
 To submit an XML file called Results.xml to the project TestProject