Perl でファイルアップロードさせる方法
Perl の CGI でフォームからアップロードされたファイルを受取り、サーバマシン上に保存する方法を解説します。 ファイルアップロードができるCGIプログラムを探しているという方はこちらをどうぞ 「すぐ使えるCMS」 使用する Perl モジュール CGI File::Basename 処理のポイント むやみやたらとファイルを受け付けると、大量/大容量ファイルの処理でサーバ機能が停止してしまう可能性があるので、受付できるファイルの容量制限をします。 危険なファイル、意図しないファイルをアップロードされないよう、ファイルの種類の制限を行います。 同じ名前のファイルを送信された場合でも旧いファイルを上書きすることの無いように、ファイルごとに一意な（サーバマシン上の）ファイルパスを設定します。 ファイルアップロード用 送信元フォーム 以下が、ファイルアップロード用の送信元フォームのHTMLファ
Perlでファイルアップロード - 足跡
Perlでアップロードファイルを受け取る時の最小よりちょっと色々おまけが付いてるコード。 post.cgi UTF-8で記述。 #!/usr/bin/perl -w use strict; use warnings; use utf8; use CGI; use File::Copy; use File::Basename; &main(); sub main{ # CGIオブジェクト my $cgi = new CGI; # アップロードディレクトリ my $updir = './upload'; # アップロードファイルのハンドル my $fh = $cgi->upload('filename'); # 一時ファイルの場所 my $tmpPath = $cgi->tmpFileName($fh); # オリジナルのファイル名 my $filename = File::Basename:
リリース、障害情報などのサービスのお知らせ
最新の人気エントリーの配信
処理を実行中です
j次のブックマーク
k前のブックマーク
lあとで読む
eコメント一覧を開く
oページを開く
http://www.hidekik.com/cookbook/p2h.cgi?id=upload
ミスティーネットPerl･CGI講座 ― MISTY-NET ―
