perl -i -pe 's/\d{6,8}$//' nome_arq<br><br><div><span class="gmail_quote">Em 09/05/07, <b class="gmail_sendername"><a href="mailto:lgonzaga@lncc.br">lgonzaga@lncc.br</a></b> <<a href="mailto:lgonzaga@lncc.br">lgonzaga@lncc.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;">Esta ocorrendo pois você está colocando o "." antes
de TODOS os valores de $u.<br><br>Como você disse que
está começando a aprender Perl, saiba que existem meios mais
fáceis e rápidos de fazer o que você quer.<br><br>Dentro do loop "foreach $o (@arquivo) {"<br>basta você
usar o mecanismo de substituição das expressões
regulares:<br><br>$o =~ s/\.[0-9]{6,8}//;<br><br>De resto te
recomendo que você leia a vasta documentação que
está a sua disposição, para começar, execute
na linha de comando:<br>perldoc perl<br>perldoc perlrequick<br><br>Uma última observação, pesquise outras
maneiras de se carregar o array @arquivo. O Perl tem função
para isto.<br><br>Espero ter-lhe ajudado.<br>Luiz.<div><span class="e" id="q_11272831a5e5f510_1"><br><br>>
Boa tarde,<br>> <br>> eu tenho vários arquivos no
modelo:<br>> <br>> blablabla.txt.300606<br>>
blobloblo.300705<br>> bliblibli.org.txt.140504<br>>
blublublu.14062004<br>> <br>> Como eu edito todos os arquivos
para tirar essa data do final?<br>> <br>> Eu tentei isso:<br>> <br>> @arquivo = `ls`;<br>> foreach $o (@arquivo) {<br>> if ( $o =~ /[0-9]{6,8}/ ) {<br>> @arquivo2 =
split(/\./, $o);<br>> $date = pop @arquivo2;<br>> <br>> $string = "";<br>> foreach $u
(@arquivo2) {<br>> $string .= ".$u";<br>>
}<br>> }<br>> }<br>> <br>> Mas obviamente
isso remonta o arquivo dessa forma: .blablabla.txt<br>> Com um
"." a mais no inicio.<br>> <br>> Eu sou beeem novo em
Perl :)<br>> <br>> [ ]'s<br>> <br>> Leonardo.<br></span></div>> _______________________________________________<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 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></blockquote></div><br><br clear="all"><br>-- <br>[]'s Fernando