Замены в perl

Написал(а) G0thic Дата 05.02.07 09:47

Наверное это просто, что-то подзабыл, как в перле объединить следующие последовательные замены в одну?
$subject =~ s/=$//;
$subject =~ s/==/=/g;
$subject =~ s/\n//g;

Когда кругозор человека сужается к минимуму, он называет это своей точкой зрения.

Написал(а) LOE (Site/forum admin) Дата 05.02.07 18:44

А зачем объединять?
Если 1 и 3 еще можно как-то скомбинировать, то 2-е не в тему.
Ну и второе - несколько простых регэкспов работают быстрее, чем один супер сложный.

И не понятно, что дожно получиться, если в конце строки стоят 3 знака = ?

В общем, я б не стал заморачиваться.

"No! Try not! Do. Or do not. There is no try." -- Yoda

Тема Программирование / Прикладное / Замены в perl (5591 хитов)

Ошибка базы данных

Can't open file: 'log.MYD'. (errno: 145)

INSERT INTO log (
level, entity, action, userId, boardId, topicId, postId, extraId,
logTime, ip
) VALUES (
2, 'topic', 'show', 0, 35, 421, 0, 0,
1779031234, '10.8.201.66, 216.73.216.19'
)

Если вы думаете, что действительно произошла ошибка, пожалуйста, информируйте администратора. Включите точное сообщение об ошибке и время.