my $zipCheck=grep /\.zip\z/,@uploads;
unless($zipCheck) {
  ... exit(0);
}