1

Mojolicious Liteを使用してPerlでオプションとしてPOSTパラメータを示す方法はありますか? たとえばparam2、リクエスト本文で定義されていない場合、サーバーが 404 を返さないようにする方法はありますか?

post "/my_post" => \&render(post_callback);

sub post_callback {
    my ($mojo) = @_;
    my $param1 = $mojo->param("param1");
    my $param2 = $mojo->param("param2");
}
4

2 に答える 2

1

私の問題は、どのように mojolicious がコールバックにルーティングされているかを誤解していたことです。次のコードは、両方のパラメーターがオプションの場合に機能します。

#!/usr/bin/env perl
use strict;
use warnings;
use Mojolicious::Lite;

post '/' => sub {
    my ($mojo) = @_;
    my $param1 = $mojo->param("param1");
    my $param2 = $mojo->param("param2");
    $mojo->render(text => "param1: $param1, param2: $param2");
};

app->start;

以下を使用してこれを実行する./my_server.pl daemonと、パラメータを任意に組み合わせて POST リクエストを送信できます。

于 2015-07-06T13:19:26.180 に答える