Perlコーディング
サブ関数への参照渡し
2007年12月20日
サブ関数へ引数を参照渡しする方法です。
参照渡しなので、サブ関数で変更を加えると、呼び出し元関数の値も変更されます。
呼び出し元
&subFunction(*hikisuu);
サブ関数
sub subFunction() {
local(*hikisuu) = @_;
}
呼び出し元、サブ関数で変数の前の記号を*にします。
参照渡しなので、サブ関数で変更を加えると、呼び出し元関数の値も変更されます。
呼び出し元
&subFunction(*hikisuu);
サブ関数
sub subFunction() {
local(*hikisuu) = @_;
}
呼び出し元、サブ関数で変数の前の記号を*にします。
コメント