Perl で書かれた小さくてシンプルなアップローダー CGI「ssuploader」を coderepos で公開しました。

- ssuploader.cgi
http://coderepos.org/share/browser/lang/perl/misc/ssuploader.cgi

実際に設置するとこんな感じになります。


とはいえ、このCGIはまだ書きかけです。
サーバへのファイル書き込みがオールドタイプ＆セキュアじゃない(-T オプションが通らない)、などいくつか問題があります(※)。
気が向いたら誰か適当に直してくださいませ。
まあ、今の時代「シンプルな」アップローダーなんてそもそもセキュリティ的にありえないので、イントラネットやベーシック認証内などでのみ使うのが吉。

なお、これは昔書いた「簡単なファイルアップロード CGI の雛型」(http://ta2o.net/tools/ssupload/) をリバイズしたものです。
コードについては「無償・無保証・著作権放棄」を宣言しておきます。

＃「Coderepos Conference 1」なるものが開催されていたので記念アップ。

追記080812: (※)修正してアップしました！→[2008-08-12-1]