Permalink
Browse files

Serialize request body.

  • Loading branch information...
pangyre committed Aug 16, 2011
1 parent c94066e commit d85610094b51a722befe579cd95f25394a3bcb79
Showing with 3 additions and 0 deletions.
  1. +3 −0 bin/echo.psgi
View
@@ -6,6 +6,9 @@ use Data::Dump;
sub {
my $req = Plack::Request->new(shift);
my $body = Data::Dump::dump($req);
+ $body .= "\n\n-- \n" . $req->content . "\n"
+ if $req->content;
+
return [ 200,
[ "Content-Type" => "text/plain; charset=utf-8",
"Content-Length" => length($body), ],

0 comments on commit d856100

Please sign in to comment.