通过Perl中的state()状态变量
Perl中还有另一种词法变量，它类似于私有变量，但是它们保持其状态，并且在多次调用子例程时不会重新初始化它们。这些变量是使用状态运算符定义的，并且从Perl5.9.4开始可用。
示例
让我们检查以下示例以演示状态变量的使用-
#!/usr/bin/perl
use feature 'state';
sub PrintCount {
state $count = 0; # initial value
print "Value of counter is $count\n";
$count++;
}
for (1..5) {
PrintCount();
}输出结果
执行以上程序后，将产生以下结果-
Value of counter is 0 Value of counter is 1 Value of counter is 2 Value of counter is 3 Value of counter is 4
在Perl5.10之前，您必须像这样编写它-
示例
#!/usr/bin/perl
{
my $count = 0; # initial value
sub PrintCount {
print "Value of counter is $count\n";
$count++;
}
}
for (1..5) {
PrintCount();
}热门推荐
10 简短中秋祝福语朋友结婚
11 撩妹生日祝福语简短
12 祝贺新店开业祝福语简短
13 生日祝福语舅舅 简短独特
14 红包祝福语简短网名
15 收围巾的祝福语简短
16 恩师退休花束祝福语简短
17 新年送老师简短祝福语
18 恭喜新郎父母简短祝福语