English 中文(简体)
在Perl中测试重定向
原标题:Testing for redirects in Perl

我希望使用Perl检查网页重定向。我尝试过使用LWP,但它只捕获503个重定向,而没有捕获htaccess重定向或Javascript重定向。如有任何帮助,我们将不胜感激。

谢谢

问题回答

LWP默认为GET和HEAD处理3xx重定向(我认为您正在调用这些htaccess重定向),但您可以通过设置requests_redirectable选项,或者通过子类化LWP并捕获requests_ok回调,或者通过调用simple_request而不是request来修改这一点。

对于javascript重定向,您需要处理javascript;我不确定目前最好的方法是什么,但有办法做到这一点。

您可能还想检查元标记刷新重定向。

或者查看WWW::机械化测试:WWW::机械化。例如,你可以说关注某个链接或单击某个按钮。然后你只需检查响应状态代码是否匹配qr/3dd/





相关问题
Why does my chdir to a filehandle not work in Perl?

When I try a "chdir" with a filehandle as argument, "chdir" returns 0 and a pwd returns still the same directory. Should that be so? I tried this, because in the documentation to chdir I found: "...

How do I use GetOptions to get the default argument?

I ve read the doc for GetOptions but I can t seem to find what I need... (maybe I am blind) What I want to do is to parse command line like this myperlscript.pl -mode [sth] [inputfile] I can use ...

Object-Oriented Perl constructor syntax and named parameters

I m a little confused about what is going on in Perl constructors. I found these two examples perldoc perlbot. package Foo; #In Perl, the constructor is just a subroutine called new. sub new { #I ...

Where can I find object-oriented Perl tutorials? [closed]

A Google search yields a number of results - but which ones are the best? The Perl site appears to contain two - perlboot and perltoot. I m reading these now, but what else is out there? Note: I ve ...

热门标签