Perl reset()函数

perl reset()函数例子，reset()函数实例代码 - 复位（清除）所有包变量指定EXPR的字母范围开始。

语法

reset EXPR reset

定义和用法

复位（清除）所有包变量指定EXPR的字母范围开始。 一般只用于continue块内的，或在一个循环结束。

使用my() 中声明的变量，函数将不会被重置。 

使用reset()可以重新设置系统变量，你可能不希望改变喜欢ARGV和ENV变量。

返回值

• 始终为 1 

例子

试试下面的例子：

#!/usr/bin/perl -w

my $var = 10;
$van = 5;

print "Var value =$var, Van value =$van\n";
# Now reste all variables who name starts with 'v'
reset('v');
print "Var value =$var, Van value =$van\n";

这将产生以下结果：

Var value =10, Van value =5
Var value =10, Van value =