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。