Script que remove palavras de um arquivo.
Publicado por Sávio Reis Gonçalves 23/02/2005
[ Hits: 5.818 ]
Homepage: www.facebook.com/savinhoreis
Este script remove strings de um arquivo.
#!/usr/bin/perl #
#Remove String #
#by: eminem1000 #
#simples script para remover palavras #
# de uma arquivo #
# #
###########################################
$x = $ARGV[0];
$st = $ARGV[1];
if(not $ARGV[0]){
print "\n\nUse perl $0 Arquivo.txt palavra\n\n";
}
else
{
open(F, "<$x") || die "nao axei o file";
@co = <F>;
$sac = "@co";
$sac =~ s/$st//gi;
print "$sac\n";
close(F);
open(G, ">$x") || die "nao abri o segundo";
print G "$sac\n";
close(G);
print "\n \n [+] OK,removido [+]\n\n";
}
exit;
Inserindo sites em Lista do Squid
Adiciona-Altera senhas/usuarios no sistema
Nenhum comentário foi encontrado.
Berry Bank: Criando um Banco Digital Gamificado para seus Filhos com Gentoo, Flask e Tailscale
Papagaiando o XFCE com temas e recursos
O dock Plank + U-Launcher deixam qualquer desktop mais produtivo
Recuperando arquivos com o Photorec de discos zoados
Usando o --load-average no Gentoo para evitar OOM Kill
[Benchmark] - Quem consome menos bateria (W). (1)
Ajudante para criar dicas e artigos no VOL (8)









