The OpenNET Project / Index page

[ новости /+++ | форум | теги | ]

форумы  помощь  поиск  регистрация  майллист  ВХОД  слежка  RSS
"Чтение бинарника функцией read()"
Вариант для распечатки Архивированная нить - только для чтения! 
Пред. тема | След. тема 
Форумы Программирование под UNIX (Public)
Изначальное сообщение [Проследить за развитием треда]

"Чтение бинарника функцией read()"
Сообщение от ix_adm emailИскать по авторуВ закладки on 30-Май-03, 17:09  (MSK)
Помогите, кто может! При чтении файла ф-цией read() некоторые файлы до конца не считываются. Этот код:

open(DATA, "/tmp/10err.arj") or die "$!";
$filesize = -s DATA;
print $filesize."\n";
while($r=read(DATA, $buf, $filesize)){
      #print encode_base64($buf);
      print $r;
}
выдает следующее:
56484
1525

установка $/=undef; ничего не дает.

Заранее спасибо.

  Рекомендовать в FAQ | Cообщить модератору | Наверх

 Оглавление

Индекс форумов | Темы | Пред. тема | След. тема
Сообщения по теме

1. "Чтение бинарника функцией read()"
Сообщение от qq Искать по авторуВ закладки on 31-Май-03, 00:40  (MSK)

$filesize = -s "/tmp/10err.arj";

  Рекомендовать в FAQ | Cообщить модератору | Наверх

2. "Чтение бинарника функцией read()"
Сообщение от uldus Искать по авторуВ закладки on 31-Май-03, 16:55  (MSK)
>Помогите, кто может! При чтении файла ф-цией read() некоторые файлы до конца
>не считываются.

perldoc -f binmode

>open(DATA, "/tmp/10err.arj") or die "$!";
binbode(DATA);

....

>while($r=read(DATA, $buf, $filesize)){
my $buf;
while(my $r = read(DATA, $buf, 1024)){
читай блоками, а все разом.

  Рекомендовать в FAQ | Cообщить модератору | Наверх

3. "Чтение бинарника функцией read()"
Сообщение от ix_adm emailИскать по авторуВ закладки on 02-Июн-03, 09:23  (MSK)
>>Помогите, кто может! При чтении файла ф-цией read() некоторые файлы до конца
>>не считываются.
>
>perldoc -f binmode
>
>>open(DATA, "/tmp/10err.arj") or die "$!";
>binbode(DATA);
>
>....
>
>>while($r=read(DATA, $buf, $filesize)){
>my $buf;
>while(my $r = read(DATA, $buf, 1024)){
>читай блоками, а все разом

Спасибо.

  Рекомендовать в FAQ | Cообщить модератору | Наверх


Удалить

Индекс форумов | Темы | Пред. тема | След. тема
Пожалуйста, прежде чем написать сообщение, ознакомьтесь с данными рекомендациями.




Партнёры:
PostgresPro
Inferno Solutions
Hosting by Hoster.ru
Хостинг:

Закладки на сайте
Проследить за страницей
Created 1996-2025 by Maxim Chirkov
Добавить, Поддержать, Вебмастеру