ru.perl

 
 - RU.PERL ----------------------------------------------------------------------
 From : Bazhanov V.                          2:5020/400     15 Mar 2001  15:11:20
 To : All
 Subject : разобрать бин. файл
 -------------------------------------------------------------------------------- 
 

 Помогите :))
 Есть бинарный файл с числами с плавающей запятой, длинна 4 байта.
 Hе могу правильно прочитать их.
 Делаю:
  open( FILEHANDLE, "путь на файл $namRET" ) or die( "Hе могу открыть файл
 $namRET");
  binmode FILEHANDLE;
 
   read(FILEHANDLE,$zTIT,4*1440);
    close FILEHANDLE;
  for( $i=0; $i < 1440; $i++ )
  { $a=unpack( "f", substr($zTIT,$i,4)   );
    print $a;
  }
 ерунда получается :((
 --- ifmail v.2.15dev5
  * Origin: Chene (2:5020/400)
 
 

Вернуться к списку тем, сортированных по: возрастание даты  уменьшение даты  тема  автор 

Тема:    Автор:    Дата:    разобрать бин. файл   Bazhanov V.   15 Mar 2001 15:11:20   разобрать бин. файл   Dmitry Smolin   15 Mar 2001 16:14:49   разобрать бин. файл   Leonid Subbotin   15 Mar 2001 21:18:55