Extracting file from blob and storing in file system

Question

In order to keep the database size down, I would like to run a program to execute on submit of a page containing a file upload control, which will extract the file from the blob in the db and store it in the operating system.
Any suggestions on how I can accomplish this?

Answer 1

I use something like this
  procedure blob2file
    ( p_blob blob
    , p_directory varchar2 := 'MY_DIR'
    , p_filename varchar2 := 'my.xlsx'
  is
    t_fh utl_file.file_type;
    t_len pls_integer := 32767;
  begin
    t_fh := utl_file.fopen( p_directory
                          , p_filename
                          , 'wb'
    for i in 0 .. trunc(  ( dbms_lob.getlength( p_blob ) - 1 ) / t_len )
    loop
      utl_file.put_raw( t_fh
                      , dbms_lob.substr( p_blob
                                       , t_len
                                       , i * t_len + 1
    end loop;
    utl_file.fclose( t_fh );
  end;Anton