package nginx_test; use nginx; my $page = <<'HTML';
HTML sub handle_request_body{ my $r = shift; my $text = $r->request_body(); $r->send_http_header( 'text/plain' ); $r->print( $text ); return OK; } sub handler{ my $r = shift; if( $r->request_method eq 'POST' ){ my $x = 'nginx_test::handle_request_body'; if( $r->has_request_body( 'nginx_test::handle_request_body' ) ){ return OK; } } else { $r->send_http_header( 'text/html' ); $r->print( $page ); return OK; } return HTTP_NOT_FOUND; } 1;