Perlコーディング初心 ..
[
2ch
|
▼Menu
]
■コピペモード
□
スレを通常表示
□
オプションモード
□このｽﾚｯﾄﾞのURL
■項目テキスト
460:JAPU ◆lVJAPUTeX. 07/10/30 23:52:20 >>459 エレガントかは分からないけど、分岐がある程度多い場合はこんな書き方だとすっきり書けるかと。 %actions = (post => \&post, edit => \&edit, delete => \&delete); if(exists $actions{$mode}) { $actions{$mode}->(); } else { error(); } 数個程度なら if で分岐されちゃってもいいと思いますし、実際そうしています。 461:nobodyさん 07/10/30 23:58:03 >>459 それでいいんじゃね？ 各サブルーチンに戻り値があるなら「三項演算子」って手もあるし、 以下の様なやり方もあるけど、普通に書いてメンテ出来るものならば バカにされても放置しとけば？ my %hash = ( post => sub { 1 } , # &post の内容を書く edit => sub { 2 }, # &edit の内容 delete => sub { 3 }, # &delete の内容 ) ; print $hash{'edit'}->() || q{error} ; #q{error} には&error あたりを、、、 ソース全体を見たら綺麗な書き方があるかもしれんが、 それに関しては情報不足。
次ページ
最新レス表示
スレッドの検索
類似スレ一覧
話題のニュース
おまかせリスト
▼オプションを表示
レスジャンプ
mixiチェック！
Twitterに投稿
オプション
しおりを挟む
スレッドに書込
スレッドの一覧
暇つぶし2ch
4917日前に更新/271 KB
担当:undef