foreach my $item (@theseContents) {
      if (!($item =~ /\.zip$/)) {
           if (!($item =~ /^\./)) {
               my $temp = $thisDirectory.$item;
               if (-d $temp) {
                   .......
               }
           }
      }
}