PERL und Zip

Re(2): PERL und Zip

Madler — Tue, 01 Jul 2003 11:33:39 GMT

ahh ok danke

mfg
Madler

Re: PERL und Zip

Robe — Mon, 30 Jun 2003 15:16:12 GMT

da duerften die samples etwas ungenau sein, wenn ich das so teste erzeugt er mir unter linux lauter "hidden" files, die mit "." beginnen...

mit

$zip->extractTree('','./');

gehts bei mir...

Re(2): PERL und Zip

Madler — Mon, 30 Jun 2003 12:25:03 GMT

das ist ja das problem es kommt gar nichts es passiert aber auch nichts.

Re: PERL und Zip

alexk — Mon, 30 Jun 2003 12:17:24 GMT

ja, ich habe eine idee:

du schreibst noch irgendwo hin, welche fehlermeldungen du bekommst, dann brauchen die programmierer nicht in den 'wahrsagemodus' switchen

PERL und Zip

Madler — Mon, 30 Jun 2003 12:10:34 GMT

Hi

hab das zusammengeschustert nur irgendwie tut der garnichts.
Aufgabe: massig zip-files in dem ordner etpacken und dann die zip's löschen so das nur mehr die enpackten files vorhanden sind.

$filelist = new File::List("c:/temp") or die "net da";
@files = @{ $filelist->find("\.zip\$") };
$zip = Archive::Zip->new();
$zipName = shift(@files);
$status = $zip->read( $zipName );
die "Read of $zipName failed\n" if $status != AZ_OK;
$zip->extractTree();

hat wer ne idee.
danke
mfg
Madler