Date: Thu, 31 Jan 2002 14:57:35 +0000 (UTC)
From: Konstantin Tokar <tokar@apmsun.mpei.ac.ru>
Newsgroups: fido7.ru.perl
Subject: Распознавание версии и типа браузера в CGI скрипте
> А как на Перле грамотно распознать браузер и его версию?
> Может у кого есть кусок кода, поделитесь пожалуйста.
Как всегда, в CPAN все есть:
HTTP::BrowserDetect - Determine the Web browser, version, and
platform from an HTTP user agent string
SYNOPSIS
use HTTP::BrowserDetect;
my $browser = new HTTP::BrowserDetect($user_agent_string);
# Detect operating system
if ($browser->windows) {
if ($browser->winnt) ...
if ($brorwser->win95) ...
}
print $browser->mac;
# Detect browser vendor and version
print $browser->netscape;
print $browser->ie;
if (browser->major(4)) {
if ($browser->minor() > .5) {
...
}
}
if ($browser->version() > 4) {
...;
}
# Process a different user agent string
$browser->user_agent($another_user_agent_string);
648 Прочтений • [Распознавание версии и типа браузера в CGI скрипте (cgi web perl)] [08.05.2012] [Комментариев: 0]
Vova
