なんとなく思いついたメモル。思いついただけで試してない例えば売り上げ10万以上あった連続する日付の出現回数カウントしてみる。 カウント部分は述語分けとくと応用力あってラクい my @gts = qw/108000 99500 75600 112000 85600/; sub countTerms { (2 < …