Mojolicious：无法在未定义的值上调用方法“渲染”

Question

我收到此错误，无法理解为什么会发生这种情况。当我跳到另一个子程序时会发生这种情况。也许我需要了解一下Mojolicious为什么发生这种情况。

这里是我的程序的源代码：

#!/usr/bin/perl 

use Mojolicious::Lite; 

get '/' => sub { &start_home; }; 

app->start; 

sub start_home { 
    my $d = shift; 
    my $something = $d->param('something'); 
    ### Do things with $something.... etc.. etc.. 
    &go_somewhere_else; ### Go somewhere else 
} 

sub go_somewhere_else { 
my $c = shift; 
$c->render(text => "Hello World!"); 
### End of program 
} 

我在传递一个值来渲染，有一个价值 - 它为什么会说这是不确定的？我的理解是，只有在跳转到子例程并尝试渲染输出时才会发生这种情况。

我的操作系统是Windows，我正在使用Strawberry Perl。

Answer 1

您需要将上下文对象$c/$d传递给第二个函数。 未定义的值是您的$c的go_somewhere_else，因为您在没有参数的情况下调用它。

最初，为了使其工作，请执行此操作。

sub start_home { 
    my $d = shift; 
    my $something = $d->param('something'); 

    go_somewhere_else($d); 
} 

您现在已经传递上下文，你叫$d（这不是常规的名称），其他功能，并警告将消失。

这是因为形式&subname;没有括号()使得@_（这就是函数的自变量列表）可用的go_somewhere_else里面，而是因为你shift版$d关闭，@_现在是空的，因此你$c内go_somewhere_else是undef 。

或者，您也可以将shift更改为@_。但请，不要那样做！

sub start_home { 
    my ($d) = @_; 
    my $something = $d->param('something'); 

    &go_somewhere_else; 
} 

---

还有更多的事情奇怪，几乎错在这里的地步。

get '/' => sub { &start_home; }; 

您是currying的的start_home功能，但你实际上并没有增加其他参数。我上面解释了为什么这个工作。但这并不好。事实上，这是令人困惑和复杂的。

相反，您应该为路线使用代码参考。

get '/' => \&start_home; 

里面的start_home，你应该打电话给你的上下文$c因为是惯例。您也不应使用符号&表示法来调用函数。这改变了你绝对不想要的方式。

sub start_home { 
    my $c = shift; 
    my $something = $c->param('something'); 

    # ... 
    go_somewhere_else($c); 
} 

要了解更多关于函数调用如何在Perl中工作的信息，请参考perlsub。