I have a procedure:
CREATE OR REPLACE PROCEDURE test_xml (o_xml OUT CLOB) IS
v_kontekst DBMS_XMLQUERY.CTXTYPE;
v_errno NUMBER;
v_errmsg VARCHAR2(1000);
v_query VARCHAR2(200);
v_size BINARY_INTEGER := 5000;
pos INTEGER := 1;
BEGIN
v_query := 'select * from my_table';
v_kontekst := DBMS_XMLQUERY.NEWCONTEXT(v_query);
o_xml := DBMS_XMLQuery.GetXML(v_kontekst);
DBMS_XMLQuery.CloseContext(v_kontekst);
END test_xml;

How does one go about getting the contents of o_xml in PERL (DBI)?

Thanks,
-Jason Martin