форумы  помощь  поиск  регистрация  майллист  ВХОД  слежка

Вариант для распечатки		Пред. тема | След. тема
Форумы Программирование под UNIX (Public)
Изначальное сообщение		[Проследить за развитием треда]

"Работа со строками в perl...."
Сообщение от virk on 29-Авг-05, 14:09  (MSK)
Подскажите как средсвами perl-а можно осуществить поиск строки в файле и если такая строка найдена, то удалить ее. А если нет такой строки, то добавить?? Помогите новичку.
	Правка | Высказать мнение | Ответить | Рекомендовать в FAQ | Cообщить модератору | Наверх

Индекс форумов | Темы | Пред. тема | След. тема

Сообщения по теме

1. "Работа со строками в perl...."
Сообщение от madskull (ok) on 29-Авг-05, 14:37  (MSK)
>Подскажите как средсвами perl-а можно осуществить поиск строки в файле и если >такая строка найдена, то удалить ее. А если нет такой строки, >то добавить?? >Помогите новичку. одно из решений: $str="..."; open F, "<test.txt" or die $!; $t = join "", <F>; close F; $t =~ s/$str\n//gs or $t .= $str."\n"; open F, ">test.txt" or die $!; print F $t; close F;
Удалить	Правка | Высказать мнение | Ответить | Рекомендовать в FAQ | Cообщить модератору | Наверх

	2. "Работа со строками в perl...."
	Сообщение от virk on 30-Авг-05, 13:05  (MSK)
	Пояните что делает эта строчка ? >$t = join "", <F>; >close F; > И вот эта...... >$t =~ s/$str\n//gs or $t .= $str."\n";
	Удалить	Правка | Высказать мнение | Ответить | Рекомендовать в FAQ | Cообщить модератору | Наверх

	3. "Работа со строками в perl...."
	Сообщение от madskull (ok) on 30-Авг-05, 13:44  (MSK)
	Если честно, лучше почитать книжки. >Пояните что делает эта строчка ? >>$t = join "", <F>; Считывает из файла все строки в массив и объединяет их в строку. > >>close F; >> >И вот эта...... >>$t =~ s/$str\n//gs or $t .= $str."\n"; Заменяет нужную строку на пустоту (то есть удаляет ее). если замены не произошло, то есть такой строки нет, то добавить эту строку к тексту
	Удалить	Правка | Высказать мнение | Ответить | Рекомендовать в FAQ | Cообщить модератору | Наверх

Архив | Удалить	Индекс форумов | Темы | Пред. тема | След. тема
Оцените тред (1=ужас, 5=супер)? [ 1 | 2 | 3 | 4 | 5 ]

Пожалуйста, прежде чем написать сообщение, ознакомьтесь с данными рекомендациями.