- Perlについての質問箱 64箱目 [転載禁止]©2ch.net
534 ：デフォルトの名無しさん[]：2015/10/14(水) 01:21:43.25 ID:5USmhD5Y - 多分、何をしたいのかもう少し考えた方がいいと思うよ。
考えた上でそのやり方が適していると思うならこんな感じになるだろう。
# グループ $G の関数 $F を呼ぶ
if ( $lastgroup != $G){
group_end( $lastgroup) # もし必要なら
group_begin( $G);
$lastgroup = $G;
}
$F->(); # 実装方法によって呼び出し方は違うだろうね
要するに、どう実現するかという以前に考え方がおかしい。
「使い始める時」に初期化すればいいのであって、
別のグループのことまで考える必要は無いと思うよ。
|
|