Help for this page

Select Code to Download

Select or download this

use strict; use warnings; use autodie;
use Archive::Tar;

...
my $pack = Archive::Tar->new;
$pack->create_archive('Bundle-FinalTest.tgz', COMPRESS_GZIP, @filelist
+);
closedir $dir;