Una funzionalita' molto comune nei siti web e' quella di effettuare l'upload di file. Come riporta l'ampia documentazione Oracle vi sono diversi modi di farlo con il PL/SQL (eg. File Upload and Download in Oracle 9iAS 9.0.2.X and 10g AS - 281249.1) o con un servlet... Un semplice esempio in Perl che funziona con OAS e' il seguente: $ORACLE_HOME/Apache/Apache/htdocs/prova.htm
$ORACLE_HOME/Apache/Apache/cgi-bin/prova.pl #!/usr/bin/perl -w use CGI; $upload_dir = "/oracle/mid10g/Apache/Apache/htdocs/upload"; $query = new CGI; $filename = $query->param("nomefile"); $email_address = $query->param("email_address"); $filename =~ s/.*[\/\\](.*)/$1/; $upload_filehandle = $query->upload("nomefile"); open UPLOADFILE, ">$upload_dir/$filename"; binmode UPLOADFILE; while ( <$upload_filehandle> ) { print UPLOADFILE; } close UPLOADFILE; print $query->header ( ); print <Your email address: $email_address
Your file: