my $zip = new Archive::Zip;
$zip->read('Filename.zip');
# ..obviously you have this already.

my @memberNames = $zip->memberNames;
# @memberNames is now a list of the files in the zip Archive.