Script que procura uma palavra em um arquivo.
Publicado por Sávio Reis Gonçalves 22/02/2005
[ Hits: 9.663 ]
Homepage: www.facebook.com/savinhoreis
Este Script procura uma palavra em um arquivo.
#!/usr/bin/perl
#Este script procura por uma palavra em um arquivo
#EMINEM1000
#2005
print " \n \n";
print "use $0 arquivo.txt palavra\n \n";
$nome_a = $ARGV[0];
$palavra_c = $ARGV[1];
print "Voce esta procurando por $palavra_c no arquivo $nome_a\n\n";
sleep(3);
$cont = 0;
&abre_arq($nome_a);
&procura($palavra_c);
print "encontrei $cont palavra(s) no $nome_a";
exit;
sub abre_arq{
open(ARQ, "<$nome_a") || die "error Voce nao indicou o arquivo \n";
@conteudo = <ARQ>;
close(ARQ);
}
sub procura{
foreach $linha(@conteudo){
$cont++while $linha =~ /$_[0]/gi;
}
}
Eliminando caracteres indesejados
script para localizar conteudo de arquivo
Processa todos os SlackBuild's
Adiciona-Altera senhas/usuarios no sistema
FTP – Script para adicionar e remover usuários via WEB
Como extrair chaves TOTP 2FA a partir de QRCODE (Google Authenticator)
Linux em 2025: Segurança prática para o usuário
Desktop Linux em alta: novos apps, distros e privacidade marcam o sábado
IA chega ao desktop e impulsiona produtividade no mundo Linux
Novos apps de produtividade, avanços em IA e distros em ebulição agitam o universo Linux
Como instalar o repositório do DBeaver no Ubuntu
Como instalar o Plex Media Server no Ubuntu
Digitando underscore com "shift" + "barra de espaços"
Como ativar a lixeira e recuperar aquivos deletados em um servidor Linux
Como mudar o nome de dispositivos Bluetooth via linha de comando
Linux é a solução para o fim do Windows10? (3)
Assinador JNLP do Site Portal da Nota Fiscal Eletrônica (0)
Programa fora de escala na tela do pc (29)









