表示の確認はSoftBank 904SHで行っていますが、出力もしょぼいので(笑)大抵の電話機の標準ブラウザで大丈夫だと思います。
再抽選するときはリロード(再読込、更新)してください。機種／キャリア固有機能は一切使用していません。

稼働サンプル

ソース

自前のサーバーでCGIが利用できる方はできるだけご自身で設置してください。稼働サンプルはまま停止することがありますし。
自身のサーバーに置くときは、拡張子を適宜書き換えてください(というか、たぶん.cgi)。
言い訳ですが、パラメータはハードコーディングしてあります。大したコード量でないし、どうせそれぞれブックマークすると思って。
perlのバージョンによっては乱数のシードが同じになることがあるので(となると毎回同じ抽選結果になっちゃう)、この場合は必要な初期化を追加します。ググりましょう。
お約束ですが、設置方法など個別の質問にはお答えできかねます。がんばって調べてください。