2010-10-01 14 views
5

J'ai besoin pour analyser les agents utilisateurs dans les en-têtes HTTP à partir d'un fichier texte afin de déterminer le navigateur, la version, le système d'exploitation et peut-être l'appareil. si peu d'exemples de ces lignes sont:Comment puis-je analyser les chaînes d'agent utilisateur en Perl?

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] 

En raison de la variété pure de ces chaînes je me suis dit que ce serait une meilleure idée d'utiliser un analyseur éprouvée et fiable que quelqu'un a mis à disposition. J'ai trouvé quelques uns en PHP ou java mais ne semble pas en trouver un pour Perl.

Quelqu'un peut-il me dire sur un tel module?

Répondre

1

Chaque fois que vous besoin de quelque chose en Perl, essayez CPAN Search. La recherche de user agent montre dans la première page des résultats plusieurs modules que vous pourriez utiliser.