#!/usr/bin/perl -w

use strict; 
use CGI qw(:all); 
my $antimolot="http://www.mashina-vremeni.com/phpBB2/wap/wap.php"; 
print redirect(-uri=>$antimolot);