Вызов map {function ($ _)} ; загружает весь файл в память при использовании perl?
map {function ($ _)} ;