CGI::Upload
CGI::Simpleとの組み合わせで、upload file 管理をサポートする
CGIとの組み合わせでも動作するが、確認した限りではアップロードファイルが1つの場合しか正しく動作しない。
使い方:
use CGI::Simple;
use CGI::Upload;
// CGIオブジェクトを生成する。
my $cgi =
CGI::Simple->new( );
// CGI::Uploadオブジェクトを生成する。
my $upload = CGI::Upload->new({ query => $cgi });
// ファイル名を取得する。
// ここで取得される名前は、フォームに入力された名前で、
// サーバ上のテンポラリファイルの名前ではない。
my
$filename =
$upload->file_name($field);
// ファイルの拡張子を取得する。
// $fieldは、フォーム上のファイルフィードの名前。
my $extent =
$upload->file_type($field);
// MIMEタイプを取得する。
my $mime = $upload->mime_type($field);
//
サーバに格納されたのテンポラリファイルをオープンしてファイルハンドルを取得する。
my $fh = $upload->file_handle($field);