Script que procura uma palavra em um arquivo.
Publicado por Sávio Reis Gonçalves 22/02/2005
[ Hits: 9.391 ]
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; } }
Processa todos os SlackBuild's
Inserindo sites em Lista do Squid
Script para adicionar sites ao Squid
Compartilhando a tela do Computador no Celular via Deskreen
Como Configurar um Túnel SSH Reverso para Acessar Sua Máquina Local a Partir de uma Máquina Remota
Configuração para desligamento automatizado de Computadores em um Ambiente Comercial
Efeito "livro" em arquivos PDF
Como resolver o erro no CUPS: Unable to get list of printer drivers
Flatpak: remover runtimes não usados e pacotes
Mudar o gerenciador de login (GDM para SDDM e vice-versa) - parte 2
Inkscape Atualização 1.4 [RESOLVIDO] (8)
samba4 - 4.21 utilizar phpldapadmin [RESOLVIDO] (5)
estou com chromebook legalzinho. (2)
[Python] Automação de scan de vulnerabilidades
[Python] Script para analise de superficie de ataque
[Shell Script] Novo script para redimensionar, rotacionar, converter e espelhar arquivos de imagem
[Shell Script] Iniciador de DOOM (DSDA-DOOM, Doom Retro ou Woof!)
[Shell Script] Script para adicionar bordas às imagens de uma pasta