|
sed через Perl
|
|||
---|---|---|---|
#18+
Привет. Пришу такое: Код: php 1.
Ожидаю, что в содержимом дающегося "седу" файла выражения plugin-name, начинающиеся с не '>' и с не '$' будут заменены на "что-то-там другое". Не меняет. Почему нет? \([^>\$]\) - захват символа не > и не (экранированный)$. Что не так? Best regards. ... |
|||
:
Нравится:
Не нравится:
|
|||
26.10.2017, 15:38 |
|
sed через Perl
|
|||
---|---|---|---|
#18+
Нужно удвоить \ перед скобками и \1 qq это же эквивалент двойных кавычек s/\([^>\$]\)plugin-name/\1$pname/g превратилось в s/([^>$])plugin-name/1pvalue/g а sed не понимает неэкранированные группирующие скобки, по-крайней мере в линуксе ... |
|||
:
Нравится:
Не нравится:
|
|||
27.10.2017, 05:47 |
|
sed через Perl
|
|||
---|---|---|---|
#18+
Vladimir aka jeltoesolnce, запускать подпроцессом sed из-под perl в File::Find-обработчике ... У тебя какие-то личные разногласия с Ларри, не нравятся его шляпы и гавайские рубахи ? ... |
|||
:
Нравится:
Не нравится:
|
|||
28.10.2017, 00:32 |
|
sed через Perl
|
|||
---|---|---|---|
#18+
Для меня Perl есть то, что Ларри и задумывал - язык для объединения сценариев. Что знаю - то и леплю). ... |
|||
:
Нравится:
Не нравится:
|
|||
28.10.2017, 20:21 |
|
sed через Perl
|
|||
---|---|---|---|
#18+
я обычно так с File::Find общаюсь; запускаю утилитку find2perl , она генерит вот такую заготовку: Код: perl 1. 2. 3. 4. 5. 6. 7. 8. 9. 10. 11. 12. 13. 14. 15. 16. 17. 18. 19. 20. 21. 22. 23. 24. 25. 26. 27. 28.
и выкидываю из обработчика wanted() всё лишнее, заменяя на своё. Если тебе по нраву однострочник с sed в режиме 'inplace edit', то этот функционал легко воспроизводится в Perl с помощью while с магическим алмазом и установки глобальной переменной $^I. Итак: Код: perl 1. 2. 3. 4. 5. 6. 7. 8. 9. 10.
Аналогичный перловый однострочник, кстати, будет выглядеть так: Код: powershell 1.
с тем отличием, что File::Find шляется по всему дереву, а данный однострочник только по текущему каталогу. ... |
|||
:
Нравится:
Не нравится:
|
|||
29.10.2017, 07:48 |
|
|
start [/forum/topic.php?fid=23&fpage=29&tid=1460474]: |
0ms |
get settings: |
10ms |
get forum list: |
14ms |
check forum access: |
4ms |
check topic access: |
4ms |
track hit: |
29ms |
get topic data: |
12ms |
get forum data: |
3ms |
get page messages: |
45ms |
get tp. blocked users: |
1ms |
others: | 279ms |
total: | 401ms |
0 / 0 |