如何读取由新行分隔的正则表达式

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;