如何设定重定向页面的时间

如何设定重定向页面的时间

如何设定重定向页面的时间
使用CGI.pm模块的函数模式时的写法是:
print redirecte("http://www.alfret.com/register.cgi");
如果是使用面向对象编程模式应该怎样写,和怎样设定在N秒后再跳转到另一页面??
1. --my $q = new CGI;<.
1.
my $q = new CGI;
print $q->redirecte("http://www.alfret.com/register.cgi");

2.
N秒后跳转是不是在CGI里设定的,是在输出的HTML的头部里,象这样
<head>
<META http-equiv=Refresh content="5; url=http://www.csdn.net/">
<title>
跳啊跳啊
</title>
</head>
在 -meta 里设定就可以。<.
在 -meta 里设定就可以。

print header;
print start_html(-head=>meta({-http_equiv => 'refresh',
-content => '5; url=http://www.google.com/'}));

仔细看看 CGI 的文档。