Remove comentarios de scripts

Publicado por Carlos Carvalho 01/09/2004

[ Hits: 6.019 ]

Download comentarios.pl.txt




Remove comentarios de scripts

  



Esconder código-fonte

#!/usr/bin/perl -w

#Remove todos os comentarios do
#ShellScript ou Perl.
#Mas os comentarios nesse estilo:"blabla #blabla"
#permanecerao.
#Carlos Carvalho<carlos_lnx@yahoo.com.br>

use strict;
my $file = $ARGV[0] or die "Use $0 filename";
open(FILE_IN,"<$file");
open(FILE_OUT,">$file.out");
while (<FILE_IN>) {
        if ($_ !~ /^#/) {
                print(FILE_OUT "$_");
        }
}

Scripts recomendados

Apaga fila do Exim...

Journaling de arquivos

Manipulação de arquivos

Processa todos os SlackBuild's

Adiciona-Altera senhas/usuarios no sistema


  

Comentários
[1] Comentário enviado por albertguedes em 15/10/2008 - 13:50h

Valeu cara.

Perl rules !


Contribuir com comentário




Patrocínio

Site hospedado pelo provedor RedeHost.
Linux banner

Destaques

Artigos

Dicas

Tópicos

Top 10 do mês

Scripts