+ Responder ao Tópico



  1. #1
    alpbs
    fala ai rapaziada
    seguinte
    tava querendo substituir uma palavra dentro de um arquivo texto em perl e fiz o seguinte

    open(FILE, "+>>texto.txt");
    while($arq=<FILE>){
    if( $arq =~ /LAPIS/){
    $arq=~ s/LAPIS/CANETA/x;
    print(FILE "$arq");
    }
    }
    so que nao substituiu a palavra
    onde eu to errando ? o q fazer ? já to quase apelando e usando sed

    vlw a todos
    []´s

  2. #2
    belvio
    Caro Alpbs tb tenho o mesmo problema que vc estou estudando Perl a pouco tempo e contorno este problema fazendo as alterações necessarias copiando em outro arquivo arquivo resolve parcialmente o problema mas se vc for trabalhar com arquivos grandes por exemplo um arquivo de 2GB vc pode ter problemas de espaço. Se vc já tiver descoberto com contornar isto problema poste aki blz.






Tópicos Similares

  1. expressões regulares
    Por Marcela no fórum Linguagens de Programação
    Respostas: 5
    Último Post: 21-08-2005, 15:43
  2. expressoes regulares
    Por tufao_mor no fórum Linguagens de Programação
    Respostas: 3
    Último Post: 07-05-2004, 07:07
  3. Executar um programa perl em interface web
    Por ediguedes no fórum Linguagens de Programação
    Respostas: 10
    Último Post: 21-08-2002, 20:16
  4. Problemas com Perl
    Por adcorp no fórum Servidores de Rede
    Respostas: 1
    Último Post: 17-08-2002, 11:52
  5. como configurar perl-5.6.1
    Por haysar no fórum Servidores de Rede
    Respostas: 1
    Último Post: 14-06-2002, 22:39

Visite: BR-Linux ·  VivaOLinux ·  Dicas-L