結論

foreach(1..100000000) は最適化するのに foreach(<>) を最適化しないperlが悪い