Select Code to Download

my $zip = Archive::Zip->new();
my $member = $zip->addFile( 'logfile.log' );
my $status = $zip->writeToFileNamed( 'dated_filename.zip' );
die "error somewhere" if $status != AZ_OK;

my $tempDate = getDate();
my $outfile = $tempDate . ".zip";
...
    $date = $mon . $day . $year;
    return $date;
}