Como você executou o seu programa?<br><br>input.xml:<br><project><br><release>1.1</release><br><something/><br></project><br><br>teste.pl:<br>#!/usr/bin/perl<br><br>$^I = ".bak";<br>
<br>while(<>) {<br> s/SNAPSHOT/1.1/;<br> print;<br>}<br><br>como executar:<br><br>$ perl teste.pl input.xml<br><br>saída:<br><br>$ ls input.xml*<br>input.xml input.xml.bak<br>$ cat input.xml<br><project>
<br><release>1.1</release><br><something/><br></project><br><br><div><span class="gmail_quote">Em 27/07/06, <b class="gmail_sendername">Paola Montini</b> <<a href="mailto:PMontini@ymf.com.br">PMontini@ymf.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;"><div>
<div>
<div><span><font color="#0000ff" face="Palatino Linotype" size="2">Desculpe Igor, mas a sua solução não está funcionando nessa
linha</font></span></div>
<div><span> s/SNAPSHOT/1.1/ if
/SNAPSHOT/;.</span></div>
<div><span></span> </div>
<div><span><font color="#0000ff" face="Palatino Linotype" size="2">Att</font></span></div></div><div><span class="q">
<div> </div>
<p><font color="#000080" face="Wingdings" size="2">b</font><font color="#000080" face="Palatino Linotype" size="2">Paola Montini</font> <br><font color="#000080" face="Palatino Linotype" size="2">YMF-Consultoria</font> <br>
<font color="#000080" face="Palatino Linotype" size="2">Fone: 5010-9220</font> </p>
</span></div><div><blockquote>
<div dir="ltr" align="left"><font face="Tahoma" size="2">-----Mensagem original-----<br><b>De:</b>
cascavel-pm-bounces+pmontini=<a href="mailto:ymf.com.br@pm.org" target="_blank" onclick="return top.js.OpenExtLink(window,event,this)">ymf.com.br@pm.org</a>
[mailto:<a href="mailto:cascavel-pm-bounces+pmontini=ymf.com.br@pm.org" target="_blank" onclick="return top.js.OpenExtLink(window,event,this)">cascavel-pm-bounces+pmontini=ymf.com.br@pm.org</a>]<b>Em nome de </b>Igor
Sutton<br><b>Enviada em:</b> quinta-feira, 27 de julho de 2006
14:05<br><b>Para:</b> Cascavel Perl Mongers<br><b>Assunto:</b> Re:
[Cascavel-pm]RES: RES: RES: Substituição de string e gravação no
arquivo<br><br></font></div></blockquote></div><div><span class="e" id="q_10cb0fe4e0e8ed46_3">No exemplo que o Nelson postou ( e no meu também )
isso não acontece. Dê uma olhada, pois o que você precisa está lá.<br><br>
<div><span class="gmail_quote">Em 27/07/06, <b class="gmail_sendername">Paola
Montini</b> <<a href="mailto:PMontini@ymf.com.br" target="_blank" onclick="return top.js.OpenExtLink(window,event,this)">
PMontini@ymf.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;">Meleca
falei rápido demais....<br>o que esta acontecendo é que ele está colocando
uma linha a mais no meu arquivo vejam: <br><br><projeto>Amplis
</projeto><br><artefato>ymf-utils</artefato><br><versao>SNAPSHOT</versao><br><versao>Beta2006.1.2</versao><br><br><br>#!/usr/bin/perl<br>$local
=" arquivoxml.xml";<br>open(ARQXML,"+<$local");<br>@texto =
<ARQXML>;<br>$nome = SNAPSHOT;<br>foreach $matriz
(@texto)<br> {<br> if ($matriz =~
/$nome/)<br> {<br>
$matriz =~ s/$nome/Beta2006.1.2/g;
<br> print ARQXML $matriz
;<br> }<br>}<br><br><br><br>*Paola
Montini<br>YMF-Consultoria<br>Fone: 5010-9220<br><br><br>-----Mensagem
original-----<br>De: cascavel-pm-bounces+pmontini=<a href="mailto:ymf.com.br@pm.org" target="_blank" onclick="return top.js.OpenExtLink(window,event,this)"> ymf.com.br@pm.org</a><br>[mailto:<a href="mailto:cascavel-pm-bounces+pmontini=ymf.com.br@pm.org" target="_blank" onclick="return top.js.OpenExtLink(window,event,this)">
cascavel-pm-bounces+pmontini=ymf.com.br@pm.org</a>]Em
nome de Paola<br>Montini<br>Enviada em: quinta-feira, 27 de julho de 2006
13:59 <br>Para: Cascavel Perl Mongers<br>Assunto: [Cascavel-pm] RES: RES:
Substituição de string e gravação no<br>arquivo<br><br><br>é isso nilson, o
erro era esse<br><br>*Paola Montini<br>YMF-Consultoria<br>Fone:
5010-9220<br><br><br>-----Mensagem original-----<br>De:
cascavel-pm-bounces+pmontini=<a href="mailto:ymf.com.br@pm.org" target="_blank" onclick="return top.js.OpenExtLink(window,event,this)">ymf.com.br@pm.org</a><br>[mailto:<a href="mailto:cascavel-pm-bounces+pmontini=ymf.com.br@pm.org" target="_blank" onclick="return top.js.OpenExtLink(window,event,this)">
cascavel-pm-bounces+pmontini=ymf.com.br@pm.org
</a>]Em nome de Nilson<br>Santos Figueiredo Junior<br>Enviada em:
quinta-feira, 27 de julho de 2006 13:55<br>Para: Cascavel Perl
Mongers<br>Assunto: Re: [Cascavel-pm]RES: Substituição de string e gravação
no<br>arquivo<br><br><br>On 7/27/06, Paola Montini <<a href="mailto:PMontini@ymf.com.br" target="_blank" onclick="return top.js.OpenExtLink(window,event,this)">PMontini@ymf.com.br</a>> wrote:<br>>
Missing right curly or square bracket at testexml.pl line 15, at end of
line<br>> syntax error at testexml.pl line 15, at EOF<br><br>Você tentou
olhar se existe algum erro próximo ao final da linha 15 do<br>arquivo
testexml.pl, aonde está faltando uma chave ou colchete
de<br>fechamento?<br><br>-Nilson Santos F.
Jr.<br>_______________________________________________ <br>Cascavel-pm
mailing list<br><a href="mailto:Cascavel-pm@pm.org" target="_blank" onclick="return top.js.OpenExtLink(window,event,this)">Cascavel-pm@pm.org</a><br><a href="http://mail.pm.org/mailman/listinfo/cascavel-pm" target="_blank" onclick="return top.js.OpenExtLink(window,event,this)">
http://mail.pm.org/mailman/listinfo/cascavel-pm</a><br>_______________________________________________
<br>Cascavel-pm mailing list<br><a href="mailto:Cascavel-pm@pm.org" target="_blank" onclick="return top.js.OpenExtLink(window,event,this)">Cascavel-pm@pm.org</a><br><a href="http://mail.pm.org/mailman/listinfo/cascavel-pm" target="_blank" onclick="return top.js.OpenExtLink(window,event,this)">
http://mail.pm.org/mailman/listinfo/cascavel-pm</a><br>_______________________________________________
<br>Cascavel-pm mailing list<br><a href="mailto:Cascavel-pm@pm.org" target="_blank" onclick="return top.js.OpenExtLink(window,event,this)">Cascavel-pm@pm.org</a><br><a href="http://mail.pm.org/mailman/listinfo/cascavel-pm" target="_blank" onclick="return top.js.OpenExtLink(window,event,this)">
http://mail.pm.org/mailman/listinfo/cascavel-pm</a><br></blockquote></div><br><br clear="all"><br>-- <br>Igor Sutton Lopes<br>t: +55 51 9627.0779<br>e: <a href="mailto:igor.sutton@gmail.com" target="_blank" onclick="return top.js.OpenExtLink(window,event,this)">
igor.sutton@gmail.com</a>
</span></div><div></div>
</div><br>_______________________________________________<br>Cascavel-pm mailing list<br><a onclick="return top.js.OpenExtLink(window,event,this)" href="mailto:Cascavel-pm@pm.org">Cascavel-pm@pm.org</a><br><a onclick="return top.js.OpenExtLink(window,event,this)" href="http://mail.pm.org/mailman/listinfo/cascavel-pm" target="_blank">
http://mail.pm.org/mailman/listinfo/cascavel-pm</a><br><br></blockquote></div><br><br clear="all"><br>-- <br>Igor Sutton Lopes<br>t: +55 51 9627.0779<br>e: <a href="mailto:igor.sutton@gmail.com">igor.sutton@gmail.com</a>