DECLARE
 TYPE t_tab IS TABLE OF NUMBER INDEX BY BINARY_INTEGER;
 v_bulk      t_tab;
 v_copy      t_tab;

 PROCEDURE p_bulk IS
 BEGIN
    SELECT level BULK COLLECT INTO v_bulk
    FROM  DUAL CONNECT BY level < 11;  
 END p_bulk;

BEGIN
 p_bulk;
 DBMS_OUTPUT.PUT_LINE(' Base Array Size = '||v_bulk.COUNT);

 v_bulk.DELETE(5);
 DBMS_OUTPUT.PUT_LINE(' Base Array Size = '||v_bulk.COUNT);

 FOR idx IN v_bulk.FIRST .. v_bulk.LAST LOOP 
   IF v_bulk.EXISTS(idx) THEN
     SELECT v_bulk(idx) INTO v_copy(idx) FROM DUAL;
   END IF;
 END LOOP;
 DBMS_OUTPUT.PUT_LINE(' Array copy Size = '||v_copy.COUNT);
END;
/
Ref. -> Output