Perl中的reset()函数会重置(清除)所有程序包变量,这些程序包变量以传递给它的值指定的字母范围开头。通常,它仅在continue块内或循环结束时使用。
注意:reset()函数的使用仅限于未使用my()函数定义的变量。
用法: reset(letter_range)
参数:
letter_range:以一个公共字符或一组字符开头的一系列字母
返回值:
1,并重置给定范围内的所有变量
示例1:
#!/usr/bin/perl -w
$var1 = 20;
$var2 = 15;
# Values before reset() function call
print "var1 value = $var1, ",
"var2 value = $var2\n";
# Now reset all variables whose
# name starts with 'v'
reset('v');
# Values after reset() function call
print "var1 value = $var1, ",
"var2 value = $var2\n";
输出:
var1 value = 20, var2 value = 15 var1 value = , var2 value =
示例2:
#!/usr/bin/perl -w
$variable1 = 10;
$variable2 = 30;
# defining private variable using my()
my $variable3 = 40;
# Values before reset() function call
print "variable1 value = $variable1, ",
" variable2 value = $variable2\n";
print "variable3 value = $variable3\n";
# Now reset all variables whose
# name starts with 'v'
reset('v');
# Values after reset() function call
print "variable1 value = $variable1, ",
" variable2 value = $variable2, \n";
print "variable3 value = $variable3";
输出:
variable1 value = 10, variable2 value = 30 variable3 value = 40 variable1 value = , variable2 value = , variable3 value = 40
在示例2给出的代码中,变量3是使用my()函数定义的,因此,其值对reset()函数没有影响,而其他变量的值将被重置。
相关用法
- Perl log()用法及代码示例
- Perl chr()用法及代码示例
- Perl tell()用法及代码示例
- Perl oct()用法及代码示例
- Perl abs()用法及代码示例
- Perl exp用法及代码示例
- Perl hex用法及代码示例
- Perl uc()用法及代码示例
- Perl int()用法及代码示例
- Perl ord()用法及代码示例
- Perl cos()用法及代码示例
- Perl sin()用法及代码示例
- Perl each()用法及代码示例
- Perl substr()用法及代码示例
注:本文由纯净天空筛选整理自Code_Mech大神的英文原创作品 Perl | reset() Function。非经特殊声明,原始代码版权归原作者所有,本译文未经允许或授权,请勿转载或复制。