Select Code to Download

my $zip = Archive::Zip->new('somefile.zip');

Archive::Zip::tempName( [$tmpdir] ) 
Create a unique name for a temp file, in the given directory or in the
+ first one of:
...
    /tmp
    $ENV{TMPDIR}
    $ENV{TEMP}

my $member = "/home/name/www/images/sunset.png";

my $zip = Archive::Zip->new('newfile.zip');
$zip->addMember( $member );