0

ダウンロード HTTP サーバーをセットアップする必要があります。Apache をインストールしたくありません。

HTTP::Server::Simpleをダウンロード http サーバーとして使用できますか? サンプルコードを教えてください。

または、ダウンロード HTTP サーバーを迅速かつ簡単にセットアップするのに役立つ他の CPAN モジュールはありますか?

sub download {
 my $cgi  = shift;   # CGI.pm object
 return if !ref $cgi;

 my $file = $cgi->param('file'); #file=test.tar.gz
 $file="/var/download/$file";    #file=/var/download/test.tar.gz 

 # send this file
}
4

3 に答える 3

4

プラックでのムゲンケンイチの答えと同じ：

plackup -MPlack::App::Directory -e'Plack::App::Directory->new({ root => "." })->to_app'

これはすでに David-SkyMesh がコメントしたことを処理しており、コマンドラインから Authn/Authz を簡単に混在させることができます。を追加することで、インターネットに面するのに適した堅牢な事前分岐サーバーを切り替えることができます-s Starman。

于 2012-04-09T09:27:00.350 に答える
2

App::HTTPThisも使用できます。インストール後:

http_this dir_name

おそらく、これほど簡単なことはありません。実際、エクスポートしたいディレクトリに既にいる場合は、dir_name 引数をスキップできます。

于 2012-04-09T15:34:57.413 に答える
-1

As stated in the comments this is no trivial problem. However, if i need a quick and simple server to provide files I usualy do

python -m SimpleHTTPServer

in the directory I want to serve. It starts a webserver at 0.0.0.0:8000 and you can point your browser there to download the files.

I do not know if a similar one line solution exists for perl but I guess it does not get any more simple than that.

于 2012-04-09T08:01:50.980 に答える