Perlã§ç”Ÿã§rand関数をã”ã¡ã‚ƒã”ã¡ã‚ƒä½¿ã†ã‚³ãƒ¼ãƒ‰ã¯ã‚‚ã†å«Œã | hirobanex.netHachioji.pm#12ã§ç™ºè¡¨ã—ãŸãƒã‚¿ã§ã™ã€‚Data::WeightedRoundRobin使ã£ãŸã‚‰ã€rand使ã†ã‚ˆã†ãªã‚³ãƒ¼ãƒ‰ãŒã€ã„ã„æ„Ÿã˜ã«ã™ã£ãり見やã™ãã‹ã‘ã¾ã—ãŸã‚ˆãƒ¼ã¨ã„ã†è©±ã§ã™ã€‚ å«Œãªã‚³ãƒ¼ãƒ‰ã®æ¦‚è¦ è¦ä»¶ 「以下ã®ã‚ˆã†ãªæ„Ÿã˜ã§ã€å®Ÿè¡Œã™ã‚‹å‡¦ç†ã‚’ランダムã§å¤‰æ›´ã—ã¦ã‚ˆ!ã€ã£ã¦è¦ä»¶ãŒãŸã¾ã«ã‚ã‚Šã¾ã™ã。 3割ã®ç¢ºçŽ‡ã§hogeを実行 3割ã®ç¢ºçŽ‡ã§mogeを実行 2割ã®ç¢ºçŽ‡ã§fooを実行 1割ã®ç¢ºçŽ‡ã§barを実行 1割ã®ç¢ºçŽ‡ã§jarを実行 ファクトリーメソッドパターン的ãªå®Ÿè£…ã§ã™ã。 ã”ã«ã‚‡ã”ã«ã‚‡ã™ã‚‹ã¨ã“ã‚“ãªæ„Ÿã˜ã®å®Ÿè£…ã« my $rand = rand(); my $method; if($rand < 0.3){ $method = 'hoge';#3割 }elsif($rand >= 0.3 && $rand < 0.6){ $method = 'moge';#3割 }elsif($rand
{{#tags}}- {{label}}
{{/tags}}