June 26, 2007 11:21 AM
CGI
携帯各社振り分けについて
CGIで、
#! /usr/local/bin/perl
#
#
$agent = $ENV{'HTTP_USER_AGENT'};
if($agent =~ /DoCoMo/) #iモード
{ print "Location: http://www.xxxxxxxxxxx.html\n\n";}
elsif($agent =~ /UP\.Browser/) #au
{ print "Location: http://www. xxxxxxxxxxx.html\n\n";}
elsif($agent =~ /J-PHONE/) #J-Phone
{ print "Location: http://www. xxxxxxxxxxx.html\n\n";}
else #PC
{ print "Location: http://www. xxxxxxxxxxx html\n\n";}
これで振り分けて表示されます。
