Tag Zoominfobot as a robot

nigelhorne · Mar 4, 2024 · 66ffac6 · 66ffac6
1 parent 6286be1
commit 66ffac6
Show file tree

Hide file tree

Showing 2 changed files with 3 additions and 2 deletions.
diff --git a/Changes b/Changes
@@ -4,7 +4,7 @@ Revision history for CGI-Info
 	Use Test::Needs
 	Added t/version.t
 	Added t/tabs.t
-	Mark ias_crawler as a robot
+	Mark ias_crawler and ZoominfoBot as robots
 
 0.80	Fri Jan 19 08:05:29 EST 2024
 	Added documentroot() as a synonym to rootdir()

diff --git a/lib/CGI/Info.pm b/lib/CGI/Info.pm
@@ -1401,7 +1401,7 @@ sub is_robot {
 		}
 		return 1;
 	}
-	if($agent =~ /.+bot|bytespider|msnptc|is_archiver|backstreet|spider|scoutjet|gingersoftware|heritrix|dodnetdotcom|yandex|nutch|ezooms|plukkie|nova\.6scan\.com|Twitterbot|adscanner|python-requests|Mediatoolkitbot|NetcraftSurveyAgent|Expanse|serpstatbot|DreamHost SiteMonitor|techiaith.cymru|ias_crawler/i) {
+	if($agent =~ /.+bot|bytespider|msnptc|is_archiver|backstreet|spider|scoutjet|gingersoftware|heritrix|dodnetdotcom|yandex|nutch|ezooms|plukkie|nova\.6scan\.com|Twitterbot|adscanner|python-requests|Mediatoolkitbot|NetcraftSurveyAgent|Expanse|serpstatbot|DreamHost SiteMonitor|techiaith.cymru|ias_crawler|ZoominfoBot/i) {
 		$self->{is_robot} = 1;
 		return 1;
 	}
@@ -1555,6 +1555,7 @@ sub is_search_engine {
 	# Don't use HTTP_USER_AGENT to detect more than we really have to since
 	# that is easily spoofed
 	if($agent =~ /www\.majestic12\.co\.uk|facebookexternal/) {
+		# Mark Facebook as a search engine, not a robot
 		if($self->{cache}) {
 			$self->{cache}->set($key, 'search', '1 day');
 		}