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.

script para localizar conteudo de arquivo

Journaling de arquivos

Alterar senha no shadow

Inserindo sites em Lista do Squid

Nenhum comentário foi encontrado.