#!/usr/bin/perl use CGI ':standard'; if (remote_addr()=~/^84\.53\.199\./) { print redirect("http://sait.com/news/"); } else { print redirect("http://http://sait.com/index.php"); }