2017-11-03 8 views
0

私はwebpageにAngularJSを使ってユーザー名フィールドとパスワードフィールドを持つフォームを表示し、HTMLには何も要素もないフォームを表示できます。次のページは、簡単に自動化できるシンプルなHTMLフォーム、2つのフィールドセット、ダウンロードボタンです。WWW :: Mechanizeを使ってPerlでAngularJSログインフォームを自動化することはできますか?

私はWWW :: Mechanizeを使ってフォームを自動化する方法を知っていますが、私はログイン時に悩んでいます。私はこれを行うためのいくつかのpythonの方法を見たが、私はpythonistではなく、Perlを好む。

WWW:機械化できますか?その他のCPANモジュール?

+1

[Mechanizeのように仕事をモジュールとJavaScriptをサポートしている?](http://p3rl.org/WWW::Mechanize::FAQ#Which-modules-work-like-Mechanize-and-have-JavaScript -support%3f) – daxim

+0

これを回答としてさらに投稿すると、私はそれを受け入れることができます。 –

+0

私は他の人から同様の回答を受け付けません。私は自分自身に答える前に48時間待つでしょう。 –

答えて

0

ここにあります。ログインとパスワードを変更して、あなたが持っているものを貼り付けてください。 APIからtokenIdを取得し、このトークンを承認に使用する必要があります。

use LWP::UserAgent; 
my $ua = LWP::UserAgent->new(); 

my $login = 'lucky'; 
my $password = 'secretpassword'; 

$ua->default_header('Accept' => 'application/json, text/plain, */*'); 
$ua->default_header('Content-Type' => 'application/json;charset=UTF-8'); 
$ua->default_header('Accept-Encoding' => 'gzip, deflate, br'); 
$ua->default_header('Accept-Language' => 'pl-PL,pl;q=0.9,en-US;q=0.8,en;q=0.7'); 
$ua->default_header('Connection' => 'keep-alive'); 
$ua->default_header('Orgin' => 'https://www.ooredoo.qa'); 
$ua->default_header('Referer' => 'https://www.ooredoo.qa/selfcare/'); 
$ua->default_header('Content-Type' => 'application/json;charset=UTF-8'); 
$ua->default_header('User-Agent' => 'Mozilla/5.0 (X11; Linux x86_64) AppleWebKit/537.36 (KHTML, like Gecko) Chrome/41.0.2227.0 Safari/537.36'); 
my $content = '{"operation":"Login","language":"ENGLISH","parameters":["'.$login.'","'.$password.'"]}'; 
my $res = $ua->post('https://www.ooredoo.qa/webgate/login', Content => $content); 
print $res->decoded_content; 
関連する問題