A linguagem de programação Perl foi originalmente concebido para criar relatórios. Ele contém funções poderosas para manipulação de arquivos de texto. Por exemplo , você pode substituir um caractere (como um ponto e vírgula) ou seqüência de caracteres por outra . A função de "s" é utilizado para substituição ou substituição. O texto editado é colocado em um segundo arquivo de texto eo arquivo original permanece inalterado. A função "open" abre os arquivos . A função de "fechar" fecha os arquivos quando terminar de usá-los. Instruções 
 1 
 Abra um arquivo de texto em branco em qualquer editor de texto 
 2 
 Digite a seguinte linha para iniciar o script Perl : . 
 
 # ! /usr /bin /perl 
 3 
 Digite as seguintes linhas para abrir o arquivo que contém os pontos e vírgulas ( " orig_file " ) eo arquivo onde você deseja salvar as alterações ( "output" ) : 
 
 open (FILE , " orig_file " ) or die $ ; 
 
 abrir ( OUTFILE , "output " ) or die $ ; 
 
 Substituir " orig_file " ! e "output" com os nomes apropriados para o seu script. 
 4 
 Digite as seguintes linhas para criar o loop while que vai ler o conteúdo do arquivo original, substituir as vírgulas com dois pontos e escrever as mudanças para o arquivo de saída : 
 
 while (  ) 
  { 
 
 $ _ = ~ s /;/:/g ; 
 
 impressão OUTFILE $ _ ; 
 
 } 
 
 Substitua o ":" . no "$ _ = ~ s /;/:/g ; " com qualquer personagem que você deseja substituir o ponto e vírgula com < br > 
 5 
 Digite as seguintes linhas para fechar os arquivos abertos : 
 
 perto ( OUTFILE ); 
 
 perto (FILE) ; 
 6 
 Salve o arquivo como " sub_semicolon.pl ". 
 7 
 Digite o comando " perl sub_semicolon.pl " em um prompt de comando para executar o script.