set serveroutput on;
declare
 t clob;
 buffer varchar2(1000);
 amount integer:=1000;
 tempbuffer varchar2(200);
begin
select dbms_metadata.get_ddl('TABLE','TEST') into t from dual;
dbms_lob.read(t,amount,1,buffer);
while length(buffer)>0 loop
      tempbuffer:=substr(buffer,1,200);
      buffer:=substr(buffer,201);
      dbms_output.put_line(tempbuffer);
end loop;
end;