|
|
ru.cgi.perl- RU.CGI.PERL ------------------------------------------------------------------ From : Igor Bondarenko 2:5020/400 29 Dec 2001 13:26:08 To : atmosphere Subject : Re: browser check +CGI -------------------------------------------------------------------------------- atmosphere wrote: > > Здрасте! > > По логике вещей быстрее опрелить тип браузера и отослать юзера на > соответств. страницу будет через CGI чем через Java > Если есть, бросте ссылочку на программу соответствующую чтоб там инструкции > по настройке были тоже > > Заранее огромное спасибо! Если я правильно понял, то тебе надо следующее: - --- begin --- #!/usr/bin/perl -w use CGI qw(:all); use strict; my($browser, $tearget); $browser = user_agent; $target = "http://www.server.com/generic.html"; if ($browser =~ /Mozila/ and $browser =~ /Win/) { $target = "http://www.server.com/netscape.html"; } print redirect( -uri => $target ); - --- end --- -- Best regards, Igor Bondarenko nic-handle: IB2985-RIPE e-mail: ib@igor.com.ua http://www.igor.kiev.ua * Половина моя - половина наша. (c) Двенандцать стульев. --- ifmail v.2.15dev5 * Origin: - (2:5020/400) Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
Архивное /ru.cgi.perl/6318317e1511.html, оценка из 5, голосов 10
|