我需要从文本文件中解析 HTTP 标头中的用户代理,以确定浏览器、版本、操作系统和可能的设备。这些行的例子很少:
User-Agent: Mozilla/4.0 (compatible; MSIE 6.0; Update a; AOL 6.0; Windows 98)
User-Agent: Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.1; SV1; Crazy Browser 2.0.0 Beta 1; .NET CLR 1.0.3705; .NET CLR 1.1.4322)
User-Agent: Mozilla/5.0 (Macintosh; U; Intel Mac OS X 10_6_2; de-de) AppleWebKit/531.21.8 (KHTML, like Gecko) Version/4.0.4 Safari/531.21.10
User-Agent: Mozilla/4.0 (compatible; MSIE 5.0; Windows 95) Opera 6.01 [en]
由于这些字符串种类繁多,我认为使用有人提供的经过验证且可靠的解析器会是一个更好的主意。我确实在 PHP 或 java 中找到了一些,但似乎没有为 Perl 找到一个。
有人可以告诉我任何这样的模块吗?