123456
use Archive::Zip;my $zip = Archive::Zip->new('test.zip');# extrahiere Archiv in aktuelles Verzeichnis$zip->extractTree();