# Add a file if it's not exsits in the zip Archive
$zip->addFile($someFile, $someName) unless $zip->memberNamed($someName);

##</code><code>##

if ($File::Find::name =~ m/\.txt$/i){
   my $zipped = $zip->addFile( $File::Find::name );
}