The UNIX and Linux Forums  

Go Back   O UNIX e Linux Forum > Top Fóruns > Programação Shell Script e
.
google unix.com



Programação Shell Script e Post perguntas sobre ksh, CSH, SH, BASH, Perl, PHP, SED, Awk e outros scripts shell e shell scripts línguas aqui.

Mais UNIX e Linux Fórum Tópicos Você pode achar Helpfull
Fio Thread Starter Fórum Respostas Última postagem
Chamando um script perl de um script perl new2ss Programação Shell Script e 6 05-24-2009 06:03
Incluir Perl no Unix shell script Ganapati UNIX para Dummies Perguntas & Respostas 1 04-29-2008 01:18
aqui documento para automatizar script perl que chamam script hogger84 Programação Shell Script e 3 10-22-2007 11:15
Modificar scripts para trabalhar com txt - Permissões script joangopan Programação Shell Script e 1 09-13-2007 12:38
Perl: Executar script perl no atual processo vino Programação Shell Script e 10 12-09-2005 10:45

Closed Thread
English Japanese Spanish French German Portuguese Italian Dutch Swedish Russian Norwegian Hungarian Hebrew Danish Bulgarian Greek Powered by Powered by Google
 
Linkback Thread Tools Pesquisar este Thread Rate Thread Display Modes
  #1 (permalink)  
Old 10-02-2006
Terrível
Convidado
  
 

Posts: n / a
Bits: 0 [Bancária]
Precisa de ajuda desesperadamente Nesta Perl

ok, eu não conheço nenhum perl. na verdade, muito pouco. Não muita coisa em todos.

agora, a tarefa que tenho é que tenho de ir para um diretório que é embalado com centenas de arquivos que contém grande quantidade de cordas de que tenho para filtrar. Então, quando eu começo para este directório, i tipo:

grep-r * Akamai no diretório.


o referido comando grep cuspir série de saída similar à seguinte:

/ excite/homepagepoll/ans_jan24_02.oft: <img src \u003d "http://a88.g.akamai.net/f/88/606/1d/image.lovesluudf.com/people/images/global/poll/popuptop. gif "width \u003d" 468 "height \u003d" 62 "border \u003d" 0 ">


o caminho à esquerda do cólon do exposto saída representa o caminho absoluto para o arquivo no qual a string que eu queria é encontrado.

agora, a minha tarefa é, tenho de escrever um Perl script que irá filtrar o resultado da "grep-r Akamai *" e, em seguida, produzir uma linha que contém apenas o nome do arquivo e da Akamai string.

significado, o de resultado deve ser algo semelhante a:

/ excite/homepagepoll/ans_jan24_02.oft: http://a88.g.akamai.net/f/88/606/1d/...l/popuptop.gif

basicamente, algo que greps fora o nome do arquivo e os apenas o link (s) que está contida nesse arquivo que corresponde ao "Akamai"

Desculpem a longa ler. mas eu só precisava de esclarecer. alguém queira ajudar. Tudo que eu preciso é apenas algo para começar com.
  #2 (permalink)  
Old 10-02-2006
anbu23 anbu23 is offline Forum Advisor  
Usuário
  
 

Join Date: Mar 2006
Local: Bangalore, Índia
Mensagens: 1.398
tente este

Código:
grep -r akamai * | sed '/SRC=/s/\([^:]*\).*SRC="\([^"]*\)".*$/\1: \2/'

  #3 (permalink)  
Old 10-03-2006
Terrível
Convidado
  
 

Posts: n / a
Bits: 0 [Bancária]
Citação:
Originally Posted by anbu23
tente este

Código:
grep -r akamai * | sed '/SRC=/s/\([^:]*\).*SRC="\([^"]*\)".*$/\1: \2/'

Eu vou dar um tiro no presente e deixar um pouco e conhecer os resultados. Espero que a deus isso funciona
  #4 (permalink)  
Old 10-03-2006
Terrível
Convidado
  
 

Posts: n / a
Bits: 0 [Bancária]
nope não funcionou. é isso qualquer outra coisa que pode ser feito?
  #5 (permalink)  
Old 10-03-2006
vino's Avatar
vino vino is offline Forum Staff  
Apoiante (in vino veritas)
  
 

Join Date: Feb 2005
Local: Bangalore, Índia
Mensagens: 2.798
Experimente esta.

Código:
grep -r akamai * | sed -n -e "s+^\([^:]*:\).*\(http[^\"].*\)\".*+\1 \2+p"

Não testado tho.
  #6 (permalink)  
Old 10-03-2006
ghostdog74 ghostdog74 is offline Forum Advisor  
Usuário
  
 

Join Date: Sep 2006
Posts: 2.557
Alternativa em Python:


Código:
s = '/excite/homepagepoll/ans_jan24_02.oft: <IMG SRC="http://a88.g.akamai.net/f/88/606/1d/image.lovesluudf.com/people/images/global/poll/popuptop.gif" WIDTH="468" HEIGHT="62" BORDER="0">'
splitted = s.split(":",1)
homepage,  = splitted[0]
urlpage = splitted[1].split()[1].replace('SRC="',"").replace('"',"")
final = homepage + ":" + urlpage
print final

  #7 (permalink)  
Old 10-04-2006
Terrível
Convidado
  
 

Posts: n / a
Bits: 0 [Bancária]
Citação:
Originally Posted by vino
Experimente esta.

Código:
grep -r akamai * | sed -n -e "s+^\([^:]*:\).*\(http[^\"].*\)\".*+\1 \2+p"

Não testado tho.

isso não funciona. Tenho uma dessas "Broken pipe" mensagens de erro
Closed Thread

Marcadores

Tags
perl, perl turnos, deslocar, turnos perl

Thread Tools Pesquisar este Thread
Pesquisar este Thread:

Pesquisa Avançada
Display Modes Esta taxa Thread
Esta taxa Thread:

Destacamento Regimento
Você não pode postar novas threads
Você não pode postar respostas
Você não pode postar anexos
Você não pode editar suas postagens

BB code é Ligado
Smilies são Ligado
[IMG] código é Ligado
Código HTML é Desligado
Trackbacks são Ligado
Pingbacks são Ligado
Refbacks são Ligado




Todos os horários são GMT -4. A hora é agora 11:29.


Powered by: vBulletinCopyright © 2000 - 2006, Jelsoft Enterprises Limited. Língua Traduções Powered by .
vBCredits v1.4 Copyright © 2007 - 2008, PixelFX Studios
O UNIX e Linux Fóruns Content Copyright © 1993-2009. Todos os Direitos Reserved.Ad Gestão por RedTyger

Content Relevant URLs por vBSEO 3.2.0