|
ru.perl
- RU.PERL ----------------------------------------------------------------------
From : Sukhov Vladimir 2:5020/400 25 Mar 2001 22:08:20
To : All
Subject : Re: ума не прелажу=((
--------------------------------------------------------------------------------
ага, пасибо всё фурыкает-)) тока терь другой трабл-((
Sergey Chicheryukin <chs@nm.ru> wrote in message
news:99j23p$bg0$1@host.talk.ru...
> Sukhov Vladimir <sukhov@coba.ru> пишет:
> SV> гы-) трудно по субботам определяться-))
> SV> надо в начало файла добавить одну строку-)
> SV> я это так сделал:
> SV> open(ff,"ff");
> SV> flock(ff, LOCK_EX);
> SV> @fil=<ff>;
> SV> open(ff,">ff");
> SV> print ff "$txt\n";
> SV> print ff @fil;
> SV> close ff;
> SV> но, думаю что это через чур криво-))
> :))
> open(ff,"+<ff");
> flock(ff, LOCK_EX);
> seek(ff,0,0);
> @fil=<ff>;
> unshift @fil,"$txt\n";
> seek(ff,0,0);
> print ff @fil;
> flock(ff, LOCK_UN);
> close ff;
>
> --
> Бестов и регардов.
> Сергей.
> Отправлено через сервер Talk.Ru - http://www.talk.ru
--- ifmail v.2.15dev5
* Origin: Talk.Ru (2:5020/400)
Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
|
