2

下面的代码是如何在 Perl 中实现的?


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

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

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

  }

我对add_item : Local部分感兴趣,因为我认为这些不是 Perl 关键字。

4

1 回答 1

9

它们是属性。请参阅属性文档,以及通过 my() 的私有变量perlsub中的子例程属性

于 2009-02-06T23:17:28.070 回答