DECLARE
   TYPE Test_type IS TABLE OF VARCHAR2 (100);

   Parse_it        Test_type;
   L_comma_index   PLS_INTEGER;
   L_index         PLS_INTEGER := 1;
   String          VARCHAR2 (4000);
BEGIN
  PARSE_IT := TEST_TYPE();
  SELECT A.MYDATA
  INTO STRING
  FROM MY_TEST A;
  
  STRING := REPLACE(STRING,'''');
   LOOP
      L_comma_index := INSTR (String, ',', L_index);
      EXIT WHEN L_comma_index = 0;
      Parse_it.EXTEND;
      Parse_it (Parse_it.COUNT) := SUBSTR (String, L_index, L_comma_index - L_index);
      L_index := L_comma_index + 1;
   END LOOP;

   DBMS_OUTPUT.Put_line ('TABLE LENGTH :' || l_INDEX);
   DBMS_OUTPUT.Put_line ('TABLE COUNT  :' || Parse_it.COUNT);

   FOR I IN 1 .. Parse_it.COUNT
   LOOP
      DBMS_OUTPUT.Put_line (NVL(Parse_it (I),'<null>'));
   END LOOP;
END;
/