■

選択肢部分が難航中。オリジナルのスクリプトだと

@select 選択肢のテキスト1,ジャンプ先ラベル名
@select 選択肢のテキスト2,ジャンプ先ラベル名
@selectwait

といった感じで書かれているんですが、これをどうNスクのスクリプトにするか悩み中。@select以下のパラメーターを配列に貯めておいて、@selectwaitがあったら書き出すとか考えたんですが、Perlで複数行にまたがった場合の処理がわからず。いまのままだと一行ずつ読み出しているのでこのままでは無理っぽ？最悪、@select以下全部でマッチさせて置換するとかアレな解決法かなあ(w
先生、なにか方法はないでしょうか？