Putz, isso mesmo ... tava digitando quando chegou a sua mensagem ... rsrsrs Que shit ... metadona tá me fazendo mal mesmo ...
Muito obrigado Cron! [...]'s Marcio ======================================== ########### Campanha Ajude o Marcio! ########### http://sosmarcio.blogspot.com.br/ http://www.vakinha.com.br/VaquinhaP.aspx?e=195793 ======================================== Em 22 de outubro de 2013 21:49, Renato Santos <renato.c...@gmail.com>escreveu: > É só usar @p = split /\|/, $texto > On Oct 22, 2013 10:47 PM, "Marcio - Google" <marci...@gmail.com> wrote: > >> Cron, nada sério. Só procurando informações em arquivos de log ... >> Tentei uns exemplos de regex mais não consegui também. Você sabe de kbç? >> >> >> [...]'s >> >> Marcio >> >> ======================================== >> ########### Campanha Ajude o Marcio! ########### >> http://sosmarcio.blogspot.com.br/ >> http://www.vakinha.com.br/VaquinhaP.aspx?e=195793 >> ======================================== >> >> >> Em 22 de outubro de 2013 21:44, Renato Santos >> <renato.c...@gmail.com>escreveu: >> >>> Regular expressions.. Você precisa escapiar o pipe. >>> >>> Obs: você devia usar o text::csv::xs se isso for sério! >>> On Oct 22, 2013 10:32 PM, "Marcio - Google" <marci...@gmail.com> wrote: >>> >>>> Mestres, desculpem a newbieçe, mas to apanhando do split. >>>> >>>> my $line = "T|blablablabla |blabla | mais blabla bla "; >>>> chomp $line; >>>> my @p = split /|/, $line; >>>> print $p[0] . "\n"; >>>> print $p[1] . "\n"; >>>> print $p[2] . "\n"; >>>> print $p[3] . "\n"; >>>> >>>> Minhas colunas são separadas por | e não tem tamanho fixo. >>>> >>>> Não consegui separa-las corretamente. >>>> >>>> >>>> >>>> [...]'s >>>> >>>> Marcio >>>> >>>> ======================================== >>>> ########### Campanha Ajude o Marcio! ########### >>>> http://sosmarcio.blogspot.com.br/ >>>> http://www.vakinha.com.br/VaquinhaP.aspx?e=195793 >>>> ======================================== >>>> >>>> >>>> Em 19 de junho de 2013 12:58, Andre Carneiro < >>>> andregarciacarne...@gmail.com> escreveu: >>>> >>>>> Valeu Lorn! Esse eu não conhecia! >>>>> >>>>> >>>>> Acho que fiquei mal-acostumado aqui na empresa. Os caras só usam coisa >>>>> que tem suporte e normalmente isso implica em lincenças bem caras. >>>>> >>>>> E no caso do splunk realmente, $30000,00 por 20GB/dia de indexação... >>>>> caro ! >>>>> >>>>> >>>>> >>>>> Cheers! >>>>> >>>>> >>>>> >>>>> >>>>> >>>>> >>>>> >>>>> >>>>> >>>>> >>>>> >>>>> 2013/6/19 Nuba Princigalli <n...@fastmail.fm> >>>>> >>>>>> ** >>>>>> Complementando: nesse espaço, uma alternativa bacana também é o >>>>>> logstash. >>>>>> >>>>>> On Wed, Jun 19, 2013, at 10:08 AM, Lindolfo Lorn Rodrigues wrote: >>>>>> >>>>>> Fala André, blz? >>>>>> O Splunk é bom mesmo, só que muito é caro. >>>>>> Para centralizar logs eu gosto do http://graylog2.org/ >>>>>> Open Source e escala muito bem, outro dia a locaweb revelou que eles >>>>>> recebem/tratam 790.000 mensagens / 5min com o Graylog. >>>>>> >>>>>> E como o graylog-server é compativel com o syslog você pode apontar >>>>>> o syslog das maquinas para ele >>>>>> >>>>>> >>>>>> >>>>>> 2013/6/19 Andre Carneiro <andregarciacarne...@gmail.com> >>>>>> >>>>>> >>>>>> virxi... preciso revisar melhor meus e-mails. Mals... >>>>>> >>>>>> >>>>>> 2013/6/19 Andre Carneiro <andregarciacarne...@gmail.com> >>>>>> >>>>>> >>>>>> Márcio, você já ouviu falar sobre o Splunk? >>>>>> >>>>>> http://www.splunk.com/product >>>>>> >>>>>> >>>>>> O pessoal usa aqui usa bastante. Eu só dei uma olhadinha bem >>>>>> superficial. Você pode criar gráficos de monitoração muito facilmente, >>>>>> pode >>>>>> trabalhar com regex para fazer as análises dos logs, tudo simples, fácil >>>>>> e >>>>>> rápido. Obviamente tem uma curvinha de aprendizado para vencer, mas nada >>>>>> comparado à 'monstrinhos' como o Nagios, por exemplo(fãs de Nagios, me >>>>>> desculpem! É a minha opinião!). >>>>>> >>>>>> O Splunk veio, aparentemente, preencher essa 'lacuna'. >>>>>> >>>>>> >>>>>> Realmente bão ! >>>>>> >>>>>> >>>>>> >>>>>> >>>>>> >>>>>> 2013/6/18 Nilton OS <jnilti...@gmail.com> >>>>>> >>>>>> >>>>>> my $test = '^(... .. ..:..:..) (\S+) \S+ ([a-zA-Z0-9]+): FILTER_LOGX: >>>>>> from=\<(.*?)\> to=\<(.*?)\> subject=\<(.*?)\> size=([0-9]+) hostip=([^ >>>>>> ]*) >>>>>> nrcpt=([0-9]+)'; >>>>>> >>>>>> >>>>>> Testa algo assim: >>>>>> >>>>>> Se usar (\S+) ou \S+ vai começar a ter os resultados >>>>>> >>>>>> Dá uma olhada nesse script. >>>>>> >>>>>> http://pastebin.com/2Mnx9FAY >>>>>> >>>>>> >>>>>> >>>>>> >>>>>> >>>>>> >>>>>> Em 18 de junho de 2013 19:33, Eduardo Verissimo <everiss...@gmail.com >>>>>> > escreveu: >>>>>> >>>>>> Que tal? >>>>>> >>>>>> ($codigo) =~ /^.*?\|.*?\|.*?\|(.*?)\|/ if /TIM/; >>>>>> >>>>>> Acho que ainda precisa de um ajuste... >>>>>> >>>>>> >>>>>> >>>>>> Em 18 de junho de 2013 19:02, Nilton OS <jnilti...@gmail.com>escreveu: >>>>>> >>>>>> Dá um split no (|) >>>>>> >>>>>> No meu script tem um regex para pegar isso ou qualquer coisa na >>>>>> linha, mas acho que ninguém ligou para minha resposta. >>>>>> >>>>>> >>>>>> Em 18 de junho de 2013 18:34, Marcio - Google >>>>>> <marci...@gmail.com>escreveu: >>>>>> >>>>>> >>>>>> Marcio, não. >>>>>> >>>>>> Há duas informações na linha que tem que bater para ela ser >>>>>> selecionada, no exemplo: >>>>>> *|***********************|***** |*D0 C003*| ********************* >>>>>> "TIM"* >>>>>> >>>>>> >>>>>> [...]'s >>>>>> >>>>>> Marcio >>>>>> >>>>>> ======================================== >>>>>> ########### Campanha Ajude o Marcio! ########### >>>>>> http://sosmarcio.blogspot.com.br/ >>>>>> http://www.vakinha.com.br/VaquinhaP.aspx?e=195793 >>>>>> ======================================== >>>>>> >>>>>> >>>>>> Em 18 de junho de 2013 16:59, Marcio Ferreira < >>>>>> marciodesouzaferre...@gmail.com> escreveu: >>>>>> >>>>>> >>>>>> >>>>>> if ( $line =~ /"TIM"/i ){ >>>>>> #faz alguma coisa >>>>>> } >>>>>> >>>>>> não funciona? >>>>>> >>>>>> http://perldoc.perl.org/perlre.html >>>>>> http://sao-paulo.pm.org/artigo/2006/RegexPraticasTecnicasAvancadas >>>>>> http://sao-paulo.pm.org/artigo/2006/ExpressoesRegulares >>>>>> >>>>>> >>>>>> []s, >>>>>> >>>>>> Marcio Ferreira >>>>>> >>>>>> skype: marcio.ferreir4 >>>>>> (21) 8365-7768 >>>>>> >>>>>> >>>>>> 2013/6/18 Marcio - Google <marci...@gmail.com> >>>>>> >>>>>> Marcio (xará), >>>>>> >>>>>> Vou tentar com esse módulo. Já to ficando traumatizado com regex, >>>>>> faz tempo que apanho, to começando a achar que seja algum tipo de trauma, >>>>>> bloqueio, sei lá o que ... rsrsrs >>>>>> >>>>>> Giuliani, >>>>>> >>>>>> Obrigado pela dica, vou procurar o livro. >>>>>> >>>>>> Tiago, >>>>>> >>>>>> Vou ler a respeito, obrigado. >>>>>> >>>>>> >>>>>> >>>>>> [...]'s >>>>>> >>>>>> Marcio >>>>>> >>>>>> ======================================== >>>>>> ########### Campanha Ajude o Marcio! ########### >>>>>> http://sosmarcio.blogspot.com.br/ >>>>>> http://www.vakinha.com.br/VaquinhaP.aspx?e=195793 >>>>>> ======================================== >>>>>> >>>>>> >>>>>> Em 18 de junho de 2013 16:44, Marcio - Google >>>>>> <marci...@gmail.com>escreveu: >>>>>> >>>>>> >>>>>> Eduardo, >>>>>> >>>>>> O log é isso ai basicamente: >>>>>> T|20/05/2013 08:12:03.391|Modem |D1 C015| RX : OK >>>>>> T|20/05/2013 08:12:04.300|Modem |D0 C003| RX : +CREG: 001,016d,5e13 >>>>>> T|20/05/2013 08:12:04.300|Modem |D0 C003| TX : AT+COPS? >>>>>> T|20/05/2013 08:12:04.333|Modem |D0 C003| RX : +COPS: 000,000,"TIM" >>>>>> T|20/05/2013 08:12:04.333|Modem |D0 C003| RX : OK >>>>>> T|20/05/2013 08:12:04.582|Modem |D0 C001| TX : AT+CSQ >>>>>> T|20/05/2013 08:12:04.582|Modem |D0 C002| TX : AT+CSQ >>>>>> >>>>>> Usando esse pedaço como exemplo, preciso localizar linhas assim: >>>>>> *|***********************|***** |D0 C003| ********************"TIM" >>>>>> >>>>>> Entenda o * como qualquer coisa. Depois do quarto | os dados não tem >>>>>> tamanho fixo, então esse "TIM" poderia estar mais pra frente como mais >>>>>> pra >>>>>> trás. >>>>>> >>>>>> >>>>>> >>>>>> >>>>>> >>>>>> [...]'s >>>>>> >>>>>> Marcio >>>>>> >>>>>> ======================================== >>>>>> ########### Campanha Ajude o Marcio! ########### >>>>>> http://sosmarcio.blogspot.com.br/ >>>>>> http://www.vakinha.com.br/VaquinhaP.aspx?e=195793 >>>>>> ======================================== >>>>>> >>>>>> >>>>>> Em 17 de junho de 2013 21:25, Eduardo Verissimo < >>>>>> everiss...@gmail.com> escreveu: >>>>>> >>>>>> Márcio, você pode dar um exemplo de qual a string de onde vai tirar a >>>>>> informação e qual informação quer extrair? >>>>>> >>>>>> >>>>>> Em 17 de junho de 2013 19:32, Marcio - Google >>>>>> <marci...@gmail.com>escreveu: >>>>>> >>>>>> >>>>>> >>>>>> Valeu pelas dicas e códigos pessoal. >>>>>> Estou usando o File::Tail e parti do código que o Eduardo >>>>>> compartilhou. >>>>>> Só estou apanhando das regex pra encontrar o que quero. Não sei se >>>>>> sou burro, mas tenho uma grande dificuldade de assimilar/entender regex. >>>>>> Vou tentar mais um pouco, se não conseguir jogo a toalha ... rsrsrs >>>>>> >>>>>> >>>>>> >>>>>> >>>>>> >>>>>> =begin disclaimer >>>>>> Sao Paulo Perl Mongers: http://sao-paulo.pm.org/ >>>>>> SaoPaulo-pm mailing list: SaoPaulo-pm@pm.org >>>>>> L<http://mail.pm.org/mailman/listinfo/saopaulo-pm> >>>>>> =end disclaimer >>>>>> >>>>>> >>>>>> >>>>>> >>>>>> >>>>>> >>>>>> =begin disclaimer >>>>>> Sao Paulo Perl Mongers: http://sao-paulo.pm.org/ >>>>>> SaoPaulo-pm mailing list: SaoPaulo-pm@pm.org >>>>>> L<http://mail.pm.org/mailman/listinfo/saopaulo-pm> >>>>>> =end disclaimer >>>>>> >>>>>> >>>>>> >>>>>> >>>>>> =begin disclaimer >>>>>> Sao Paulo Perl Mongers: http://sao-paulo.pm.org/ >>>>>> SaoPaulo-pm mailing list: SaoPaulo-pm@pm.org >>>>>> L<http://mail.pm.org/mailman/listinfo/saopaulo-pm> >>>>>> =end disclaimer >>>>>> >>>>>> >>>>>> >>>>>> >>>>>> =begin disclaimer >>>>>> Sao Paulo Perl Mongers: http://sao-paulo.pm.org/ >>>>>> SaoPaulo-pm mailing list: SaoPaulo-pm@pm.org >>>>>> L<http://mail.pm.org/mailman/listinfo/saopaulo-pm> >>>>>> =end disclaimer >>>>>> >>>>>> >>>>>> >>>>>> >>>>>> >>>>>> -- >>>>>> >>>>>> .............................................................................. >>>>>> *Com Deus todas as coisas são possíveis* ::: >>>>>> LinuxPro<http://www.linuxpro.com.br> >>>>>> >>>>>> *"A qualidade nunca se obtém por acaso; ela é sempre o resultado do >>>>>> esforço inteligente." (John Ruskin)* >>>>>> *"A mente que se abre a uma nova ideia jamais volta ao seu tamanho >>>>>> original" (Albert Einstein)* >>>>>> >>>>>> =begin disclaimer >>>>>> Sao Paulo Perl Mongers: http://sao-paulo.pm.org/ >>>>>> SaoPaulo-pm mailing list: SaoPaulo-pm@pm.org >>>>>> L<http://mail.pm.org/mailman/listinfo/saopaulo-pm> >>>>>> =end disclaimer >>>>>> >>>>>> >>>>>> >>>>>> >>>>>> =begin disclaimer >>>>>> Sao Paulo Perl Mongers: http://sao-paulo.pm.org/ >>>>>> SaoPaulo-pm mailing list: SaoPaulo-pm@pm.org >>>>>> L<http://mail.pm.org/mailman/listinfo/saopaulo-pm> >>>>>> =end disclaimer >>>>>> >>>>>> >>>>>> >>>>>> >>>>>> >>>>>> -- >>>>>> >>>>>> .............................................................................. >>>>>> *Com Deus todas as coisas são possíveis* ::: >>>>>> LinuxPro<http://www.linuxpro.com.br> >>>>>> >>>>>> *"A qualidade nunca se obtém por acaso; ela é sempre o resultado do >>>>>> esforço inteligente." (John Ruskin)* >>>>>> *"A mente que se abre a uma nova ideia jamais volta ao seu tamanho >>>>>> original" (Albert Einstein)* >>>>>> >>>>>> =begin disclaimer >>>>>> Sao Paulo Perl Mongers: http://sao-paulo.pm.org/ >>>>>> SaoPaulo-pm mailing list: SaoPaulo-pm@pm.org >>>>>> L<http://mail.pm.org/mailman/listinfo/saopaulo-pm> >>>>>> =end disclaimer >>>>>> >>>>>> >>>>>> >>>>>> >>>>>> >>>>>> -- >>>>>> André Garcia Carneiro >>>>>> Software Engineer >>>>>> (11)982907780 >>>>>> >>>>>> >>>>>> >>>>>> >>>>>> -- >>>>>> André Garcia Carneiro >>>>>> Software Engineer >>>>>> (11)982907780 >>>>>> >>>>>> =begin disclaimer >>>>>> Sao Paulo Perl Mongers: http://sao-paulo.pm.org/ >>>>>> SaoPaulo-pm mailing list: SaoPaulo-pm@pm.org >>>>>> L<http://mail.pm.org/mailman/listinfo/saopaulo-pm> >>>>>> =end disclaimer >>>>>> >>>>>> >>>>>> >>>>>> =begin disclaimer >>>>>> Sao Paulo Perl Mongers: http://sao-paulo.pm.org/ >>>>>> SaoPaulo-pm mailing list: SaoPaulo-pm@pm.org >>>>>> L<http://mail.pm.org/mailman/listinfo/saopaulo-pm> >>>>>> =end disclaimer >>>>>> >>>>>> >>>>>> -- >>>>>> Nuba R. Princigalli n...@pauleira.com http://pauleira.com@nprincigalli >>>>>> Discipline is not an end in itself, just a means to an end. - King >>>>>> Crimson >>>>>> >>>>>> >>>>>> =begin disclaimer >>>>>> Sao Paulo Perl Mongers: http://sao-paulo.pm.org/ >>>>>> SaoPaulo-pm mailing list: SaoPaulo-pm@pm.org >>>>>> L<http://mail.pm.org/mailman/listinfo/saopaulo-pm> >>>>>> =end disclaimer >>>>>> >>>>>> >>>>> >>>>> >>>>> -- >>>>> André Garcia Carneiro >>>>> Software Engineer >>>>> (11)982907780 >>>>> >>>>> =begin disclaimer >>>>> Sao Paulo Perl Mongers: http://sao-paulo.pm.org/ >>>>> SaoPaulo-pm mailing list: SaoPaulo-pm@pm.org >>>>> L<http://mail.pm.org/mailman/listinfo/saopaulo-pm> >>>>> =end disclaimer >>>>> >>>>> >>>> >>>> =begin disclaimer >>>> Sao Paulo Perl Mongers: http://sao-paulo.pm.org/ >>>> SaoPaulo-pm mailing list: SaoPaulo-pm@pm.org >>>> L<http://mail.pm.org/mailman/listinfo/saopaulo-pm> >>>> =end disclaimer >>>> >>>> >>> =begin disclaimer >>> Sao Paulo Perl Mongers: http://sao-paulo.pm.org/ >>> SaoPaulo-pm mailing list: SaoPaulo-pm@pm.org >>> L<http://mail.pm.org/mailman/listinfo/saopaulo-pm> >>> =end disclaimer >>> >>> >> >> =begin disclaimer >> Sao Paulo Perl Mongers: http://sao-paulo.pm.org/ >> SaoPaulo-pm mailing list: SaoPaulo-pm@pm.org >> L<http://mail.pm.org/mailman/listinfo/saopaulo-pm> >> =end disclaimer >> >> > =begin disclaimer > Sao Paulo Perl Mongers: http://sao-paulo.pm.org/ > SaoPaulo-pm mailing list: SaoPaulo-pm@pm.org > L<http://mail.pm.org/mailman/listinfo/saopaulo-pm> > =end disclaimer > >
=begin disclaimer Sao Paulo Perl Mongers: http://sao-paulo.pm.org/ SaoPaulo-pm mailing list: SaoPaulo-pm@pm.org L<http://mail.pm.org/mailman/listinfo/saopaulo-pm> =end disclaimer