|
ru.website
- RU.WEBSITE -------------------------------------------------------------------
From : Igor Artamonov 2:5004/55.52 04 Jul 2001 11:42:14
To : Sergei Peretiatko
Subject : Re: Вставить строчку
--------------------------------------------------------------------------------
02 Jul 01 02:43, Sergei Peretiatko писал к Artem Kostrov:
AK>>> Как можно автоматом вставить одну строчку
AK>>> <link rel=stylesheet href="../css/standart.css" type="text/css">
AK>>> в во множество файлов (несколько десятков).
IM>> use perl;
IM>> RU.PERL
SP> Zачем так жестоко?.. Pascal, на крайняк Delphi.
Тогда уж сразу асм. Еще больше кода получится.
Человеку легче будет написать скрипт на перле меньше по размерам чем это
письмо, чем создавать то-же самое в паскале и делфе, но в 10 раз больше
(особенно это касается Делфи)
ЗЫ. Паскаль и дельфю я не обижаю, сам ими пользуюсь, но когда нужно обработать
текст, то пишу перловый скрипт.
ЗЫЫ Вот скрипт:
$link = 'что вставлять'."\n";
opendir DIR, ".";
@flist = grep { /.*\.htm.?$/ } readdir DIR;
closedir DIR;
for (@flist) {
open HIN, $_; @src = <HIN>; close HIN;
@src = map { s/(.*)(<\/head>.*)/$1$link$2/i; $_ } @src;
open HOUT, ">1"; print HOUT @src; close HOUT;
rename $_, "$_.old"; rename '1', "$_";
}
iG[]R [E-mail:sply<@>echo.ru] [ICQ:120170178]
[PGP Fingerprint: 7A21 8DA9 ACB1 7E56 C6AD C87F CACE 2E1C E9D2 8311]
---
* Origin: DiLab (2:5004/55.52)
Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
|
