|
ru.perl
- RU.PERL ----------------------------------------------------------------------
From : Elias Sergueeff 2:5020/400 14 May 2003 19:54:15
To : All
Subject : Еще один вопрос... бинарные данные в переменной.
--------------------------------------------------------------------------------
Hello, All!
В переменной есть
$arch = `cat chk.pl | gzip -9`;
Как бы из нее достать этот файл (chk.pl) обратно?
Сейчас делаю так:
open (TEST,">test.test.gz");
binmode TEST;
print TEST "$arch";
$res = `cat test.test.gz | gzip -d`;
Hаверняка можно обойтись без создания файла.
ЗЫ. Дополнительных модулей ставить нельзя.
Только то, что есть в стандартном перле
под линуксом и FreeBSD.
WBR,
Ilja
--- ifmail v.2.15dev5
* Origin: MTU-Intel ISP (2:5020/400)
Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
|
