抓取网页如何设置表单？

hztj2005

我要抓取 国家语言资源监测与研究中心平面媒体中心 的 网页，比如 搜素关键词是“西部开发”，然后点击“共时检索”，
我模仿其它网上代码设置  'keyword' 为"西部开发"，但不懂如何设置模拟点击“共时检索”？请懂得朋友指教。
网址是：dcc.blcu.edu.cn/main.action   这里不允许发完整网址。

1. #!/usr/bin/perl
   
2. 
   
3. use LWP::UserAgent;
   
4. 
   
5. my $browser = LWP::UserAgent->new;
   
6. $nowkey = "西部开发";
   
7. my $SUSUI_URL = "dcc.blcu.edu.cn/main.action";
   
8. my $response = $browser->post( $SUSUI_URL,    [ 'keyword' => $nowkey, ]  );
   
9. 
   
10. if ($response->is_success) {
    
11.         print $response->content;
    
12. } else {
    
13.         print "Error\n";
    
14. }

复制代码