首页 诗词 字典 板报 句子 名言 友答 励志 学校 网站地图
当前位置: 首页 > 教程频道 > 开发语言 > perl python >

一个超级难的有关问题,perl请求不到要请求的页面

2012-03-08 
一个超级难的问题,perl请求不到要请求的页面,高手请进一个网站通常会有一个主页,假设是www.mmic.com.然后

一个超级难的问题,perl请求不到要请求的页面,高手请进
一个网站通常会有一个主页,假设是www.mmic.com.
然后这个网站下的某个链接地址为www.mmic.com/sf/domain/too.php.假如你把这个地址用邮件发送给某人,当在邮件里第一次点击这个链接时。那么会有一个windows的弹出框要求你输入用户名和密码,输入之后,页面会自动跳转到主页,也就是www.mmic.com。不要关掉浏览器,再到邮件里点一次这个链接,这次就不会再要求你输入用户名和密码,会直接到这个页面。
现在我想用perl来请求这个页面,代码如下
uaSF   =   LWP::UserAgent-> new;

$uaSF-> cookie_jar(HTTP::Cookies-> new(file   =>   "lycookiesSF.txt ",   autosave   =>   1,   ignore_discard   =>   1));

$uaSF-> credentials( "mmic.com:443 ",   "EOOE ",   'username ',   'password ')   ;

  my   $req   =   GET   "https://www.mmic.com/sf/domain/too.php ";
    $res   =   $uaSF-> request($req);
$req   =   GET   "https://www.mmic.com/sf/domain/too.php ";
$res   =   $uaSF-> request($req);

我第一次请求的时候,毫无疑问会跳转到www.mmic.com去,于是我再请求一次,可是我还是只能得到www.mmic.com这个页面,按道理这个时候应该直接得到我要的页面才对啊。
那位高手知道这是为什么,应该怎么修改啊,多谢了


[解决办法]
呵呵,use Crypt::SSLeay;
[解决办法]
貌似HTTP Basic authentication + https ?
看rfc 2617
基本就是把http请求的头部
设为
Authorization: Basic <base64 encoding of user+ ": "+passwd>

热点排行