3

Как я могу автоматически заархивировать группу файлов в несколько zip-файлов (скажем, по 2 МБ для каждого файла), и чтобы каждый zip-файл представлял собой отдельный zip-файл? (т.е. не многотомные zip-файлы, которые вы не можете потерять ни в одном из файлов, иначе вы не сможете разархивировать)

Есть ли инструменты для этого? На самом деле мне просто нужно сгруппировать файлы по нескольким группам, по 2 МБ каждая и т.д.

Спасибо!

4 ответа4

1

Попробуйте бесплатный инструмент под названием Bitser. Это бесплатно и позволяет создавать несколько отдельных файлов ZIP из проводника через контекстное меню. Это довольно просто, просто выделите файлы или папки в Проводнике, щелкните правой кнопкой мыши и выберите "Добавить в отдельный Zip"

www.bitser.org

0

Вы можете поместить свои файлы в zip-архив, а затем использовать Adsen File Splitter.

Редактировать:

Теперь, когда я думаю об этом, это, вероятно, не то, что вы хотели ... Я все равно оставлю это.

0

Один из методов - создать zip-файл, содержащий все, а затем использовать команду zipsplit (часть бесплатного / открытого программного обеспечения Info-ZIP), чтобы разделить его на части соответствующего размера с помощью параметра -n.

Эта ссылка ведет на справочную страницу Mac OS X, но программное обеспечение Info-ZIP работает практически на всех комбинациях аппаратного обеспечения и ОС, доступных с 80-х годов.

0

К сожалению, zipsplit не работает для файлов более 2 ГБ, поэтому я столкнулся с той же проблемой. Поэтому я написал свой собственный быстрый и грязный Perl-скрипт, который делает свою работу. Он добавляет файлы в архив, пока файл + архив ниже, чем макс. указанный размер:

# Use strict Variable declaration
use strict;
use warnings;
use File::Find;

# use constant MAXSIZE    => 4700372992; # DVD File size
use constant MAXSIZE    => 1566790997; # File size for DVD to keep below 2GB limit
# use constant MAXSIZE    => 100000000; # Test

use constant ROOTDIR    => 'x:/dir_to_be_zipped'; # to be zipped directory

my $zipfilename    = "backup"; # Zip file name
my $zipfileext    = "zip"; # extension

my $counter = 0;
my $zipsize = undef;
my $flushed = 1;

my $arr = [];

find({wanted =>\&wanted, no_chdir => 1}, ROOTDIR);

flush(@{$arr});

# Callback function of FIND
sub wanted {
    my $filesize = (-s $File::Find::name);

    LABEL: {
        if ($flushed) {
            $zipsize = (-s "$zipfilename$counter.$zipfileext");
            $zipsize = 0 unless defined $zipsize;

            printf("Filesize Zip-File %s: %d\n", 
                "$zipfilename$counter.$zipfileext", $zipsize);

            $flushed = 0;

            if (($zipsize + $filesize) >= MAXSIZE) {
                $counter++;
                $flushed = 1;
                printf("Use next Zip File %d, Filesize old File: %d\n",
                    $counter, ($zipsize + $filesize));
                goto LABEL;
            }
        }
    }

    if ( $zipsize + $filesize  < MAXSIZE ) {
        printf("Adding %s (%d) to Buffer %d (%d)\n",
            $File::Find::name, $filesize, $counter, $zipsize);

        push @{$arr}, $File::Find::name;
        $zipsize += $filesize;
    }
    else {
        printf("Flushing File Buffer\n");
        flush(@{$arr});

        $flushed = 1;
        $arr = [];
        goto LABEL;

    }
}

# Flush File array to zip file
sub flush {

    # open handle to write to STDIN of zip call
    open(my $fh, "|zip -9 $zipfilename$counter.$zipfileext -@")
        or die "cannot open < $zipfilename$counter.$zipfileext: $!";

    printf("Adding %d files\n", scalar(@_));
    print $fh map {$_, "\n"} @_;
    close $fh;
}

Всё ещё ищете ответ? Посмотрите другие вопросы с метками .