请教正则表达式

Vic_Yu

有一个txt文件里面含有如下的段落:
.......
.......
.......

aaaaaaaaaabbbbbbbvvvvvvv

http://www.sina.com.cn

11111113333366666667777

.........
.........
.........

我如何取到这个段落中的"http://www.sina.com.cn"这部分呢，希望指导!!

alexru

1. 
   
2. while(<>)
   
3. {
   
4. print if /^http/;
   
5. }
   

复制代码

hotsnow

命令行下做：

$ perl -ne 'print if /^http/' file_name.txt