Допустим дан файл следующего содержания:

Как найти к примеру 5 и удалить перед ней #    .?
Заранее спасибо.

смотри в  п. 5.2 от faq.perl.org 

Постараюсь попроще сделать )

GoDleSS спаибо.

Можно все в один шаблон засунуть и поиск и замену

s/#5//;

Действительно, можно и так, но есть разница.
Если в файле будет очень много строк и редко встречается нужная, то оригинальный код будет работать быстрее по 2 причинам:
1. Поиск осуществляется быстрее, чем замена.
2. Флаг /о говорит о том, что данный шаблон компилируется один раз(имеет смысл лишь в случае применения предшаблонов, т.е. шаблонов, заранее загнанных в переменные.

В случае же вот такого коротенького файла 

отработает скорее всего быстрее или с той же скоростью, при меньшем объеме кода.


Это сообщение отредактировал(а) GoDleSS - 7.4.2008, 23:11

А ты не прав. Работать будет отлично и при очень и очень большом файле даже при гиганском файле.

Знаешь почему? 

Потому что поиск ведется не по всему файлу. А по короткой строке. 

tolkien, а что с памятью будет?

У тебя строки мегабайтные что ли?

То что у меня при мне.

Уважаемый, это ваше высказывание. Вот теперь постарайтесь это обосновать, уже нираз приводили коды/примеры/т.п. для ускорения/упрощения/"менеересурсопожираемости", а вы взяли всё это "обос***и" в одном ответе.

nitr, но первый пример тоже не застрахован от чрезмерных расходов памяти при больших строках;)
Но Вы безусловно правы по поводу

PanamOS, не спорю, но предложенный с массивом - через чур  (я про вариант "предложенный" тут) . Можно конечно подумать в сторону некоторых модулей, но зачем, редко возникают такие ситуации, когда "всё в одном".