Perl-reset
提供:Dev Guides
Perlリセット関数
説明
この関数は、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 =