информационная безопасность
без паники и всерьез
 подробно о проектеRambler's Top100
Сетевые кракеры и правда о деле ЛевинаАтака на InternetПортрет посетителя
BugTraq.Ru
Русский BugTraq
 Анализ криптографических сетевых... 
 Модель надежности двухузлового... 
 Специальные марковские модели надежности... 
 Очередное исследование 19 миллиардов... 
 Оптимизация ввода-вывода как инструмент... 
 Зловреды выбирают Lisp и Delphi 
главная обзор RSN блог библиотека закон бред форум dnet о проекте
bugtraq.ru / форум / programming
Имя Пароль
если вы видите этот текст, отключите в настройках форума использование JavaScript
ФОРУМ
все доски
FAQ
IRC
новые сообщения
site updates
guestbook
beginners
sysadmin
programming
operating systems
theory
web building
software
hardware
networking
law
hacking
gadgets
job
dnet
humor
miscellaneous
scrap
регистрация





Легенда:
  новое сообщение
  закрытая нитка
  новое сообщение
  в закрытой нитке
  старое сообщение
[Perl] Как "урезать" файл? 29.10.04 21:00  
Автор: Heller <Heller> Статус: Elderman
<"чистая" ссылка>
Мне требуется урезать файл с помощью Perl. То есть, например, в файле хранится база с записями и последнюю запись нужно удалить. Вот, в общем-то и весь вопрос. Как это сделать?

Проблема в том, что из-за большого объёма файла и частом выполнении подобных действий, поступить стандартно - считать файл в массив и потом переписать его заново - не получится. Приходится использовать конструкцию open (FH,"+<filename") И как уменьшить размер файла в таком случае, perldoc умалчивает.

Заранее благодарен.
man perlfunc | grep -a 10 'truncate filehandle,length' 29.10.04 21:06  
Автор: NKritsky <Nickolay A. Kritsky> Статус: Elderman
<"чистая" ссылка>
1




Rambler's Top100
Рейтинг@Mail.ru


  Copyright © 2001-2025 Dmitry Leonov   Page build time: 0 s   Design: Vadim Derkach