https://www.opennet.dev/openforum/vsluhforumID9/8135.html помогите, пожалуйста. очень трудно даются маны :(<br><br>есть file1. нужно: <br><br>удалить все строки, ПОСЛЕ строки, содержащей metka_begin <br>ПОКА не встретиться строка, содержащая metka_end <br><br>строки, содержащие metka_begin и metka_end трогать не нужно. их оставить. _только между ними_ удалить. <br><br>маленькая оговорка: строка, содержащая metka_end встречается неоднократно, а содержащая metka_begin - только один раз. но удалить нужно между строками С metka_begin ПО ближайший metka_end. <br><br>после чего, в ту же область в тот же file1 вставить всё содержимое другого файла (file2)<br> https://www.opennet.dev/openforum/vsluhforumID9/8135.html#11 Sun, 08 Mar 2009 19:51:10 GMT &gt;&gt; &lt;list name="IpAccessList"&gt; - metka_begin. В качестве нее скормил IpAccessList<br>&gt;&gt; &lt;/list&gt; - metka_end<br>&gt;<br>&gt;То есть тебе надо обрабатывать XML? Тогда выкидывай и перл и сед, <br>&gt;потому что они с ним в общем случае не справляются. <br>&gt;Лучше либо парсить XML напрямую, либо использовать http://sourceforge.net/projects/xmlstar/ . <br><br>на самом деле, только одну из его частей, вставляя подготовленный кусок. просто программа хранит конфигурацию в таком виде. задача уже решена, в общем-то при помощи перл, и всё прекрасно работает. но за наводку, безусловно, спасибо.<br> https://www.opennet.dev/openforum/vsluhforumID9/8135.html#10 Sun, 08 Mar 2009 19:48:46 GMT &gt;[оверквотинг удален]<br>&gt;/metka_begin/,/metka_end/{ <br>&gt; /metka_begin/{ <br>&gt; r file2 <br>&gt; b <br>&gt; } <br>&gt; /metka_end/b <br>&gt; d <br>&gt;} <br>&gt;<br>&gt;$ sed -f script.sed file1 <br><br>спасибо, огромное спасибо за вложенный труд в ответ.<br> https://www.opennet.dev/openforum/vsluhforumID9/8135.html#9 Sun, 08 Mar 2009 18:46:03 GMT &gt;[оверквотинг удален]<br>&gt;<br>&gt;строки, содержащие metka_begin и metka_end трогать не нужно. их оставить. _только между <br>&gt;ними_ удалить. <br>&gt;<br>&gt;маленькая оговорка: строка, содержащая metka_end встречается неоднократно, а содержащая metka_begin - только <br>&gt;один раз. но удалить нужно между строками С metka_begin ПО ближайший <br>&gt;metka_end. <br>&gt;<br>&gt;после чего, в ту же область в тот же file1 вставить всё <br>&gt;содержимое другого файла (file2) <br><br>$ cat script.sed<br>/metka_begin/,/metka_end/{<br> /metka_begin/{<br> r file2<br> b<br> }<br> /metka_end/b<br> d<br>}<br><br>$ sed -f script.sed file1<br> https://www.opennet.dev/openforum/vsluhforumID9/8135.html#8 Sun, 08 Mar 2009 18:43:03 GMT &gt; &lt;list name="IpAccessList"&gt; - metka_begin. В качестве нее скормил IpAccessList<br>&gt; &lt;/list&gt; - metka_end<br><br>То есть тебе надо обрабатывать XML? Тогда выкидывай и перл и сед, потому что они с ним в общем случае не справляются.<br>Лучше либо парсить XML напрямую, либо использовать http://sourceforge.net/projects/xmlstar/ .<br> https://www.opennet.dev/openforum/vsluhforumID9/8135.html#7 Sun, 08 Mar 2009 15:45:38 GMT Как будет время советую почитать "Mastering regular expressions" http://oreilly.com/catalog/9781565922570/. Можно найти в сети, говорят даже не русском. Умение работать с регулярными выражениями очень сильно помогает админу и программисту, фактически must have. <br>Однако в данном случае проблема была в синтаксисе самого оператора m//, как можно заметить / ограничивает регулярное выражение, но также встречается в &lt;/list&gt;. Решить можно либо экранированием: /&lt;\/list&gt;/(возможно понадобится еще учитывать экранирование от самого cmd и тогда получим /&lt;\\/list&gt;/) либо заменой / на другой символ с явным указанием оператора m, например m&#124;&lt;/list&gt;&#124; или m#&lt;/list&gt;#. Второй способ удобней если слешей много.<br><br><br> https://www.opennet.dev/openforum/vsluhforumID9/8135.html#6 Sun, 08 Mar 2009 15:11:43 GMT &gt;На всякий случай добавлю пару моментов. <br>&gt;Если вопреки условиям задачи встретится еще раз пара metka_begin/metka_end, то для нее <br>&gt;тоже будет произведена замена на содержимое file2. <br>&gt;Если metka_end не встретится вообще, то удаление строк будет до конца файла <br>&gt;и вставки из file2 не будет. <br><br>пара не встретится. metka_begin только один. metka_end - много. но ОТ/ДО - пара, получается, одна. но за уточнения, безусловно, спасибо.<br><br>тут щас была маленькая загвоздка. metka_end и metka_begin - условные ведь обозначения были.<br><br>на самом деле, там так:<br><br>&lt;list name="IpAccessList"&gt; - metka_begin. В качестве нее скормил IpAccessList<br>&lt;/list&gt; - metka_end. Возникла маленькая загвоздка, ибо не мог скормить просто list, потому что в удаляемом содержимом встречается &lt;/listitem&gt;. Попытался скормить полностью &lt;/list&gt; - перл заругался на синтаксис. Но когда отдал ему list&gt; - вроде, проканало.<br><br>сейчас проверил на рабочих файлах - вроде бы, всё получилось. пока не скормил итог программе, которая с ними работает, но но https://www.opennet.dev/openforum/vsluhforumID9/8135.html#5 Sun, 08 Mar 2009 14:59:29 GMT На всякий случай добавлю пару моментов. <br>Если вопреки условиям задачи встретится еще раз пара metka_begin/metka_end, то для нее тоже будет произведена замена на содержимое file2. <br>Если metka_end не встретится вообще, то удаление строк будет до конца файла и вставки из file2 не будет. <br><br><br> https://www.opennet.dev/openforum/vsluhforumID9/8135.html#4 Sun, 08 Mar 2009 14:10:36 GMT &gt;[оверквотинг удален]<br>&gt;Мне лично лень учить синтаксис sed/awk/grep/итд, особенно с учетом их вариаций, значительно <br>&gt;проще выучить Perl и использовать его как swiss army knife. Кстати <br>&gt;perl под винду есть, мне известно аж три варианта - cygwin, <br>&gt;active perl, strawberry perl - плюс в денвере вроде есть свой <br>&gt;минимальный вариант. <br>&gt;Если заинтересует, то однострочник на perl: <br>&gt;perl -ne 'BEGIN{local $/=undef;open F,"file2";$t=&lt;F&gt;;close F};print unless $f;$f=1 if /metka_begin/;if (/metka_end/ & $f){print $t,$_;$f=0};' file1<br>&gt;Экранирование дано для bash, так что для cmd нужно будет модифицировать. Выводит <br>&gt;на stdout, но если добавить -i, то будет менять внутри файла. <br>&gt;Можно давать много файлов за раз.<br><br>Друг! Спасибо тебе. Попробовал денверский на 700 кб - результат удовлетворительный (пока, правда, на тестовых файлах, но, думаю, и на рабочих будет). Из синтаксиса только ' заменил на ".<br><br>Спасибо, спасибо!<br><br> https://www.opennet.dev/openforum/vsluhforumID9/8135.html#3 Sun, 08 Mar 2009 13:34:39 GMT Мне кажется как раз вставка из другого файла будет основной проблемой, а вот удаление строк по указанным критериям вполне возможно в sed. Специалисты по sed на этом форуме есть, остается их дождаться :)<br>Мне лично лень учить синтаксис sed/awk/grep/итд, особенно с учетом их вариаций, значительно проще выучить Perl и использовать его как swiss army knife. Кстати perl под винду есть, мне известно аж три варианта - cygwin, active perl, strawberry perl - плюс в денвере вроде есть свой минимальный вариант. <br>Если заинтересует, то однострочник на perl: <br>perl -ne 'BEGIN{local $/=undef;open F,"file2";$t=&lt;F&gt;;close F};print unless $f;$f=1 if /metka_begin/;if (/metka_end/ & $f){print $t,$_;$f=0};' file1<br>Экранирование дано для bash, так что для cmd нужно будет модифицировать. Выводит на stdout, но если добавить -i, то будет менять внутри файла. Можно давать много файлов за раз.<br>