Pessoal.. estou lendo um arquivo linha por linha <br> e os dados entre as linhas estao separados por espaco.. so que no fim da linha possue caracteres como: / //// ///// ///// / //// //// ///// / =<br> <br> estou fazendo assim:<br> <br> my @file_ok = grep{$_ =~ m/^teste/} @files;<br> for my $file (@file_ok)<br> {<br> open (File, "$diretorio/$file") or die $!;<br> while (my $line = <File>)<br> {<br> @F = split(/ /,$line);<br> }<br> close File;<br> }<br> <br> Agora para eliminar esses caracteres do final antes de inserir no array :: alguem sabe como??<br> <br> Outra questao eh.. as vezes tenho linhas que um elemento possui 2 espacoes entre eles :/ .. dai fica dificil neh??? :)<br> <br> <br> Obrigada<br> <br> Paty<br> <br> <br> <br> <p> 
                <hr size=1>
Yahoo! Search<br>
Música para ver e ouvir: <a href="http://us.rd.yahoo.com/mail/br/tagline/search/video/*http://br.search.yahoo.com/search/video?p=james+blunt&ei=UTF-8&cv=g&x=wrt&vm=r&fr=intl-mail-br-b">You're Beautiful, do James Blunt</a>