Christian Kruse: Inhalt eines Zip-Archivs in Variable einlesen

Beitrag lesen

你好 Stefan,

Wie kann man den (binären) Inhalt eines Archive::Zip-Objektes in eine Variable einlesen? Über den Umweg einer Datei geht's zwar ...

$zip->writeToFileNamed("tmp.zip");
open(HANDLE_ZIP, "tmp.zip");
my $zipData = <HANDLE_ZIP>;

... aber das ist ja wie "von hinten durch die Brust ins Auge"... ;-)

Würde ich mit IO::String machen:

  
use IO::String;  
use Archive::Zip;  
  
# create Zip archive  
  
my $str = '';  
my $fh = IO::String->new($str);  
$zip->writeToFileHandle($fh);  

再见,
 克里斯蒂安

--
Bauer sucht Frau! | Ich bin ja eigentlich kein Serien-Junkie…
Gernot Back: Was ich damit sagen will: Dein Gelaber fängt an, sogar mich zu nerven.
http://wwwtech.de/