UDDI::Lite Problem

subaqua2002 has asked for the wisdom of the Perl Monks concerning the following question:

We (as in a small project group at work) are setting up some simple web services. We'd like to use a private UDDI service to 'locate' the services. We're using jUDDI. jUDDI appears to be happy. My current tasklet is to talk to jUDDI in Perl.
I tried:

#!/usr/bin/perl

use UDDI::Lite;

$uddi = new UDDI::Lite
        on_debug => sub {print @_},
        proxy => 'http://<jUDDI server:port>/juddi/inquiry';

print $uddi 
  -> find_business(name => 'old')
  -> result;
[download]

jUDDI just complains that I'm using the wrong UDDI API. It expects V2, but (as far as I can tell), UDDI::Lite is using V1. I know there is a pragma that is supposed to get UDDI::Lite to work with version 2:
use UDDI::Lite uddiversion => 2;
But that gives me the error:
Element '2' can't be allowed in valid XML message. Died
What am I doing wrong? I can't find any documentation to even hint at an answer...any help would be greatly appreciated.

Comment on UDDI::Lite Problem Select or Download Code

Replies are listed 'Best First'.
Re: UDDI::Lite Problem by gellyfish (Monsignor) on Jun 22, 2005 at 21:19 UTC
A quick scan of the code would indicate that you can do: `$uddi->uddiversion(2);` [download] before you do anything else with it but I can't test that assertion properly at the moment. /J\	[reply] [d/l]
Re^2: UDDI::Lite Problem by subaqua2002 (Initiate) on Jun 24, 2005 at 21:15 UTC
No dice. Just tested that. Got the exact same message: `Element '2' can't be allowed in valid XML message. Died` Argh!	[reply] [d/l]