woniu https://blog.hatena.ne.jp/woniu/ 蝸牛 https://woniu.hatenadiary.org/ 13枚の配牌から3つのメンツを選ぶところまで、やっとできた。 イーペーコー形も判定できる。 アタマを選ぶとか、テンパイしているかの判定までは、まだ。(2013/04/09 だいぶボロがある。今修正中） my @array = qw /1 1 2 3 3 4 5 6 7 7 8 9 9/; my @found; my %found; my $count = 0; print "haipai:@array\n"; &moura(\@array); foreach $key(sort keys(%found)){ print "$key\n"; } sub moura{ my ($array_ref… 190 <iframe src="https://hatenablog-parts.com/embed?url=https%3A%2F%2Fwoniu.hatenadiary.org%2Fentry%2F20130406%2F1365257678" title="3メンツの抜き出し - 蝸牛" class="embed-card embed-blogcard" scrolling="no" frameborder="0" style="display: block; width: 100%; height: 190px; max-width: 500px; margin: 10px 0px;"></iframe> Hatena Blog https://hatena.blog 2013-04-06 23:14:38 rich https://woniu.hatenadiary.org/entry/20130406/1365257678 1.0 100%