如何使用WWW :: Mechanize選擇隨機列表框項目？

Question

使用Perl的WWW::Mechanize模塊，我想從選擇框中選擇一個隨機值。我怎樣才能做到這一點？與dump_forms我可以轉儲選擇框的值，但我怎麼能讓他們在一個數組？

Answer 1

WWW::Mechanize使用HTML::Form來處理表格。您可以使用form_name或form_number方法獲取HTML :: Form對象。所以，使用這樣的東西：

my $form = $mech->form_number(1); 
my $select = $form->find_input('name_of_select_box'); 
my @values = $select->possible_values; 
$select->value($values[int rand @values]); # Choose a possible value at random