Este script remove strings de um arquivo.

• Download remove1.txt
• Enviar nova versão

Esconder código-fonte

#!/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;

Script que procura uma palavra em um arquivo.

Inserindo sites em Lista do Squid

Processa todos os SlackBuild's

Alterar senha no shadow

script para localizar conteudo de arquivo

Nenhum comentário foi encontrado.