ReSQL.ru
     
powered by simpleCommunicator - 2.0.60     © 2026 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / PHP, Perl, Python [игнор отключен] [закрыт для гостей] / [PERL] Поиск строки в файле и запись после нее
5 сообщений из 5, страница 1 из 1
[PERL] Поиск строки в файле и запись после нее
    #38468973
Владимир Г.
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Владимир Г.
Участник
Имеется файл.
В файле нужно найти определенную строчку и после нее(перед ней) записать строку.
Была идея найти строку
Код: php
1.
2.
(if (m/\"Component\"/i)
{....})

и позицию в файле с помощью tell, потом seek и print F xxxxx.
но приступив к реализации, понял чо так не пойдет.
Может кто то подскажет как правильно реализовать такую задумку.
Спасибо.
...
Рейтинг: 0 / 0
18.11.2013, 18:03
| Ответить | Цитировать | Написать  
[PERL] Поиск строки в файле и запись после нее
    #38469227
vkle
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
vkle
Участник
Вроде для sed подходящая работа.
...
Рейтинг: 0 / 0
18.11.2013, 23:04
| Ответить | Цитировать | Написать  
[PERL] Поиск строки в файле и запись после нее
    #38469432
ShSerge
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
ShSerge
Участник
vkleВроде для sed подходящая работа.
+1
SED - самый лучший вариант.
...
Рейтинг: 0 / 0
19.11.2013, 09:52
| Ответить | Цитировать | Написать  
[PERL] Поиск строки в файле и запись после нее
    #38473368
Фотография volodin661
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
volodin661
Участник
Владимир Г.,

генерация тестового файла aaa :

perl -E 'say $_ x 10 for 1..9' > aaa

получилось:
111..11
222..22
333..33
..
999..99

вставить строчку 'AAAAAA' после искомой строчки, например '333'
perl -i -pe '$_ .= "AAAAAA" . v10 if /333/' aaa

вставить строчку 'AAAAAA' до искомой строчки '333'
perl -i -pe '$_ = "AAAAAA" . v10. $_ if /333/' aaa

магия тут в использовании ключа командной строки -i ( In-Place Editing )
...
Рейтинг: 0 / 0
21.11.2013, 18:16
| Ответить | Цитировать | Написать  
[PERL] Поиск строки в файле и запись после нее
    #38483011
Фотография nexoma
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
nexoma
Участник
маг и волшебник
...
Рейтинг: 0 / 0
29.11.2013, 11:36
| Ответить | Цитировать | Написать  
5 сообщений из 5, страница 1 из 1
Форумы / PHP, Perl, Python [игнор отключен] [закрыт для гостей] / [PERL] Поиск строки в файле и запись после нее
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]