Não sei se entendi direito, mas vc poderia fazer algo assim:<br><br><code><br>@tags = $descricoes[$x] =~ /(<.+?>)/gm;<br>$descricoes[$x] =~ s/(<.+?>)//gm;<br></code><br><br><div><span class="gmail_quote">
Em 17/04/07, <b class="gmail_sendername">Daniel Projetos</b> <<a href="mailto:daniel_projetos2003@yahoo.com.br">daniel_projetos2003@yahoo.com.br</a>> escreveu:</span><blockquote class="gmail_quote" style="border-left: 1px solid rgb(204, 204, 204); margin: 0pt 0pt 0pt 0.8ex; padding-left: 1ex;">
Opa!<br><br>Um olá para todos da lista, snift... não tive boas vindas calorosas hehehehe<br>e já estou na lista a mais de 1 mês só de olho! Meu nome é Daniel Bunduki,<br>programa Perl para uso na web mesmo e estou com a seguinte dúvida:
<br><br>Estou usando: $descricoes[$x] =~ s/<([^>]|\n)*>//g;<br>Isso faz com que todas as tags em HTML sejam TIRADAS da minha variável<br>(lista simples).<br><br>Gostaria de antes disto, como se trata apenas de um tag: <img src=/xxx ...
<br>... ... >.<br>Coloca-lá em outra variável.<br><br>Resumindo, uma expressão regular onde consiga tirar apenas a TAG HTML para<br>outra variável...<br><br>abraços,<br><br>Daniel Bunduki<br><br><br><br>_______________________________________________________
<br>Yahoo! Mail - Sempre a melhor opção para você!<br>Experimente já e veja as novidades.<br><a href="http://br.yahoo.com/mailbeta/tudonovo/">http://br.yahoo.com/mailbeta/tudonovo/</a><br><br><br>_______________________________________________
<br>SaoPaulo-pm mailing list<br><a href="mailto:SaoPaulo-pm@pm.org">SaoPaulo-pm@pm.org</a><br><a href="http://mail.pm.org/mailman/listinfo/saopaulo-pm">http://mail.pm.org/mailman/listinfo/saopaulo-pm</a><br></blockquote></div>
<br><br clear="all"><br>-- <br>[]'s Fernando