WWW :: Mechanizeテキストフィールド問題

Question

WWW::Mechanize perlモジュールを使用して、ポストメソッドでフォームを送信しようとしています。

use WWW::Mechanize; 

my $mech = WWW::Mechanize->new(); 
... 
$mech->get($url); 
... 
my $response = $mech->submit_form(
     form_name => $name, 
     fields => { 
         $field_name => $field_value 
         }, 
     button => 'Button' 
    ); 

$field_name

（タイプがフォームで明示的に指定されていないが）一般的に予め設定された値を有し、テキストフィールドを話しています。何らかの理由で$mech->submit_formで

$field_name => $field_value代わり$field_valueが元の値の後にフォームに追加され、値を置き換えるものではありません：提出する形で{provided_value}で{original_value}を交換する方法

{submitted_field_value} = {original_value},{provided_value} 

？

Answer 1

私は自分の意志でそれを動作させることができました。ありがとうTimbusとあなたの提案のためのknb。私の場合は完全に一般的ではないかもしれませんが（私はプリセット値を知っています）、私は見つけたものを共有したいと思います（トレイルでは&のエラー）。

my $mech = WWW::Mechanize->new(); 
$mech->get($url); 
$mech->form_name($name); 

my $fields = $mech->form_name($name); 
foreach my $k (@{$fields->{inputs}}){ 
if ($k->{value} eq $default_value){ 
    $k->{value}=$field_value; 
    } 
} 

my $response = $mech->click('Button_name'); 

Answer 2

WWW :: Mechanizeは、あなたのためにHTTPリクエストのすべての厄介な部分だけを処理するLWPやcurlとは対照的に、「ヘッドレスブラウザ」と考えられることを覚えておくことが重要です。 Mechは、あなたが物事をすると、その状態を維持します。

$mech->formsまたはそれに類するもの（its best to decide from the documentation. I mean there so many ways to do it.）を使用してフォームを入手し、field methodsを使用して変更する入力フィールドを設定する必要があります。

私はこれを行うための基本的な方法はように出てくると思います：

$mech->form_name($name); 
$mech->field($field_name, $field_value); 
my $response = $mech->click('Button'); 

は動作するはずです。フィールドを取得して直接使用するとうまくいくと思います（つまり、my $field = $mech->form_name($name);は$ mechの代わりに$ fieldメソッドを使用します）

Answer 3

$ mech-> submit_formを呼び出す前にこの行をコードに追加するとどうなりますか（）：

$mech->field($name, [$field_value], 1); 

これは、それがすでに存在する場合、最初の値が追加、または上書きされていることを確認します （または位置インデックス）番号パラメータである

は、WWWのドキュメントを参照してください。： ：メカ：

$ mech->フィールド（$名、\ @values、$番号）

フィールドの名前を指定すると、指定した値にその値を設定します。 [...]

オプションの$ numberパラメータは、同じ名前の2つのフィールドを区別するために使用されます。フィールドは1から番号が付けられます。