2009-05-29から1日間の記事一覧

HTTP::Engine::Middleware::Staticで静的ファイルを扱う

開発用途にどうぞ。 #!/usr/bin/env perl use HTTP::Engine; use HTTP::Engine::Middleware; main(); sub main { my $engine = setup_engine(); $engine->run(); } sub setup_engine { return HTTP::Engine->new( interface => { module => 'ServerSimpl…