|
ru.perl
- RU.PERL ----------------------------------------------------------------------
From : Artem Chuprina 2:5020/400 05 Apr 2002 14:03:36
To : Roman Povelicyn
Subject : Re: Блокировка и Storable
--------------------------------------------------------------------------------
Здравствуй, Roman Povelicyn.
RP> Будь здоров, All!
RP> #Открываю файл и ставлю блокировку:
RP> sysopen(FD, "file", O_RDWR|O_CREAT, 0666) || die;
RP> binmode(FD);
RP> flock(FD, LOCK_EX) || die;
RP> #юзаю Storable:
RP> if (-s "file") {
RP> $ref = retrieve_fd(*FD)||die;
RP> }
RP> ... # Действия с %{$ref}
RP> # пытаюсь сохранить структуру
RP> store_fd($ref,*FD)||die "Cant store: $!";
store_fd($ref,\*FD)||die "Cant store: $!";
?
RP> умирает ^^^ при попытке сохранения структуры в
RP> случае, если до этого структура уже загружалась.
RP> Win2000+APerl5.6build631.
--
Artem Chuprina
Communiware.net
RFC2822: <ran@ran.pp.ru>, FIDO: 2:5020/358.49, ICQ: 13038757
--- ifmail v.2.15dev5
* Origin: Leninsky 45 home network (2:5020/400)
Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
|
Re: Блокировка и Storable 
