<div dir="ltr">Você pode fazer regexes com m/ regexp aqui / .<br><br>Também pode com m{ .... } , m@ ..... @ , m( .... ) , etc..<br><br>Mas se você tá usando m/ ..... / , o que acontece quando tem mais um "/" no meio da regex ? O perl vai achar que a regexp acabou ali. Então, ou usa-se outros delimitadores, ou se escapa a "/", com uma "\", pra ele não achar que a "/" terminou a regexp:<br>
<br>m/<a href="http:\/\/(.+?)"/sig<br><br>ou<br><br>
m{<a href="http://(.+?)"}sig<br><br>ou até mesmo <br><br>m;<a href="http://(.+?)";sig # se você tá participando de um concurso de código ofuscado :-)<br><br>[]s<br>Wendel<br><br><div class="gmail_quote">
2008/9/19 Daniel de Oliveira Mantovani <span dir="ltr"><<a href="mailto:daniel.oliveira.mantovani@gmail.com">daniel.oliveira.mantovani@gmail.com</a>></span><br><blockquote class="gmail_quote" style="border-left: 1px solid rgb(204, 204, 204); margin: 0pt 0pt 0pt 0.8ex; padding-left: 1ex;">
<div dir="ltr"><div class="Ih2E3d">while($string =~ m/< a href="http://(.+?)"/sig){<br>
print "\n".$1; #Agora vou pegar todos!<br>
}<br><br></div><br></div></blockquote></div><br></div>