|
ru.perl
- RU.PERL ----------------------------------------------------------------------
From : Andrej 2:5020/400 14 Apr 2004 12:00:17
To : All
Subject : open(FILE,">>$file") в начало файла записи новые добавлять
--------------------------------------------------------------------------------
Здрасте Всем!
*******************************
open(FILE,">>$file") or Error('File Access Error',"An error occurred when trying
to append to the $msg ($file): $!");
flock(FILE,2) or Error('File Lock Error',"An error occured when locking
the $msg ($file): $!.");
flock(FILE,2) or Error('File Lock Error',"An error occured when locking
the $msg ($file): $!.");
print FILE @_;
**************************
Всем известный кусок. Все новое добавляет в конец файла.
А как зделать, чтобы новые записи писались в верху файла???
Делал я ведь это уже!!! Вот блин что значит с перлом больше года не заниматся...
Всем спасибо заранее!
--
С уважением,
Andrej.
--- ifmail v.2.15dev5.3
* Origin: - (2:5020/400)
Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
|
