[PerlChina] Re: static local var

例子：
BEGIN {
my $count = 0;
sub counter { $count++ }
}

my $start = counter();

.... # code that calls counter();

my $end = counter();

$count就起到一个静态变量的作用。

On 3月11日, 上午10时39分, yi wang <wangyi2...@gmail.com> wrote:
> 大家好！ 我对perl不太熟悉。请问个问题。perl中相当于在c的函数中局部静态变量（static ）应该如何实现？多谢！
>
> best
--~--~---------~--~----~------------~-------~--~----~
您收到此信息是由于您订阅了 Google 论坛"PerlChina Mongers 讨论组"论坛。
要在此论坛发帖，请发电子邮件到 perlchina@googlegroups.com
要退订此论坛，请发邮件至 perlchina+unsubscribe@googlegroups.com
更多选项，请通过 http://groups.google.com/group/perlchina?hl=zh-CN 访问该论坛
-~----------~----~----~----~------~----~------~--~---