如何讀取由新行分隔的正則表達式

Question

如何讀取在Perl中使用正則表達式分成兩行的URL？

[REQ-URL]: http://hostname:8080/guiderest? 
customerId=cisco&code=news&guide=MostPopular&attrFilter=BlogFlag:true&v=1 

Answer 1

my ($url) = $text =~ /(http [\S\r\n]+)/x; 
$url =~ tr|\r\n||d;