Mojolicious :: Liteを使用してルータ間で値を渡す

Question

ajax形式からこのルータのfoundnameが呼び出されると、値を処理して別のルータに渡す必要があります。ここに私が試している方法のサンプルがあります：

#!/usr/bin/perl 

use Mojolicious::Lite; 

get '/foundname' => sub { 

    my $c = shift; 
    # Here I get the value from the form 
    my $name_on = $c->req->query_params->param('name'); 

    if($name_on) { 
    # call another router and pass the name value to it 
    # It gives an error "Can't locate object method "get" ", I might not need to use "get", just don't know how to pass the value. 
    $c->get('/process_name')->to(searched => $name_on); 
    } 

}; 

get '/process_name' => sub { 

    my $c = shift; 
    my $got_name = $c->req->query_params->param('searched'); 
    ... 
}; 

ありがとう！

Answer 1

あなたのappの中にあるMojolicious::Routesオブジェクトを通してルートをルックアップする必要があります。 lookupの名前は、Mojolicious :: LiteによってURIのパス部分から自動生成されるため、/process_nameの名前はprocess_nameです。

Mojolicious::Routes::Routeにはrenderというメソッドがあり、そこにパラメータを渡すことができます。

use Mojolicious::Lite; 

get '/foundname' => sub { 
    my $c = shift; 

    my $name_on = $c->req->query_params->param('name'); 

    if($name_on) { 
     my $process_name = app->routes->lookup('process_name')->render({ searched => $name_on }); 
     $c->render(text => $process_name); 
    } 
}; 

get '/process_name' => sub { 
    my $c = shift; 
    my $got_name = $c->req->query_params->param('searched'); 

    $c->render(text => $got_name); 
}; 

app->start; 

これをカールすると、応答としてパラメータが返されます。

$ curl localhost:3000/foundname?name=foo 
/process_name 

---

しかし、これはおそらく正しいアプローチではありません。ビジネスロジックを実装する場合は、内部または隠れたルートを使用しないでください。あなたのアプリケーションはまだPerlだけであることを忘れないでください。 subと書くことができます。あなたは簡単にこれらの機能をユニット・テストすることができるよう

use Mojolicious::Lite; 

get '/foundname' => sub { 
    my $c = shift; 

    my $name_on = $c->req->query_params->param('name'); 

    if($name_on) { 
     my $got_name = process_name($name_on); 
     $c->render(text => $got_name); 
    } 
}; 

sub process_name { 
    my ($got_name) = @_; 

    # do stuff with $got_name 

    return uc $got_name; 
}; 

app->start; 

この意志出力

$ curl localhost:3000/foundname?name=foo 
FOO 

それは、よりポータブルなアプローチです。 $cが必要な場合は、それを渡す必要があります。また、定義したsubにはappというキーワードがあります。元の質問については

Answer 2

、私は上の変数を渡すの詳細については、この質問を参照してください

$c->redirect_to() 

を使用します。 Passing arguments to redirect_to in mojolicious and using them in the target controller

======

しかし、私は希望（他の人が言っているように）より多くを書いてください。 既存のロジックがある場合は、ヘルパーでラップしたり、ロジックをヘルパーに入れて呼び出すことができます。

helper('process_name'=> sub{ 
    my $self,$args = @_; 

    # Do some logic with $args->{'name'} 
    return $something; 
}); 

get '/foundname' => sub { 
    my $c = shift; 

    my $name_on = $c->req->query_params->param('name'); 

    if($name_on) { 
     my $process_name = $c->process_name({name => $name_on}); 
     $c->render(text => $process_name); 
    }else{ 
     $c->redner(text => 'Error',status=>500); 
    } 
};