2009-02-06 1 views
2

다음 코드는 Perl에서 어떻게 구현됩니까?Perl Catalyst 작업은 어떻게 구현됩니까?


sub add_item : Local { 
    my ($self, $c) = @_; 

    my $item_id = $c->req->param("item"); 

    push @{ $c->session->{items} }, $item_id; 

    } 

은 내가 add_item에 관심이 로컬 부분, 내가 생각하지 않는 원인 사람들은 펄 키워드입니다.

답변