新手求助抓網(wǎng)頁(yè)問題，感覺好難，第一次碰到。

yanglc2013

如上圖，我要抓取上面紅色矩形區(qū)域的內(nèi)容，該如何做。
http://www.lncipedia.org/db/transcript/lnc-ARL6IP4-1:1

py

我告訴你該怎么做。

你先隨便找個(gè)搜索引擎，然后輸入“perl+抓網(wǎng)頁(yè)”，之后把結(jié)果點(diǎn)開看看，然后試試，最后就做出來了。

天堂余韻

1. use strict;
   
2. use warnings;
   
3. use LWP::Simple;
   
4. 
   
5. my $text = get("http://www.lncipedia.org/db/transcript/lnc-ARL6IP4-1:1");
   
6. 
   
7. my $location = $text =~ /rel="shadowbox">(.*?)<\/a><br \/>/ ? $1 : "";
   
8. my $sources  = $text =~ /Sources:<\/span> (.*?)<br \/>/? $1 : "";
   
9. my $RNA      = $text =~ />(.*?)<\/textarea>/? $1 : "";
   
10. 
    
11. print "$location\n$sources\n$RNA\n";

復(fù)制代碼

發(fā)現(xiàn)lz發(fā)的帖子都很好玩

ackor

三樓方法可行，V5