Gambiarra V.1.0 :P<br><br>---------------------8&lt;---------------------<br>my $texto = &quot;Olá,\nmeu nome é José.&quot;;<br>$texto =~ s/$1// if $texto =~ /^.((.|\n)+?)\./; # Considera qualquer caractere incluindo newline e só vale até o 1o ponto final que aparecer :)
<br>print $texto; # O.<br>---------------------&gt;8---------------------<br><br>Abraços ;)<br><br><div><span class="gmail_quote">On 1/24/07, <b class="gmail_sendername">Lucas Zechim</b> &lt;<a href="mailto:lzechim@gmail.com">
lzechim@gmail.com</a>&gt; wrote:</span><blockquote class="gmail_quote" style="border-left: 1px solid rgb(204, 204, 204); margin: 0pt 0pt 0pt 0.8ex; padding-left: 1ex;">Bem que tentei, mais não consegui...<br><br>Qual a expressão regular para remover todos os caracteres entre o
<br>primeiro caractere e o ponto (.)?<br><br>input: lucas.zechim<br>output: lzechim<br><br>tks..<br>--<br>&nbsp;&nbsp;Lucas Zechim<br><a href="mailto:lzechim@gmail.com">lzechim@gmail.com</a><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>Gabriel Vieira