わかってたことだが役判定は結構なパターンがあるので チェックが必要かしら。Test::Moreなどを調べ中。 Test::More 真偽値、数値や文字列の比較を行う関数 - Perl入門〜サンプルコードによるPerl入門〜 http://d.hatena.ne.jp/perlcodesample/20090221/1234…

麻雀の作り方（あがり判定） http://www5f.biglobe.ne.jp/~kenmo/program/majang/agari/agari.html を元に役判定まわりを実装してみたが 111 222 333 345 55 の時、平和が判定しそこねるという問題を考え中。 （四暗刻を無視してロン上がりしたときの場合） …

m.pl - majan-perl - Project Hosting on Google Code http://code.google.com/p/majan-perl/source/browse/trunk/m.pl 11 -> 13 へ。ツモ切りする場合は $ perl m.pl sute E 14 g.pl - majan-perl - Project Hosting on Google Code http://code.google.com…