Remove carriage returns from a text file

DECLARE
    c_chunk_size CONSTANT INTEGER := 10;
    v_xml        VARCHAR2(32767) := '<one><two><three>3</three><four>4</four></two></one>';
    v_index      INTEGER := 1;
    v_chunk      VARCHAR2(32767);
    v_endtag     INTEGER;
BEGIN
    WHILE v_index <= LENGTH(v_xml)
    LOOP
        v_chunk := SUBSTR(v_xml, v_index, c_chunk_size);
        v_endtag := INSTR(v_chunk, '>', -1);
 
        IF v_endtag > 0
        THEN
            DBMS_OUTPUT.put_line(SUBSTR(v_chunk, 1, v_endtag));
        END IF;
 
        DBMS_OUTPUT.put(SUBSTR(v_chunk, v_endtag + 1));
        v_index := v_index + c_chunk_size;
    END LOOP;
END;

                                              

1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:
19:
20:
21:

CREATE OR REPLACE AND RESOLVE JAVA SOURCE NAMED CLOBIO AS
import java.sql.*;
import java.io.*;
import java.util.*;
import oracle.sql.*;
 
public class ClobIO{
    public static String writefile(CLOB p_clob, String p_filename) {
        try {
            File             v_file = new File(p_filename);
            FileOutputStream v_out  = new FileOutputStream(v_file);
            InputStream      v_in   = p_clob.getAsciiStream();
 
            int    v_buffersize = p_clob.getBufferSize();
            byte[] v_buffer = new byte[v_buffersize];
            int    v_length = -1;
 
            while ((v_length = v_in.read(v_buffer)) != -1) {
                v_out.write(v_buffer, 0, v_length);
                v_out.flush();
            }
 
            v_in.close();
            v_out.close();
            
            return "";
        }
        catch (Exception excp) {
            System.out.println("----------------------------------------------------------------------------------");
            System.out.println("ERROR ClobIO.writefile(" + p_filename + ")");
            excp.printStackTrace();
            System.out.println("----------------------------------------------------------------------------------");
            return excp.toString();
        }
    }  
}
/
 
 
CREATE OR REPLACE FUNCTION clob2file(p_clob IN CLOB, p_filename IN VARCHAR2)
    RETURN VARCHAR2
AS
    LANGUAGE JAVA
    NAME 'ClobIO.writefile(oracle.sql.CLOB, java.lang.String) return java.lang.String';
/
                                              

1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:
19:
20:
21:
22:
23:
24:
25:
26:
27:
28:
29:
30:
31:
32:
33:
34:
35:
36:
37:
38:
39:
40:
41:
42:
43:
44:
45: