荒しの人(>>127,>>128)や、>>129氏が暗に言ってるが
気付いて無いみたいだから。

>>124
コレ、まともに動かんよ。

List::MoreUtilsのmeshのプログレッシブ版みたいのを目指そうとしてた?
回答者だったら、use strict; と use warnings ; が通るコードで
実際に動かしてからレスした方が良いよ。