Script que procura uma palavra em um arquivo.
Publicado por Sávio Reis Gonçalves 22/02/2005
[ Hits: 9.586 ]
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; } }
Script que remove palavras de um arquivo.
Script para adicionar e remover usuários no IMSPECTOR
script para localizar conteudo de arquivo
Inserindo sites em Lista do Squid
Customizar a Instalação do Linux Debian com Preseed
Atualizando o Passado: Linux no Lenovo G460 em 2025
aaPanel - Um Painel de Hospedagem Gratuito e Poderoso
Um modo leve de ouvir/ver áudio/vídeo da internet em máquinas pererecas
Resolver algumas mensagens de erro do SSH
Instalar módulo de segurança do Banco do Brasil Warsaw do tipo .run
Sem espaço na partição home (4)
Aprendendo mais sobre Linux com livro (6)
Procrastinação e autossabotagem são problemas muito comuns na sociedad... (6)