reduceの件も、左辺値捨ててる時点で論外だし、
perldoc -mT List::Util::PP | grep -A 26 'sub reduce'
して、コーディング見りゃ、
「reduceのバグw」ってコードを晒してる奴が
どれだけアホか判る。

逆にコードみて自分のアホさが認識出来ないなら、>>950
みたいに荒しだけしてればいいんだよ