declare
	loc_para wrap.paragraph_tabletype;
	loc_lines integer;
	loc_text varchar2 (2000) := 'This is a very long line of text which we will wrap to smaller lines';
	loc_line_length integer := 6;
begin
	dbms_output.put_line('====================');
	dbms_output.put_line(loc_text);
	dbms_output.put_line(RPAD('1',length(loc_text),'2345678901'));
	dbms_output.put_line('Wrapping to: '||to_char(loc_line_length)||' characters.');
	dbms_output.put_line('====================');
	wrap.to_paragraph(loc_text, loc_line_length, loc_para, loc_lines);
	dbms_output.put_line('====================');
end;
/