新手求助抓网页问题，感觉好难，第一次碰到。

yanglc2013

如上图，我要抓取上面红色矩形区域的内容，该如何做。
http://www.lncipedia.org/db/transcript/lnc-ARL6IP4-1:1

py

我告诉你该怎么做。

你先随便找个搜索引擎，然后输入“perl+抓网页”，之后把结果点开看看，然后试试，最后就做出来了。

天堂余韵

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";

复制代码

发现lz发的帖子都很好玩

ackor

三楼方法可行，V5