foreach $file (<*.zip>) {
  next if $file =~ /blahblah/;
  # continue with filetype- and time-checking and 
  # deletion...
  unless (-d $file) { # no dirs
    # use stat($file)[9] which is mtime in seconds, I 
    # think, or use the -M filetest which gives days
    # to find out whether to delete or not...
  }
}