Perl reset 函数
描述
此函数重置(清除)以 EXPR 指定的字母范围开头的所有包变量。 通常仅在 continue 块内或循环结束时使用。 如果省略,则重置 ?PATTERN? 匹配。
已使用 my() 函数声明的变量不会被重置。
使用 reset() 可以重置您可能不想更改的系统变量,例如 ARGV 和 ENV 变量。
语法
以下是此函数的简单语法 −
reset EXPR reset
返回值
此函数返回 1。
示例
以下是显示其基本用法的示例代码 −
#!/usr/bin/perl -w my $var = 10; $van = 5; print "Var value = $var, Van value =$van\n"; # Now reset 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 =