Regexp_replace doesn't replace anymore

Question

HI all,
I recently had to downgrade my database version from 10.2.0.3 TO 10.2.0.1 (see below for details).
Since this changement, a call to regexp_replace doesn't work anymore.
Here is a sample code :
DECLARE
ctx dbms_xmlgen.ctxHandle;
xml CLOB;
req varchar2(4000);
BEGIN
req := 'SELECT table_name FROM user_tables';
ctx:=dbms_xmlgen.newcontext(req);
dbms_xmlgen.setnullhandling(ctx, dbms_xmlgen.EMPTY_TAG);
xml := dbms_xmlgen.getxml(ctx);
IF dbms_xmlgen.GETNUMROWSPROCESSED (ctx) = 0 THEN
xml := '<?xml version="1.0" encoding="ISO-8859-1"?>';
xml := xml || '<ROWSET/>';
ELSE
xml := regexp_replace( xml, '^<\?xml(.+?)\?>', '<?xml\1 encoding="ISO-8859-1"?>');-- Call that does'nt work
END IF;
dbms_xmlgen.closeContext(ctx);
dbms_output.put_line('* AFTER *' || xml);
dbms_xmlgen.closeContext(ctx);
END;
/The output xml is blank ('* AFTER *' || xml) whereas in last version it was not.
I can't find any relation between regexp_replace and Oracle 10.2.0.3.
TIA
Stephan
LAST version
Oracle Database 10g Enterprise Edition Release 10.2.0.3.0 - 64bi
PL/SQL Release 10.2.0.3.0 - Production
"CORE     10.2.0.3.0     Production"
TNS for Linux: Version 10.2.0.3.0 - Production
NLSRTL Version 10.2.0.3.0 - ProductionNEW version
Oracle Database 10g Enterprise Edition Release 10.2.0.1.0 - Prod
PL/SQL Release 10.2.0.1.0 - Production
"CORE     10.2.0.1.0     Production"
TNS for Linux: Version 10.2.0.1.0 - Production
NLSRTL Version 10.2.0.1.0 - Production

Answer 1

Test 1
select regexp_replace( '<?xml version="1.0"?>' , '^<\?xml(.+?)\?>', '<?xml\1 encoding="ISO-8859-1"?>') from dual;OUTPUT
REGEXP_REPLACE('<?XMLVERSION="1.0"?>','^<\?XML(.+?)\?>','<?XML\1ENCODING="ISO-8859-1"?>')
<?xml version="1.0" encoding="ISO-8859-1"?>
1 rows selected-------------------------------------------------
Test 2
/* and do the same with the previous :xml variable */
var x clob;
exec :xml := '<?xml version="1.0"?>';
select regexp_replace( :xml , '^<\?xml(.+?)\?>', '<?xml\1 encoding="ISO-8859-1"?>') from dual;OUTPUT
anonymous block completed
REGEXP_REPLACE(:XML,'^<\?XML(.+?)\?>','<?XML\1ENCODING="ISO8859-1"?>')
(CLOB) (CLOB) <?xml version="1.0"?>
1 rows selectedStrange... isn't it ?
Test 3
set role NONE
(...) OUTPUT
set role réussi.
anonymous block completed
* in between *<?xml version="1.0"?>
<ROWSET>
<ROW>
<TABLE_NAME>N43005</TABLE_NAME>
</ROW>
<ROW>
<TABLE_NAME>N43010</TABLE_NAME>
</ROW>
<ROW>
<TABLE_NAME>N43011</TABLE_NAME>
</ROW>
<ROW>
<TABLE_NAME>N
* AFTER *
Nothing after "* AFTER *".