Changeset 17573 for lang/perl

Timestamp:

08/13/08 16:06:43 (5 years ago)

Author:

yappo

Message:

wrote pod

Files:

• lang/perl/HTTP-Engine-Compat/trunk/lib/HTTP/Engine/Compat.pm (modified) (2 diffs)

lang/perl/HTTP-Engine-Compat/trunk/lib/HTTP/Engine/Compat.pm

@@ -1 +1 @@
 package HTTP::Engine::Compat;
 use Moose;
-use 5.00800;
 our $VERSION = '0.01';
 
-extends 'HTTP::Engine';
+#extends 'HTTP::Engine';
 use HTTP::Engine;
 use HTTP::Engine::RequestProcessor;
@@ -161 +160 @@
 =encoding utf8
 
+=for stopwords middlewares Middleware middleware nothingmuch kan
+
 =head1 NAME
 
-HTTP::Engine::Compat -
+HTTP::Engine::Compat - version 0.0.12 Compatibility layer of HTTP::Engine
 
 =head1 SYNOPSIS
 
   use HTTP::Engine::Compat;
+  my $engine = HTTP::Engine->new(
+      interface => {
+          module => 'ServerSimple',
+          args   => {
+              host => 'localhost',
+              port =>  1978,
+          },
+          request_handler => 'main::handle_request',# or CODE ref
+      },
+  );
+  $engine->run;
+
+  use Data::Dumper;
+  sub handle_request {
+      my $c = shift;
+      $c->res->body( Dumper($c->req) );
+  }
 
 =head1 DESCRIPTION
 
-HTTP::Engine::Compat is
+HTTP::Engine::Compat is version 0.0.12 Compatibility layer of HTTP::Engine.
+
+The element of Context and Middleware are added to HTTP::Engine.
+
+=head1 MIDDLEWARES
+
+For all non-core middlewares (consult #codrepos@freenode first), use the HTTPEx::
+namespace. For example, if you have a plugin module named "HTTPEx::Middleware::Foo",
+you could load it as
+
+  use HTTP::Engine::Compat middlewares => [ qw( +HTTPEx::Plugin::Foo ) ];
+
+=head1 METHODS
+
+=over 4
+
+=item HTTP::Engine::Compat->load_middleware(middleware)
+
+=item HTTP::Engine::Compat->load_middlewares(qw/ middleware middleware /)
+
+Loads the given middleware into the HTTP::Engine.
+
+=back
 
 =head1 AUTHOR
 
 Tokuhiro Matsuno E<lt>tokuhirom@gmail.comE<gt>
+
+Kazuhiro Osawa
 
 =head1 SEE ALSO