my $verz = shift @verzeichnisse;
my $ohneShash = $verz;
$ohneSlash =~ s#^/##;
$zip->addTree($verz,$ohneSlash,undef,COMPRESSION_LEVEL_BEST_COMPRESSION);