無法通過Perl的LWP :: UserAgent的

Question

檢查複選框我應該如何檢查這樣一個複選框：

<td><center><INPUT name="test2%40mydomain.com_notmetoo" type="CHECKBOX" value="off" ></center></td> 

Perl的LWP :: UserAgent的模塊？

此代碼不會這樣做（輸出就好像在提交時沒有勾選複選框 - 即網頁被刷新並且複選框被清除）。

#!/usr/bin/perl 
use LWP::UserAgent; 

$ua = new LWP::UserAgent; 
$ua->cookie_jar({ file => "$ENV{HOME}/.mailmanrc" }); 

$res = $ua->post('http://mydomain.com/mailman/admin/test1_mydomain.com/members/list', 
    Content_Type => 'form-data', 
    Content => [ 
     'test2%40mydomain.com_notmetoo' => 'on', 
     setmemberopts_btn => 'Submit Your Changes' 
    ] 
); 
if ($res->is_success) { 
    print $res->decoded_content; 
    print "Changed user setting...I hope!\n"; 
} 
else { 
    die $res->status_line; 
} 

我不知道爲什麼「@」用「％40」中的元素名稱代表，但我也嘗試過（任何想法？）： 「測試2 \％40mydomain.com_notmetoo '=>'on'， 和 'test2@mydomain.com_notmetoo'=>'on'， 沒有成功。

網站上似乎沒有JavaScript（即它在JavaScript禁用的瀏覽器中正常工作）。我無法讓它在Perl中工作。

謝謝。

特里。

---

更新＃1：這裏是POSTDATA值從Firefox的「篡改數據」擴展名，當我檢查的Test2的notmetoo框後提交：

POSTDATA =-----------------------------2921376274802 
Content-Disposition: form-data; name="findmember" 


-----------------------------2921376274802 
Content-Disposition: form-data; name="test1%40mydomain.com_realname" 

Test1 
-----------------------------2921376274802 
Content-Disposition: form-data; name="user" 

test1%40mydomain.com 
-----------------------------2921376274802 
Content-Disposition: form-data; name="test1%40mydomain.com_hide" 

on 
-----------------------------2921376274802 
Content-Disposition: form-data; name="test1%40mydomain.com_notmetoo" 

on 
-----------------------------2921376274802 
Content-Disposition: form-data; name="test1%40mydomain.com_plain" 

on 
-----------------------------2921376274802 
Content-Disposition: form-data; name="test1%40mydomain.com_language" 

en 
-----------------------------2921376274802 
Content-Disposition: form-data; name="test2%40mydomain.com_realname" 

Test2 
-----------------------------2921376274802 
Content-Disposition: form-data; name="user" 

test2%40mydomain.com 
-----------------------------2921376274802 
Content-Disposition: form-data; name="test2%40mydomain.com_hide" 

on 
-----------------------------2921376274802 
Content-Disposition: form-data; name="test2%40mydomain.com_notmetoo" 

off 
-----------------------------2921376274802 
Content-Disposition: form-data; name="test2%40mydomain.com_plain" 

on 
-----------------------------2921376274802 
Content-Disposition: form-data; name="test2%40mydomain.com_language" 

en 
-----------------------------2921376274802 
Content-Disposition: form-data; name="test3%40mydomain.com_realname" 

Test3 
-----------------------------2921376274802 
Content-Disposition: form-data; name="user" 

test3%40mydomain.com 
-----------------------------2921376274802 
Content-Disposition: form-data; name="test3%40mydomain.com_hide" 

on 
-----------------------------2921376274802 
Content-Disposition: form-data; name="test3%40mydomain.com_plain" 

on 
-----------------------------2921376274802 
Content-Disposition: form-data; name="test3%40mydomain.com_language" 

en 
-----------------------------2921376274802 
Content-Disposition: form-data; name="setmemberopts_btn" 

Submit Your Changes 
-----------------------------2921376274802 
Content-Disposition: form-data; name="allmodbit_val" 

0 
-----------------------------2921376274802-- 

這是否幫助任何人幫助我嗎？

Answer 1

我對複選框的理解是value=指定了複選框被選中時變量的值。所以，你的困惑value="off"實際上意味着大公你需要

'test2%40mydomain.com_notmetoo' => 'off' 

爲了表明選中該複選框。

Answer 2

在你的情況下，複選框的值將被選中「off」。如果價值類似於value="checkbox1"，這將不那麼令人困惑。在這種情況下，複選框的值將爲checkbox1。

而且，考慮使用WWW::Mechanize基本的網絡操作是這樣的（無javascript），它更容易和直觀，也WWW::Mechanize是LWP::UserAgent子類，所以你仍然可以使用LWP的方法。