|
ru.perl
- RU.PERL ----------------------------------------------------------------------
From : Vladimir Podgorny 2:5020/400 07 Feb 2003 22:19:30
To : Vadim Tzirulnicov
Subject : Re: Двоичный вывод
--------------------------------------------------------------------------------
Vadim Tzirulnicov <tz@nc.ru> wrote:
> Спасибо... А как обратно записать ?
#!/usr/bin/perl -wT --
use strict;
use warnings;
my @hex = qw(0f 1f 2f 3f 4f 5f 6f 7f 8f 9f af bf cf df ef ff);
open FH, '>./file.bin' or die "$!";
print FH chr hex foreach @hex;
close FH;
> Пробую распаковать всё в переменную a, а затем выполнить блок кода
>
> open (FH, ">myfile.com");
> binmode FH;
> print FH pack('H2',$a);
> close(FH);
>
> - в myfile.com пишется буква "M"...
>
> With best regards, Vadim. E-mail: tz@nc.ru
--
Vladimir A. Podgorny
Adamant ltd. deputy director (technical)
phone/fax: +380(44)5667722
--- ifmail v.2.15dev5
* Origin: Adamant ISP news server (2:5020/400)
Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
|
