Assine a Lista Dicas-L
Receba diariamente por email as dicas
de informática publicadas neste site
Para se descadastrar, clique aqui.
Perl One Liners
Colaboração: Rubens Queiroz de Almeida
Data de Publicação: 27 de Dezembro de 2000
Não é novidade para ninguém que a linguagem Perl é extremamente poderosa. Entretanto é possível realizar tarefas bastante complexas diretamente a partir da linha de comandos.
Uma tarefa que vivo executando é a remoção de caracteres em branco, ou tabulações, do começo das linhas.
Com perl, o comando abaixo resolve o problema:
perl -pi -e "s/^\s*//" arquivo
O que faz a mágica é a sequencia "s/^\s*//". A string \s indica, caracteres em branco, tabulações, marca de fim de linha e mais algumas coisas que eu não me lembro. Resumindo, tudo que não aparece na tela, que é o que eu quero eliminar do arquivo. O "*" após este caractere indica que eu quero substituir zero ou mais ocorrências do que vier antes, ou seja, o \s e tudo o que ele significa.
Referências Adicionais
Referências adicionais sobre os assuntos abordados neste site podem ser encontradas em nossa Bibliografia.
