年賀状くじ当選チェッカー

「お年玉付年賀はがき」のくじをチェックするプログラムみたいなものをざっと書いてみた.Perl って実はちゃんと学んでないので,もっといい書き方があるんだろうなと思いつつ,実は時間がないので動けばいいや的に作ってしまった.ていうか誰か改良してくれ.あらかじめはがきの番号のリストを作る必要がある.使いたいという奇特な方がいたらどうぞ

ちなみに自分宛に来た年賀状の場合,36 枚中,4 等 (切手シート) がわずかに 1 枚あたっただけであった.まあどうせ期待してないけど.