create table A
(
  sno    VARCHAR2(30),
  name   VARCHAR2(30),
  mark   VARCHAR2(30),
  result VARCHAR2(1),
  dept   VARCHAR2(5),
  year   VARCHAR2(30)
); 

create or replace procedure read_file is 
f_line varchar2(2000); 
f utl_file.file_type; 
f_dir varchar2(250); 
fname varchar2(50); 
Pipe1 varchar(10); 
Pipe2 varchar(10); 
Pipe3 varchar(10); 
Pipe4 varchar(10); 
Pipe5 varchar(10); 
f_sno a.sno%type; 
f_sname a.name%type; 
f_mark a.mark%type; 
f_result a.result%type; 
f_dept a.dept%type; 
f_year a.year%type; 
begin  
f := utl_file.fopen('UTL_FILE_DIR','student.txt','r'); 
loop 
begin 
utl_file.get_line(f,f_line); 
exception when no_data_found then 
exit; 
end;  
Pipe1 := INSTR(f_line, '|' ,1 , 1); 
Pipe2 := INSTR(f_line, '|' ,1 , 2); 
Pipe3 := INSTR(f_line, '|' ,1 , 3); 
Pipe4 := INSTR(f_line, '|' ,1 , 4); 
Pipe5 := INSTR(f_line, '|' ,1 , 5); 
f_sno := SUBSTR(f_line, 1, Pipe1-1); 
f_sname := SUBSTR(f_line, Pipe1+1, Pipe2-Pipe1-1); 
f_mark := SUBSTR(f_line, Pipe2+1, Pipe3-Pipe2-1); 
f_result := SUBSTR(f_line, Pipe3+1, Pipe4-Pipe3-1); 
f_dept := SUBSTR(f_line, Pipe4+1, Pipe5-Pipe4-1); 
f_year := SUBSTR(f_line, Pipe5+1); dbms_output.put_line(f_sno ||' '|| f_sname || ' ' || f_mark || ' ' || f_result ||' ' || f_dept||' '|| f_year); 
insert into a VALUES (f_sno,f_sname,f_mark,f_result,f_dept,f_year); 
end loop; 
utl_file.fclose(f); 
commit; 
end;  

begin
  read_file();
end; 

Select * from a;

INSERT
  INTO A
  SELECT  *
    FROM  EXTERNAL_TBL
/