Merge pull request #126 from bayashi/chatgpt-user

To detect ChatGPT-User

lib/Duadua.pm

@@ -34,6 +34,7 @@ my @PARSER_PROC_LIST = qw/
     Duadua::Parser::Bot::FacebookCrawler
     Duadua::Parser::Bot::Slackbot
 
+    Duadua::Parser::Bot::ChatGPTUser
     Duadua::Parser::Bot::YahooSlurp
     Duadua::Parser::Bot::Baiduspider
     Duadua::Parser::Bot::Bytespider

lib/Duadua/Parser/Bot/ChatGPTUser.pm

@@ -0,0 +1,55 @@
+package Duadua::Parser::Bot::ChatGPTUser;
+use strict;
+use warnings;
+
+sub try {
+    my ($class, $d) = @_;
+
+    if ( index($d->ua, 'ChatGPT-User/') > -1
+            && index($d->ua, '+https://openai.com/bot') > -1
+                && index($d->ua, 'Mozilla/') == 0 ) {
+        my $h = _set_property($d, 'ChatGPT-User');
+
+        if ($d->opt_version) {
+            my ($version) = ($d->ua =~ m!ChatGPT-User/([\d.]+)!);
+            $h->{version} = $version if $version;
+        }
+
+        return $h;
+    }
+}
+
+sub _set_property {
+    my ($d, $name) = @_;
+
+    my $h = {
+        name   => $name,
+        is_bot => 1,
+    };
+
+    return $h;
+}
+
+1;
+
+__END__
+
+=encoding UTF-8
+
+=head1 METHODS
+
+=head2 try
+
+Do parse
+
+
+=head1 AUTHOR
+
+Dai Okabayashi E<lt>[email protected]E<gt>
+
+
+=head1 LICENSE
+
+C<Duadua> is free software; you can redistribute it and/or modify it under the terms of the Artistic License 2.0. (Note that, unlike the Artistic License 1.0, version 2.0 is GPL compatible by itself, hence there is no benefit to having an Artistic 2.0 / GPL disjunction.) See the file LICENSE for details.
+
+=cut

t/testset/bot/chatgpt-user.yaml

@@ -0,0 +1,10 @@
+# https://platform.openai.com/docs/plugins/bot
+- ua: 'Mozilla/5.0 AppleWebKit/537.36 (KHTML, like Gecko); compatible; ChatGPT-User/1.0; +https://openai.com/bot'
+  name: ChatGPT-User
+  is_bot: true
+  is_ios: false
+  is_android: false
+  is_linux: false
+  is_windows: false
+  is_chromeos: false
+  version: '1.0'