Добрый день.

  В ходе своей борьбы за оптимизацию просчета массива я обнаружил интересную функцию map(). Судя по инструкции она должна была применять заданное выражение или функцию ко всем элементам списка. Ура !!!! решил я и написал

  @tmp = map( s/\)/ / )@tmp ; # удалим )

  Perl молча проглотил мой скрипт, но в ответ вернул массив из 8129 1 (единиц) Почесав затылок я заметил соответствие между числом единиц и числом строк исходного массива. Т. е. он заменил каждую строчку массива на результат s///
  Как заставить его работать правильно?