perl cgi 302错误 页面跳转

zfwslf

1. #!/usr/bin/perl
   
2. use CGI qw(:all);
   
3. $|=1;
   
4. print "Content-type:text/html\n\n";
   
5. my $url = 'http://www.baidu.com'
   
6. print redirect($url) ;
   

复制代码

redirect 不能实现页面跳转
error：
Status: 302 Moved Location: http://www.baidu.com


print   "location=http://somewhere.com ";
我也用过 还是不能 不过就没有报302错误

请问用perl怎样实现页面自动跳转啊 有可以实现的方法吗？

首天

用Location的话前面不能有print "Content-type:text/html\n\n";
也就是说print Location是输出的第一条信息，这种跳转我用过

zfwslf

回复 2# 首天


    那能不能把location放在最后 切可以调整的方法啊  以为我前面有很多代码要实现的。。。

首天

我不知道你想要的效果是怎么样的
如果需要显示完页面，并且要触发一个事件后跳转另一个页面，不考虑安全的话可以使用js来实现
<script language="JavaScript" type="text/JavaScript">
window.location='跳转网址
</script>
如果是需要显示页面，定时跳转，可以使用<meta http-equiv="refresh" content="3; url=跳转网址">
跳转的实现有很多，可以上baidu，google搜索一下看看