ZipUtil.pm

ダウンロード

ZipUtil.pm をダウンロード
(リンクを右クリックしてリンク先を保存してください。)

ヴァージョン

0.01

エクスポートされる関数

・ArcZip
ファイルやディレクトリを Zip 形式で圧縮します。
# 圧縮するファイル名やディレクトリ名を配列に登録します。
my @files = ('sample1.txt', 'sample2.txt', 'sample3.txt', 'tmp');

# 引数となる連想配列を用意します。
my %data = ('OutputFile' => 'sample.zip', # 出力するファイル名を指定
            'Targets'    => \@files,      # 対象ファイル名をセット
           );

# 圧縮
ArcZip(\%data);

・UnZip
Zip ファイルを指定のディレクトリ内に解凍します
# 引数となる連想配列を用意します。
my %data = ('Zipfile'   => 'sample.zip', # 解凍するファイル名を指定
            'OutputDir' => 'sample',     # 解凍先のディレクトリ名を指定
           );

# 解凍
UnZip(\%data);

依存するモジュール

・Archive::Zip

ライセンス

Creative Commons License
この作品は、 クリエイティブ・コモンズ・ライセンスの下でライセンスされています。

お世話になったサイト様

:: Cepheid :: - Archive-ZipでファイルをZipに圧縮する
Archive::Zip - ZIPファイルの解凍