「Perl」カテゴリーアーカイブ

全項目をランダムで一度だけ選択していく

twitter 上で時報代わりに短歌をつぶやく bot を PHP のスクリプトで作っていたんですが、諸般の事情で Perl で作り直すことが必要になり、その途中で試作したものです。ついでに 単純に全体からランダムで1つ選択する作りだったものを、全項目をランダムで一度だけ選択していくようにしてみました(未選択なものの次回以降の選択順序を保持するため、インデックスファイルに永続化させています)。
Perl で作成した bot は、Docker コンテナ化して 2019年1月10日 16時の時報ツイートから、これまでのものと交代して運用しています。
続きを読む 全項目をランダムで一度だけ選択していく