0

LWPを介してWay2smsにログインしようとしています。このページのソースコードによると、ログインフォーム(この場合、本文内のすべてのルートノードのように見えます)にはアクション属性があります''。これは、他のStackoverflowの投稿で読んだもので、次のURLを指しています。そのフォームを含むページ。モバイルフィールドとパスワードフィールドのname属性はソースコードから入手できるので、これを試しました。

use URI;
use HTML::TreeBuilder;
use LWP;
open f, "> way2sms.txt";
$browser = LWP::UserAgent->new(agent=>'Mozilla/4.76 [en] (Windows NT 5.0; U)');
$resp = $browser->post("http://site2.way2sms.com/content/index.html",[username=>$username,password=>$password]);
if ( $resp->is_redirect ) {
    $resp = $browser->get( $resp->header('Location') );
}

print f $resp->content;
close f;

正しい電話番号とパスワードを使用して、送信はパーソナライズされたページを返す必要があります。このページには、Welcome、KaustavMukherjeeなどのメッセージが含まれています。当然のことながら、コードは5を出力することを期待しています。ただし、Loggedは成功を示すために出力されますが、5は出力されず、ログインが失敗したことを示します。どうやってするの?(使用を提案しないでくださいMechanize!)

4

1 に答える 1

1
于 2012-08-25T18:42:47.237 に答える