這篇文章主要介紹了怎么用Perl抓取網(wǎng)頁和提交表格，具有一定借鑒價值，感興趣的朋友可以參考下，希望大家閱讀完這篇文章之后大有收獲，下面讓小編帶著大家一起了解一下。

創(chuàng)新互聯(lián)是一家專注于網(wǎng)站建設、成都網(wǎng)站設計與策劃設計,長嶺網(wǎng)站建設哪家好?創(chuàng)新互聯(lián)做網(wǎng)站,專注于網(wǎng)站建設10余年,網(wǎng)設計領域的專業(yè)建站公司;建站業(yè)務涵蓋:長嶺等地區(qū)。長嶺做網(wǎng)站價格咨詢:028-86922220

用Perl抓取網(wǎng)頁和提交表格

這里簡單介紹一下用Perl來實現(xiàn)抓好取網(wǎng)頁的源代碼，以及用POST的方法來提交表格，并返回結果。難的講不來，講講簡單的。

這里講到的Perl模塊有：

useLWP::Simple;useLWP::UserAgent;用Perldoc查看詳細的用法。

1，用Perl抓取網(wǎng)頁

如果只是要拿到某個網(wǎng)頁，那使用LWP::Simple里的函數(shù)是最簡單的。通過調用get($url)函數(shù)，就可以得到相關網(wǎng)址的內容。

my$url='http://freshair.npr.org/dayFA.cfm?todayDate=current'  useLWP::Simple;  my$content=get$url;  die"Couldn'tget$url"unlessdefined$content;

#$content里是網(wǎng)頁內容，下面是對此內容作些分析：

if($content=~m/jazz/i){  print"They'retalkingaboutjazztodayonFreshAir!\n";  }else{  print"FreshAirisapparentlyjazzlesstoday.\n";  }

非常簡單易懂。拿網(wǎng)頁內容是容易的，難的是用正則過濾需要的內容。

2，通過POST提交表格

部分HTML表格使用HTMLPOST向content就是返回結果。

感謝你能夠認真閱讀完這篇文章，希望小編分享的“怎么用Perl抓取網(wǎng)頁和提交表格”這篇文章對大家有幫助，同時也希望大家多多支持創(chuàng)新互聯(lián)，關注創(chuàng)新互聯(lián)行業(yè)資訊頻道，更多相關知識等著你來學習!