s

perl の our って?

perlのourに関すること - **ourについて

our 宣言した変数は、確かに前の値をずっと保持してます。僕は use vars qw() の代わりに使ってます。perl にビルトインされてるぶんだけ、vars を使うより our のほうが速いんじゃないかな。
our宣言 * カレントパッケージに属するグローバル変数を、パッケージ修飾なしで使えるようにする * our宣言が置かれたブロック、eval、ファイルの末尾まで有効 * use strict 'vars'プラグマと共に使用 use strict 'vars';our $x;$x = 10; # $main::xに10を代入