私は DVWA をインストールし、チャレンジを試してみました (すべてのデータベース/構成が正しく行われています)。localhost のログイン資格情報は admin:password です。これらは、手動でログインしようとしているときに機能します。
ブルートフォース ログイン チャレンジをブルートフォースする perl スクリプトを書きたいのですが、そのページにアクセスできません。
次のコードを使用して login.php にログインしますが、機能しません。私はMechanizeを使用しています(以前はUserAgent pmを使用していましたが失敗したため、無限のGoogle検索の後にこれに移動しました)
1 #! /usr/bin/perl
2
3 use WWW::Mechanize ;
4
5 my $mech = WWW::Mechanize->new(autocheck =>1);
6 $mech->credentials('admin'=>'password');
7 $mech->get('http://localhost/dvwa/login.php');
8 print $mech->content();
8 行目は、ログイン ページの内容を出力します。私のコードの何が問題なのですか?また、メイン ページにアクセスするにはどうすればよいですか? ログイン後に手動でリダイレクトする必要がありますか??