From ptfzs em yahoo.com.br  Mon Oct  1 04:28:08 2007
From: ptfzs em yahoo.com.br (Patty Silva)
Date: Mon, 1 Oct 2007 08:28:08 -0300 (ART)
Subject: [Cascavel-pm] Sugestao - PERL
Message-ID: <211345.3112.qm@web31314.mail.mud.yahoo.com>

Pessoal.. uma sugestao de vcs..
estou fazendo um programa que recupera o ID e ultima datahora que foi inserido no banco..e busco as ultimas 48 horas para aquela ID...
Estou fazendo:


.
.
.

my $sql=qq{SELECT id,MAX(datahora) from table1 where datainc>=
timestamp '$aaaammdd $hour:00:00' - interval '3 hour' GROUP BY id ORDER BY id};

$sth = $dbh->prepare($sql) || die $DBI::errstr;
$sth->execute || die $DBI::errstr;


while ( my @row = $sth->fetchrow_array( ) )
{

                           

my $sql2=qq{SELECT * from table1 where id='$row[0]' and datahora>=timestamp '$row[1]' - interval '48 hour' order by datahora};

                            $sth2 = $dbh->prepare($sql2) || die $DBI::errstr;
                            $sth2->execute || die $DBI::errstr;

                            while ( my @row2 = $sth2->fetchrow_array( ) )
                           {
                               .. . ................
                           }
                        }

                        warn "Problema ao processar os resultados", $sth->errstr( ), "\n" if $sth->err( );
                        $sth->finish();
                        $sth2->finish();



Alguma sugestao:??? um problema eh que a 1 consulta demora d+.. :D

Obrigada


       Abra sua conta no Yahoo! Mail, o único sem limite de espaço para armazenamento! 
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: http://mail.pm.org/pipermail/cascavel-pm/attachments/20071001/c79044c0/attachment.html 

From shonorio em gmail.com  Tue Oct  2 05:11:00 2007
From: shonorio em gmail.com (Solli Honorio)
Date: Tue, 2 Oct 2007 09:11:00 -0300
Subject: [Cascavel-pm] Sugestao - PERL
In-Reply-To: <211345.3112.qm@web31314.mail.mud.yahoo.com>
References: <211345.3112.qm@web31314.mail.mud.yahoo.com>
Message-ID: <12d1f4ee0710020511n56d2d3feu224a2127fb19b64e@mail.gmail.com>

Patty,

você já utilizou alguma ferramenta de 'trace analyser' do seu banco de dados
para saber qual o comportamento destes selects ? Será que a pesquisa não
está fazendo um 'table scan' por algum problema de índice.

Como sou péssimo em algorítimos, conheço alguns malucos que só de ver o
código já sabe o comportamento dele no compilado, utilizo duas abortagem na
codificação. Primeiro atingir o objetivo de resultado (e parece que você já
conseguiu com estas queries), e depois (se o desempenho não for
satisfatório) utilizo as ferramentas que analisam o comportamento daquela
rotina para saber onde está o gargalo.

Para mim é difícil falar no quê melhorar com foco em desempenho sem saber
outras informações, se o teu banco for muito grande isto pode ter
comportamentos diferentes de um banco menor e manutenção de índices são
alguns exemplos que influenciam o desempenho. De qualquer forma eu talvez
faria a pesquisa de modo diferente, primeiro separo o que rolou nas últimas
x horas e depois faria a pesquisa dentro deste universo já com todos o ID's.
Pois assim eu acho que você  diminui  os  universos de pesquisa e o consumo
de I/O. Mas tente utilizar e compreender as ferramentas de 'performance
analyser' do seu banco de dados, você vai ficar surpresa como estas
ferramentas pode te ajudar.

Solli M. Honório


On 10/1/07, Patty Silva <ptfzs em yahoo.com.br> wrote:
>
> Pessoal.. uma sugestao de vcs..
> estou fazendo um programa que recupera o ID e ultima datahora que foi
> inserido no banco..e busco as ultimas 48 horas para aquela ID...
> Estou fazendo:
>
>
> .
> .
> .
>
> my $sql=qq{SELECT id,MAX(datahora) from table1 where datainc>=
> timestamp '$aaaammdd $hour:00:00' - interval '3 hour' GROUP BY id ORDER BY
> id};
>
> $sth = $dbh->prepare($sql) || die $DBI::errstr;
> $sth->execute || die $DBI::errstr;
>
>
> while ( my @row = $sth->fetchrow_array( ) )
> {
>
>
>
> my $sql2=qq{SELECT * from table1 where id='$row[0]' and
> datahora>=timestamp '$row[1]' - interval '48 hour' order by datahora};
>
>                             $sth2 = $dbh->prepare($sql2) || die
> $DBI::errstr;
>                             $sth2->execute || die $DBI::errstr;
>
>                             while ( my @row2 = $sth2->fetchrow_array( ) )
>                            {
>                                .. . ................
>                            }
>                         }
>
>                         warn "Problema ao processar os resultados",
> $sth->errstr( ), "\n" if $sth->err( );
>                         $sth->finish();
>                         $sth2->finish();
>
>
>
> Alguma sugestao:??? um problema eh que a 1 consulta demora d+.. :D
>
> Obrigada
>
> Abra sua conta no Yahoo! Mail<http://br.rd.yahoo.com/mail/taglines/mail/*http://br.mail.yahoo.com/>,
> o único sem limite de espaço para armazenamento!
>
> _______________________________________________
> Cascavel-pm mailing list
> Cascavel-pm em pm.org
> http://mail.pm.org/mailman/listinfo/cascavel-pm
>



-- 
"o animal satisfeito dorme". - Guimarães Rosa
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: http://mail.pm.org/pipermail/cascavel-pm/attachments/20071002/acfb7b98/attachment.html 

From stateroad em gmail.com  Tue Oct  2 05:37:10 2007
From: stateroad em gmail.com (Nicholas Amorim)
Date: Tue, 2 Oct 2007 09:37:10 -0300
Subject: [Cascavel-pm] Livros Perl para venda
Message-ID: <7c1ab7e20710020537t39b57874y59d9081015e28151@mail.gmail.com>

Olá pessoal, desculpem o incômodo, mas estou vendendo dois livros, quem
quiser, entra em contato comigo por PM.

Perl Como Programar - R$ 60
Programação Perl - R$ 85

Ambos em excelente estados, sem rasgos ou amassos.

Nicholas.
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: http://mail.pm.org/pipermail/cascavel-pm/attachments/20071002/21a4103f/attachment.html 

From fernandolouis em terra.com.br  Tue Oct  2 06:33:18 2007
From: fernandolouis em terra.com.br (fernandolouis em terra.com.br)
Date: Tue, 2 Oct 2007 10:33:18 -0300
Subject: [Cascavel-pm] Livros Perl para venda
References: <7c1ab7e20710020537t39b57874y59d9081015e28151@mail.gmail.com>
Message-ID: <00be01c804f8$cc275770$0a01a8c0@servidorliz>

Alguém recomenda o "programação Perl" ?

[]s,
Fernando
  ----- Original Message ----- 
  From: Nicholas Amorim 
  To: cascavel-pm em pm.org 
  Sent: Tuesday, October 02, 2007 9:37 AM
  Subject: [Cascavel-pm] Livros Perl para venda


  Olá pessoal, desculpem o incômodo, mas estou vendendo dois livros, quem quiser, entra em contato comigo por PM.

  Perl Como Programar - R$ 60
  Programação Perl - R$ 85

  Ambos em excelente estados, sem rasgos ou amassos. 

  Nicholas.



------------------------------------------------------------------------------


  _______________________________________________
  Cascavel-pm mailing list
  Cascavel-pm em pm.org
  http://mail.pm.org/mailman/listinfo/cascavel-pm
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: http://mail.pm.org/pipermail/cascavel-pm/attachments/20071002/b5b30347/attachment.html 

From joenio em gmail.com  Tue Oct  2 08:15:54 2007
From: joenio em gmail.com (Joenio Costa)
Date: Tue, 2 Oct 2007 12:15:54 -0300
Subject: [Cascavel-pm] Livros Perl para venda
In-Reply-To: <00be01c804f8$cc275770$0a01a8c0@servidorliz>
References: <7c1ab7e20710020537t39b57874y59d9081015e28151@mail.gmail.com>
	<00be01c804f8$cc275770$0a01a8c0@servidorliz>
Message-ID: <65934b450710020815q17c96afdy914d70ebd522dbbd@mail.gmail.com>

É o da Oreilly? Eu recomento! Apesar de já ter visto muitos reclamando
da tradução ruim dele...

Mas é um livro para quem já sabe programar um pouco em Perl...

Em 02/10/07, fernandolouis em terra.com.br<fernandolouis em terra.com.br> escreveu:
>
>
> Alguém recomenda o "programação Perl" ?
>
> []s,
> Fernando
>
> ----- Original Message -----
> From: Nicholas Amorim
> To: cascavel-pm em pm.org
> Sent: Tuesday, October 02, 2007 9:37 AM
> Subject: [Cascavel-pm] Livros Perl para venda
>
> Olá pessoal, desculpem o incômodo, mas estou vendendo dois livros, quem
> quiser, entra em contato comigo por PM.
>
> Perl Como Programar - R$ 60
> Programação Perl - R$ 85
>
> Ambos em excelente estados, sem rasgos ou amassos.
>
> Nicholas.
>
>
>  ________________________________
>
>
> _______________________________________________
> Cascavel-pm mailing list
> Cascavel-pm em pm.org
> http://mail.pm.org/mailman/listinfo/cascavel-pm
>
>
> _______________________________________________
> Cascavel-pm mailing list
> Cascavel-pm em pm.org
> http://mail.pm.org/mailman/listinfo/cascavel-pm
>


-- 
Joenio Costa
- Salvador Perl Mongers - Grupo de Usuário Perl de Salvador
- Colibre - Cooperativa de Tecnologias Livres
- PSL-BA - Projeto Software Livre Bahia

From stateroad em gmail.com  Tue Oct  2 10:00:18 2007
From: stateroad em gmail.com (Nicholas Amorim)
Date: Tue, 2 Oct 2007 14:00:18 -0300
Subject: [Cascavel-pm] Livros Perl para venda
In-Reply-To: <65934b450710020815q17c96afdy914d70ebd522dbbd@mail.gmail.com>
References: <7c1ab7e20710020537t39b57874y59d9081015e28151@mail.gmail.com>
	<00be01c804f8$cc275770$0a01a8c0@servidorliz>
	<65934b450710020815q17c96afdy914d70ebd522dbbd@mail.gmail.com>
Message-ID: <7c1ab7e20710021000m39256cam5fb549bc5ad2396d@mail.gmail.com>

É o da O'reilly sim :)

Realmente o nível dele já é um tanto quanto intermediário, mas dá pra
aprender com ele desde o início sim e quem aprende com ele, imagino que
aprenda de fato, pelo nível em si do livro.

Lembrando que o Larry Wall é um dos autores !
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: http://mail.pm.org/pipermail/cascavel-pm/attachments/20071002/7fefa66a/attachment.html 

From glasswalk3r em hotmail.com  Tue Oct  2 10:11:42 2007
From: glasswalk3r em hotmail.com (Alceu Rodrigues de Freitas Junior)
Date: Tue, 2 Oct 2007 20:11:42 +0300
Subject: [Cascavel-pm] Livros Perl para venda
In-Reply-To: <7c1ab7e20710021000m39256cam5fb549bc5ad2396d@mail.gmail.com>
References: <7c1ab7e20710020537t39b57874y59d9081015e28151@mail.gmail.com>
	<00be01c804f8$cc275770$0a01a8c0@servidorliz>
	<65934b450710020815q17c96afdy914d70ebd522dbbd@mail.gmail.com> 
	<7c1ab7e20710021000m39256cam5fb549bc5ad2396d@mail.gmail.com>
Message-ID: <BAY121-W7DFF1696D95B0F604AEC7F5AE0@phx.gbl>

Não queria ser o mala da vez, mas aí vai dois pontos importantes sobre o "Programando Perl":

1 - A tradução é ruim em alguns trechos.
2 - O livro já está ficando velhinho. Algumas coisas como Unicode e Threads já mudaram completamente e a abordagem sobre objetos também carece de atualização.

Sobre a tradução, acho que a grande maioria dos títulos sobre informática sofrem de má tradução. Não sei se isso se repete em outros campos técnicos (porque a parte de literatura costuma ser bem melhor) mas a única editora (que me vem a memória) que tem traduções de qualidade é a Bookman.

[]'s

---
Alceu Rodrigues de Freitas Junior
glasswalk3r em hotmail.com


Date: Tue, 2 Oct 2007 14:00:18 -0300
From: stateroad em gmail.com
To: cascavel-pm em pm.org
Subject: Re: [Cascavel-pm] Livros Perl para venda

É o da O'reilly sim :)

Realmente o nível dele já é um tanto quanto intermediário, mas dá pra aprender com ele desde o início sim e quem aprende com ele, imagino que aprenda de fato, pelo nível em si do livro.


Lembrando que o Larry Wall é um dos autores !


_________________________________________________________________
Discover the new Windows Vista
http://search.msn.com/results.aspx?q=windows+vista&mkt=en-US&form=QBRE
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: http://mail.pm.org/pipermail/cascavel-pm/attachments/20071002/72731873/attachment-0001.html 

From stateroad em gmail.com  Tue Oct  2 10:19:25 2007
From: stateroad em gmail.com (Nicholas Amorim)
Date: Tue, 2 Oct 2007 14:19:25 -0300
Subject: [Cascavel-pm] Livros Perl para venda
In-Reply-To: <BAY121-W7DFF1696D95B0F604AEC7F5AE0@phx.gbl>
References: <7c1ab7e20710020537t39b57874y59d9081015e28151@mail.gmail.com>
	<00be01c804f8$cc275770$0a01a8c0@servidorliz>
	<65934b450710020815q17c96afdy914d70ebd522dbbd@mail.gmail.com>
	<7c1ab7e20710021000m39256cam5fb549bc5ad2396d@mail.gmail.com>
	<BAY121-W7DFF1696D95B0F604AEC7F5AE0@phx.gbl>
Message-ID: <7c1ab7e20710021019s7959a408ha96a2e47c5f313a5@mail.gmail.com>

Toda tradução tem seus pontos sofríveis, porém não acho que a do Programando
Perl seja do tipo 'sofrível'.

Além do mais, pelo preço que estou oferecendo (ele novo não sai por menos de
128 reais), é um bom livro para se manter como referência ;)
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: http://mail.pm.org/pipermail/cascavel-pm/attachments/20071002/2aa28510/attachment.html 

From edencardim em gmail.com  Tue Oct  2 12:19:04 2007
From: edencardim em gmail.com (eden)
Date: Tue, 2 Oct 2007 16:19:04 -0300
Subject: [Cascavel-pm] Livros Perl para venda
In-Reply-To: <BAY121-W7DFF1696D95B0F604AEC7F5AE0@phx.gbl>
References: <7c1ab7e20710020537t39b57874y59d9081015e28151@mail.gmail.com>
	<00be01c804f8$cc275770$0a01a8c0@servidorliz>
	<65934b450710020815q17c96afdy914d70ebd522dbbd@mail.gmail.com>
	<7c1ab7e20710021000m39256cam5fb549bc5ad2396d@mail.gmail.com>
	<BAY121-W7DFF1696D95B0F604AEC7F5AE0@phx.gbl>
Message-ID: <3de55ead0710021219l50114ef9qf4774d5495cb50d0@mail.gmail.com>

On 10/2/07, Alceu Rodrigues de Freitas Junior <glasswalk3r em hotmail.com> wrote:
>
> Não queria ser o mala da vez, mas aí vai dois pontos importantes sobre o
> "Programando Perl":
>
> 1 - A tradução é ruim em alguns trechos.
> 2 - O livro já está ficando velhinho. Algumas coisas como Unicode e Threads
> já mudaram completamente e a abordagem sobre objetos também carece de
> atualização.
>
> Sobre a tradução, acho que a grande maioria dos títulos sobre informática
> sofrem de má tradução. Não sei se isso se repete em outros campos técnicos
> (porque a parte de literatura costuma ser bem melhor) mas a única editora
> (que me vem a memória) que tem traduções de qualidade é a Bookman.

Realmente, a tradução dele não é muito boa, traduziram inclusive os
exemplos de código, inserindo caracteres com acentuação que fazem com
que o exemplo não compile. Algumas piadas também perderam a graça ou
não fazem sentido na tradução. Mas mesmo assim, é um bom livro pra se
ter em casa.

-- 
edenc.vox.com

From edencardim em gmail.com  Tue Oct  2 12:19:04 2007
From: edencardim em gmail.com (eden)
Date: Tue, 2 Oct 2007 16:19:04 -0300
Subject: [Cascavel-pm] Livros Perl para venda
In-Reply-To: <BAY121-W7DFF1696D95B0F604AEC7F5AE0@phx.gbl>
References: <7c1ab7e20710020537t39b57874y59d9081015e28151@mail.gmail.com>
	<00be01c804f8$cc275770$0a01a8c0@servidorliz>
	<65934b450710020815q17c96afdy914d70ebd522dbbd@mail.gmail.com>
	<7c1ab7e20710021000m39256cam5fb549bc5ad2396d@mail.gmail.com>
	<BAY121-W7DFF1696D95B0F604AEC7F5AE0@phx.gbl>
Message-ID: <3de55ead0710021219l50114ef9qf4774d5495cb50d0@mail.gmail.com>

On 10/2/07, Alceu Rodrigues de Freitas Junior <glasswalk3r em hotmail.com> wrote:
>
> Não queria ser o mala da vez, mas aí vai dois pontos importantes sobre o
> "Programando Perl":
>
> 1 - A tradução é ruim em alguns trechos.
> 2 - O livro já está ficando velhinho. Algumas coisas como Unicode e Threads
> já mudaram completamente e a abordagem sobre objetos também carece de
> atualização.
>
> Sobre a tradução, acho que a grande maioria dos títulos sobre informática
> sofrem de má tradução. Não sei se isso se repete em outros campos técnicos
> (porque a parte de literatura costuma ser bem melhor) mas a única editora
> (que me vem a memória) que tem traduções de qualidade é a Bookman.

Realmente, a tradução dele não é muito boa, traduziram inclusive os
exemplos de código, inserindo caracteres com acentuação que fazem com
que o exemplo não compile. Algumas piadas também perderam a graça ou
não fazem sentido na tradução. Mas mesmo assim, é um bom livro pra se
ter em casa.

-- 
edenc.vox.com

From ptfzs em yahoo.com.br  Wed Oct  3 06:34:11 2007
From: ptfzs em yahoo.com.br (Patty Silva)
Date: Wed, 3 Oct 2007 10:34:11 -0300 (ART)
Subject: [Cascavel-pm] Duvida SPLIT
Message-ID: <518489.20355.qm@web31306.mail.mud.yahoo.com>

Ola Pessoal,
estou com um texto com formato estranho: preciso separa-los por 2 espacos ou mais pq tem o campo de endereco que é 1 espaco so..


ex:

TESTE    te te te te te te                    TESTE1    TESTE2       TESTE3

preciso armazenar o: TESTE, o  te te te te te te , TESTE1, TESTE2 .... em um vetor...

com split('s\s+',$line)  nao funcionou...
Como posso fazer?? 

Obrigada


       Abra sua conta no Yahoo! Mail, o único sem limite de espaço para armazenamento! 
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: http://mail.pm.org/pipermail/cascavel-pm/attachments/20071003/7c9cffbb/attachment.html 

From gabriel.vieira em gmail.com  Wed Oct  3 06:35:58 2007
From: gabriel.vieira em gmail.com (Gabriel Vieira)
Date: Wed, 3 Oct 2007 10:35:58 -0300
Subject: [Cascavel-pm] Duvida SPLIT
In-Reply-To: <518489.20355.qm@web31306.mail.mud.yahoo.com>
References: <518489.20355.qm@web31306.mail.mud.yahoo.com>
Message-ID: <83d8367f0710030635g79689998ja85db1b4ad91d896@mail.gmail.com>

use \s+ apenas.

On 10/3/07, Patty Silva <ptfzs em yahoo.com.br> wrote:
> Ola Pessoal,
> estou com um texto com formato estranho: preciso separa-los por 2 espacos ou
> mais pq tem o campo de endereco que é 1 espaco so..
>
>
> ex:
>
> TESTE    te te te te te te                    TESTE1    TESTE2       TESTE3
>
> preciso armazenar o: TESTE, o  te te te te te te , TESTE1, TESTE2 .... em um
> vetor...
>
> com split('s\s+',$line)  nao funcionou...
> Como posso fazer??
>
> Obrigada
>
>
>
>  Abra sua conta no Yahoo! Mail, o único sem limite de espaço para
> armazenamento!
> _______________________________________________
> Cascavel-pm mailing list
> Cascavel-pm em pm.org
> http://mail.pm.org/mailman/listinfo/cascavel-pm
>


-- 
Gabriel Vieira

From thomas em tcnet.com.br  Wed Oct  3 06:34:46 2007
From: thomas em tcnet.com.br (Thomas Britis)
Date: Wed, 03 Oct 2007 10:34:46 -0300
Subject: [Cascavel-pm] Duvida SPLIT
In-Reply-To: <518489.20355.qm@web31306.mail.mud.yahoo.com>
References: <518489.20355.qm@web31306.mail.mud.yahoo.com>
Message-ID: <47039A76.1000208@tcnet.com.br>

split ("\s*", $line);

Patty Silva wrote:
> Ola Pessoal,
> estou com um texto com formato estranho: preciso separa-los por 2 
> espacos ou mais pq tem o campo de endereco que é 1 espaco so..
> 
> 
> ex:
> 
> TESTE    te te te te te te                    TESTE1    TESTE2       TESTE3
> 
> preciso armazenar o: TESTE, o  te te te te te te , TESTE1, TESTE2 .... 
> em um vetor...
> 
> com split('s\s+',$line)  nao funcionou...
> Como posso fazer??
> 
> Obrigada
> 
> Abra sua conta no Yahoo! Mail 
> <http://br.rd.yahoo.com/mail/taglines/mail/*http://br.mail.yahoo.com/>, 
> o único sem limite de espaço para armazenamento!
> 
> 
> ------------------------------------------------------------------------
> 
> _______________________________________________
> Cascavel-pm mailing list
> Cascavel-pm em pm.org
> http://mail.pm.org/mailman/listinfo/cascavel-pm

-- 
Thomas Storino Britis
TCNet Informatica e Telecomunicacoes LTDA

From wendelscardua em gmail.com  Wed Oct  3 06:41:44 2007
From: wendelscardua em gmail.com (Wendel Scardua)
Date: Wed, 3 Oct 2007 10:41:44 -0300
Subject: [Cascavel-pm] Duvida SPLIT
In-Reply-To: <47039A76.1000208@tcnet.com.br>
References: <518489.20355.qm@web31306.mail.mud.yahoo.com>
	<47039A76.1000208@tcnet.com.br>
Message-ID: <726229b50710030641h3be53dfbla9c7a7f8e74c6187@mail.gmail.com>

<anakin>NOOOOOOOOOO!!!!</anakin>

\s* = zero ou mais espaços
\s+ = um ou mais espaços
s\s+ (o da patty) = s seguido de um ou mais espaços (se bem que tá dentro de
qq, não confiaria...)

Então, que tal

split( /\s\s+/, $line )

?

[]s

Wendel

On 10/3/07, Thomas Britis <thomas em tcnet.com.br> wrote:
>
> split ("\s*", $line);
>
> Patty Silva wrote:
> > Ola Pessoal,
> > estou com um texto com formato estranho: preciso separa-los por 2
> > espacos ou mais pq tem o campo de endereco que é 1 espaco so..
> >
> >
> > ex:
> >
> > TESTE    te te te te te te                    TESTE1    TESTE2
> TESTE3
> >
> > preciso armazenar o: TESTE, o  te te te te te te , TESTE1, TESTE2 ....
> > em um vetor...
> >
> > com split('s\s+',$line)  nao funcionou...
> > Como posso fazer??
> >
> > Obrigada
> >
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: http://mail.pm.org/pipermail/cascavel-pm/attachments/20071003/edc0d083/attachment.html 

From gabriel.vieira em gmail.com  Wed Oct  3 06:52:43 2007
From: gabriel.vieira em gmail.com (Gabriel Vieira)
Date: Wed, 3 Oct 2007 10:52:43 -0300
Subject: [Cascavel-pm] Duvida SPLIT
In-Reply-To: <726229b50710030641h3be53dfbla9c7a7f8e74c6187@mail.gmail.com>
References: <518489.20355.qm@web31306.mail.mud.yahoo.com>
	<47039A76.1000208@tcnet.com.br>
	<726229b50710030641h3be53dfbla9c7a7f8e74c6187@mail.gmail.com>
Message-ID: <83d8367f0710030652k4cb495e8u3a25e89fd79929b3@mail.gmail.com>

Ah! São 2 espaços... desculpa..

Faremos da maneira correta então.

\s{2,}


Abracos,

On 10/3/07, Wendel Scardua <wendelscardua em gmail.com> wrote:
> <anakin>NOOOOOOOOOO!!!!</anakin>
>
> \s* = zero ou mais espaços
> \s+ = um ou mais espaços
> s\s+ (o da patty) = s seguido de um ou mais espaços (se bem que tá dentro de
> qq, não confiaria...)
>
> Então, que tal
>
> split( /\s\s+/, $line )
>
> ?
>
> []s
>
> Wendel
>
> On 10/3/07, Thomas Britis <thomas em tcnet.com.br > wrote:
> > split ("\s*", $line);
> >
> > Patty Silva wrote:
> > > Ola Pessoal,
> > > estou com um texto com formato estranho: preciso separa-los por 2
> > > espacos ou mais pq tem o campo de endereco que é 1 espaco so..
> > >
> > >
> > > ex:
> > >
> > > TESTE    te te te te te te                    TESTE1
> TESTE2       TESTE3
> > >
> > > preciso armazenar o: TESTE, o  te te te te te te , TESTE1, TESTE2 ....
> > > em um vetor...
> > >
> > > com split('s\s+',$line)  nao funcionou...
> > > Como posso fazer??
> > >
> > > Obrigada
> > >
>
>
> _______________________________________________
> Cascavel-pm mailing list
> Cascavel-pm em pm.org
> http://mail.pm.org/mailman/listinfo/cascavel-pm
>


-- 
Gabriel Vieira

From wendelscardua em gmail.com  Wed Oct  3 07:04:27 2007
From: wendelscardua em gmail.com (Wendel Scardua)
Date: Wed, 3 Oct 2007 11:04:27 -0300
Subject: [Cascavel-pm] Duvida SPLIT
In-Reply-To: <83d8367f0710030652k4cb495e8u3a25e89fd79929b3@mail.gmail.com>
References: <518489.20355.qm@web31306.mail.mud.yahoo.com>
	<47039A76.1000208@tcnet.com.br>
	<726229b50710030641h3be53dfbla9c7a7f8e74c6187@mail.gmail.com>
	<83d8367f0710030652k4cb495e8u3a25e89fd79929b3@mail.gmail.com>
Message-ID: <726229b50710030704m116b474fo11fe0657f712a535@mail.gmail.com>

On 10/3/07, Gabriel Vieira <gabriel.vieira em gmail.com> wrote:
>
>
> Faremos da maneira correta então.
>
>
"da maneira correta" ? Desde quando o lema do Perl é "There Is Only One Way
To Do It" ? :-)

[]s

Wendel
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: http://mail.pm.org/pipermail/cascavel-pm/attachments/20071003/3bde97ca/attachment.html 

From gabriel.vieira em gmail.com  Wed Oct  3 07:12:56 2007
From: gabriel.vieira em gmail.com (Gabriel Vieira)
Date: Wed, 3 Oct 2007 11:12:56 -0300
Subject: [Cascavel-pm] Duvida SPLIT
In-Reply-To: <726229b50710030704m116b474fo11fe0657f712a535@mail.gmail.com>
References: <518489.20355.qm@web31306.mail.mud.yahoo.com>
	<47039A76.1000208@tcnet.com.br>
	<726229b50710030641h3be53dfbla9c7a7f8e74c6187@mail.gmail.com>
	<83d8367f0710030652k4cb495e8u3a25e89fd79929b3@mail.gmail.com>
	<726229b50710030704m116b474fo11fe0657f712a535@mail.gmail.com>
Message-ID: <83d8367f0710030712w3c29c64ag1defdee209c30aa1@mail.gmail.com>

To de sacanagem ;D haha

[]ss

On 10/3/07, Wendel Scardua <wendelscardua em gmail.com> wrote:
> On 10/3/07, Gabriel Vieira <gabriel.vieira em gmail.com> wrote:
> >
> > Faremos da maneira correta então.
> >
> >
>
> "da maneira correta" ? Desde quando o lema do Perl é "There Is Only One Way
> To Do It" ? :-)
>
> []s
>
> Wendel
>
> _______________________________________________
> Cascavel-pm mailing list
> Cascavel-pm em pm.org
> http://mail.pm.org/mailman/listinfo/cascavel-pm
>


-- 
Gabriel Vieira

From ptfzs em yahoo.com.br  Wed Oct  3 07:34:27 2007
From: ptfzs em yahoo.com.br (Patty Silva)
Date: Wed, 3 Oct 2007 11:34:27 -0300 (ART)
Subject: [Cascavel-pm] Duvida SPLIT
In-Reply-To: <726229b50710030641h3be53dfbla9c7a7f8e74c6187@mail.gmail.com>
Message-ID: <986484.45209.qm@web31306.mail.mud.yahoo.com>

Oii Pessoal..eu fiz como o Wendel falow...
@teste=split( /\s\s+/, $linha )
Funcionou em partes :D

porem ele perde a 1 coluna :D, no caso TESTE 

obrigada



Wendel Scardua <wendelscardua em gmail.com> escreveu: <anakin>NOOOOOOOOOO!!!!</anakin>

\s* = zero ou mais espaços
\s+ = um ou mais espaços
s\s+ (o da patty) = s seguido de um ou mais espaços (se bem que tá dentro de qq, não confiaria...)

Então, que tal  

split( /\s\s+/, $line )

?

[]s

Wendel

On 10/3/07, Thomas Britis <thomas em tcnet.com.br > wrote:split ("\s*", $line);

Patty Silva wrote:
> Ola Pessoal, 
> estou com um texto com formato estranho: preciso separa-los por 2
> espacos ou mais pq tem o campo de endereco que é 1 espaco so..
>
>
> ex:
>
> TESTE    te te te te te te                    TESTE1    TESTE2       TESTE3 
>
> preciso armazenar o: TESTE, o  te te te te te te , TESTE1, TESTE2 ....
> em um vetor...
>
> com split('s\s+',$line)  nao funcionou...
> Como posso fazer??
>
> Obrigada 
>

 _______________________________________________
Cascavel-pm mailing list
Cascavel-pm em pm.org
http://mail.pm.org/mailman/listinfo/cascavel-pm

       Abra sua conta no Yahoo! Mail, o único sem limite de espaço para armazenamento! 
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: http://mail.pm.org/pipermail/cascavel-pm/attachments/20071003/af062676/attachment.html 

From thomas em tcnet.com.br  Wed Oct  3 07:35:56 2007
From: thomas em tcnet.com.br (Thomas Britis)
Date: Wed, 03 Oct 2007 11:35:56 -0300
Subject: [Cascavel-pm] Duvida SPLIT
In-Reply-To: <726229b50710030641h3be53dfbla9c7a7f8e74c6187@mail.gmail.com>
References: <518489.20355.qm@web31306.mail.mud.yahoo.com>	<47039A76.1000208@tcnet.com.br>
	<726229b50710030641h3be53dfbla9c7a7f8e74c6187@mail.gmail.com>
Message-ID: <4703A8CC.7070805@tcnet.com.br>

Opa, falha de digitação. \s+ :)

\s\s+ não dá pois ela disse que em um dos casos tem um espaço só.



Wendel Scardua wrote:
> <anakin>NOOOOOOOOOO!!!!</anakin>
> 
> \s* = zero ou mais espaços
> \s+ = um ou mais espaços
> s\s+ (o da patty) = s seguido de um ou mais espaços (se bem que tá 
> dentro de qq, não confiaria...)
> 
> Então, que tal
> 
> split( /\s\s+/, $line )
> 
> ?
> 
> []s
> 
> Wendel
> 
> On 10/3/07, *Thomas Britis* <thomas em tcnet.com.br 
> <mailto:thomas em tcnet.com.br>> wrote:
> 
>     split ("\s*", $line);
> 
>     Patty Silva wrote:
>      > Ola Pessoal,
>      > estou com um texto com formato estranho: preciso separa-los por 2
>      > espacos ou mais pq tem o campo de endereco que é 1 espaco so..
>      >
>      >
>      > ex:
>      >
>      > TESTE    te te te te te
>     te                    TESTE1    TESTE2       TESTE3
>      >
>      > preciso armazenar o: TESTE, o  te te te te te te , TESTE1, TESTE2
>     ....
>      > em um vetor...
>      >
>      > com split('s\s+',$line)  nao funcionou...
>      > Como posso fazer??
>      >
>      > Obrigada
>      >
> 
> 
> 
> ------------------------------------------------------------------------
> 
> _______________________________________________
> Cascavel-pm mailing list
> Cascavel-pm em pm.org
> http://mail.pm.org/mailman/listinfo/cascavel-pm

-- 
Thomas Storino Britis
TCNet Informatica e Telecomunicacoes LTDA

From gabriel.vieira em gmail.com  Wed Oct  3 07:41:14 2007
From: gabriel.vieira em gmail.com (Gabriel Vieira)
Date: Wed, 3 Oct 2007 11:41:14 -0300
Subject: [Cascavel-pm] Duvida SPLIT
In-Reply-To: <4703A8CC.7070805@tcnet.com.br>
References: <518489.20355.qm@web31306.mail.mud.yahoo.com>
	<47039A76.1000208@tcnet.com.br>
	<726229b50710030641h3be53dfbla9c7a7f8e74c6187@mail.gmail.com>
	<4703A8CC.7070805@tcnet.com.br>
Message-ID: <83d8367f0710030741j7d2565faw52b227500a5879b4@mail.gmail.com>

Pois então,

esse que contém 1 espaço apenas devem ficar juntos em um campo único.
Seria o "te te te.." no caso.

On 10/3/07, Thomas Britis <thomas em tcnet.com.br> wrote:
> Opa, falha de digitação. \s+ :)
>
> \s\s+ não dá pois ela disse que em um dos casos tem um espaço só.
>
>
>
> Wendel Scardua wrote:
> > <anakin>NOOOOOOOOOO!!!!</anakin>
> >
> > \s* = zero ou mais espaços
> > \s+ = um ou mais espaços
> > s\s+ (o da patty) = s seguido de um ou mais espaços (se bem que tá
> > dentro de qq, não confiaria...)
> >
> > Então, que tal
> >
> > split( /\s\s+/, $line )
> >
> > ?
> >
> > []s
> >
> > Wendel
> >
> > On 10/3/07, *Thomas Britis* <thomas em tcnet.com.br
> > <mailto:thomas em tcnet.com.br>> wrote:
> >
> >     split ("\s*", $line);
> >
> >     Patty Silva wrote:
> >      > Ola Pessoal,
> >      > estou com um texto com formato estranho: preciso separa-los por 2
> >      > espacos ou mais pq tem o campo de endereco que é 1 espaco so..
> >      >
> >      >
> >      > ex:
> >      >
> >      > TESTE    te te te te te
> >     te                    TESTE1    TESTE2       TESTE3
> >      >
> >      > preciso armazenar o: TESTE, o  te te te te te te , TESTE1, TESTE2
> >     ....
> >      > em um vetor...
> >      >
> >      > com split('s\s+',$line)  nao funcionou...
> >      > Como posso fazer??
> >      >
> >      > Obrigada
> >      >
> >
> >
> >
> > ------------------------------------------------------------------------
> >
> > _______________________________________________
> > Cascavel-pm mailing list
> > Cascavel-pm em pm.org
> > http://mail.pm.org/mailman/listinfo/cascavel-pm
>
> --
> Thomas Storino Britis
> TCNet Informatica e Telecomunicacoes LTDA
> _______________________________________________
> Cascavel-pm mailing list
> Cascavel-pm em pm.org
> http://mail.pm.org/mailman/listinfo/cascavel-pm
>


-- 
Gabriel Vieira

From ptfzs em yahoo.com.br  Wed Oct  3 07:53:25 2007
From: ptfzs em yahoo.com.br (Patty Silva)
Date: Wed, 3 Oct 2007 11:53:25 -0300 (ART)
Subject: [Cascavel-pm] Duvida SPLIT
In-Reply-To: <83d8367f0710030741j7d2565faw52b227500a5879b4@mail.gmail.com>
Message-ID: <716240.22478.qm@web31311.mail.mud.yahoo.com>

Isso msm Gabriel.. os que estao com espaco simples tem q ir para 1 variavel somente. :)



Gabriel Vieira <gabriel.vieira em gmail.com> escreveu: Pois então,

esse que contém 1 espaço apenas devem ficar juntos em um campo único.
Seria o "te te te.." no caso.

On 10/3/07, Thomas Britis  wrote:
> Opa, falha de digitação. \s+ :)
>
> \s\s+ não dá pois ela disse que em um dos casos tem um espaço só.
>
>
>
> Wendel Scardua wrote:
> > NOOOOOOOOOO!!!!
> >
> > \s* = zero ou mais espaços
> > \s+ = um ou mais espaços
> > s\s+ (o da patty) = s seguido de um ou mais espaços (se bem que tá
> > dentro de qq, não confiaria...)
> >
> > Então, que tal
> >
> > split( /\s\s+/, $line )
> >
> > ?
> >
> > []s
> >
> > Wendel
> >
> > On 10/3/07, *Thomas Britis* 
> > > wrote:
> >
> >     split ("\s*", $line);
> >
> >     Patty Silva wrote:
> >      > Ola Pessoal,
> >      > estou com um texto com formato estranho: preciso separa-los por 2
> >      > espacos ou mais pq tem o campo de endereco que é 1 espaco so..
> >      >
> >      >
> >      > ex:
> >      >
> >      > TESTE    te te te te te
> >     te                    TESTE1    TESTE2       TESTE3
> >      >
> >      > preciso armazenar o: TESTE, o  te te te te te te , TESTE1, TESTE2
> >     ....
> >      > em um vetor...
> >      >
> >      > com split('s\s+',$line)  nao funcionou...
> >      > Como posso fazer??
> >      >
> >      > Obrigada
> >      >
> >
> >
> >
> > ------------------------------------------------------------------------
> >
> > _______________________________________________
> > Cascavel-pm mailing list
> > Cascavel-pm em pm.org
> > http://mail.pm.org/mailman/listinfo/cascavel-pm
>
> --
> Thomas Storino Britis
> TCNet Informatica e Telecomunicacoes LTDA
> _______________________________________________
> Cascavel-pm mailing list
> Cascavel-pm em pm.org
> http://mail.pm.org/mailman/listinfo/cascavel-pm
>


-- 
Gabriel Vieira
_______________________________________________
Cascavel-pm mailing list
Cascavel-pm em pm.org
http://mail.pm.org/mailman/listinfo/cascavel-pm


       Abra sua conta no Yahoo! Mail, o único sem limite de espaço para armazenamento! 
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: http://mail.pm.org/pipermail/cascavel-pm/attachments/20071003/c796208f/attachment.html 

From joenio em gmail.com  Fri Oct  5 06:35:34 2007
From: joenio em gmail.com (Joenio Costa)
Date: Fri, 5 Oct 2007 10:35:34 -0300
Subject: [Cascavel-pm] =?iso-8859-1?q?=5BOFF=5D_=5Bdivulga=E7=E3o=5D_Progr?=
	=?iso-8859-1?q?ama_de_Qualifica=E7=E3o_em_Software_Livre_=28PQSL?=
	=?iso-8859-1?q?=29_da_Colivre?=
In-Reply-To: <2a3a4a5d0709221204t4eb7436dhbb8fb1811b5ccb0c@mail.gmail.com>
References: <2a3a4a5d0709221204t4eb7436dhbb8fb1811b5ccb0c@mail.gmail.com>
Message-ID: <65934b450710050635i26e2ad56l97a1afdd7d58b67a@mail.gmail.com>

Repassando...

---------- Forwarded message ----------
From: Mônica Paz <monicapazz em gmail.com>
To: Integração do Projeto Software Livre Bahia <psl-ba em listas.dcc.ufba.br>

 Programa de Qualificação em Software Livre (PQSL) da Colivre.

 Visando a atender à crescente demanda dos mais diversos setores da
sociedade por qualificação em Software Livre, a Colivre está
promovendo, com o apoio da SaferNet Brasil, o primeiro Programa de
Qualificação na Bahia voltado exclusivamente para softwares livres.

 Com mais de 100 horas aula, distribuídas inicialmente em três cursos,
o Programa de Qualificação em Software Livre (PQSL) da Colivre visa,
então, à difusão dos softwares livres para os diversos setores da
sociedade, capacitando profissionais e amantes de tecnologia para o
uso e imersão nesse paradigma tecnológico inovador. Fazem parte do
programa os seguintes cursos, com inscrição até dia 16/10:

- GNU/Linux Básicos
- Administração de Redes com GNU/Linux
- Desenvolvendo sites colaborativos com TWiki

Assista à aula inaugural no dia 15/10 e saiba, no site abaixo, mais
informações e como participar! :-)

 http://www.colivre.coop.br

 Att,

 Equipe Colivre
 contato em colivre.coop.br
 Colivre - www.Colivre.coop.br
 Cooperativa de Tecnologias Livres.
 +55 71 3331-2299

From marcoaureliomacae em gmail.com  Sun Oct  7 06:58:34 2007
From: marcoaureliomacae em gmail.com (=?ISO-8859-1?Q?Marco_Aur=E9lio_(MACA=C9)?=)
Date: Sun, 7 Oct 2007 10:58:34 -0300
Subject: [Cascavel-pm] [OT] O Perl morreu? Longa vida ao Perl!
Message-ID: <e4b13b830710070658p220c6907xa42ad4df09f9b2a7@mail.gmail.com>

Bom dia, Caríssimos Amigos do Cascavel Perl Mongers,

Segue abaixo artigo extraído BR-Linux confirmando o crescimento e uso
da nossa admirável linguagem de programação:


- O Perl morreu? Longa vida ao Perl! [1]

JT Smith escreve no OnLamp sobre os comentários a respeito de o Perl
ter morrido ou estar morrendo, geralmente em comparação com outras
linguagens que recebem mais cobertura hoje, como PHP, Java, C#, Ruby,
Python, or [insira sua linguagem atual favorita]. Segundo ele, há
milhões de programadores Perl em atividade hoje, o Perl 5 está sendo
ativamente mantido e o Perl 6 está em desenvolvimento. Mais de 3000
módulos Perl foram lançados em 2006, e mais do que o dobro devem ser
lançados este ano.

E ele vai mais longe em sua argumentação a favor da vitalidade do
Perl: há grande número (milhares) de vagas abertas todos os meses para
desenvolvedores Perl no mercado dos EUA. O uso do Perl cresceu 700%
nos últimos 5 anos, mesmo com o grande número de outras opções de
linguagens que vêm se estabelecendo. A lista de sites que hoje se
baseiam ou incluem extensivamente o Perl em suas fundações tem nomes
como Yahoo!, Amazon, TicketMaster, Departamento de Estado dos EUA,
BBC, Slashdot.

Ele conclui que o Perl está vivo e em boa saúde, e continua sendo uma
boa escolha para grande variedade de projetos devido à sua
flexibilidade, poder e base de código extensa. Longa vida ao Perl, e
também às demais linguagens que fazem a popularidade do LAMP!


Abraços bem-sucedidos,
Marco Aurélio (MACAÉ)

Fonte:
[1] http://br-linux.org/linux/onlamp-o-perl-morreu.-longa-vida-ao-perl

From farinha.ufpr em gmail.com  Mon Oct  8 13:30:45 2007
From: farinha.ufpr em gmail.com (Arthur Renato Mello)
Date: Mon, 8 Oct 2007 17:30:45 -0300
Subject: [Cascavel-pm] Simulando tail -f
Message-ID: <60ecd11d0710081330k2d443015r2f7543eb37a99b9c@mail.gmail.com>

Ola Monges,

tenho o seguinte problema: Preciso simular um tail -f em um arquivo de
log. Mas com uma funcionalidade a mais, o arquivo pode mudar de nome
durante o processo (logrotate). Ou seja, eu comeco a monitorar o
arquivo "log.txt", apos um tempo o logrotate executa e o arquivo eh
renomeado para  "log-old.txt", e um novo log.txt eh criado. O script
precisa esquecer o "log-old.txt" (antigo log.txt que ja esta aberto) e
comecar a monitorar o novo log.txt.

Um agravante eh que quem solicitou nao gostaria de utilizar nenhum
modulo do CPAN, apenas o que for built in da linguagem.

Eu utilizei um codigo do perl FAQ que mostra como simular tail -f, e
acrescentei uma verificacao de inode (usando stat). Caso o inode do
arquivo com mesmo nome, seja diferente do que eu estou usando eu
preciso reabrir o arquivo.

O codigo funciona (esta colado no final). Porem eu estou perdendo as
primeiras linhas do "arquivo novo", a impressao eh que o comando tell,
utilizado no for de leitura soh comeca a fazer efeito quando o tamanho
do arquivo novo, passa o tamanaho do antigo. Algo como se o fdescritor
de arquivo estivesse apontando para uma posicao em bytes qqr e so
fosse comecara ler dali pra frente. Se isto estiver certo gostaria de
alguma ideia de como fazer esse apontador voltar pro comeco do
arquivo.

Espero ter me feito entender :). Desde jah agradeco sugestoes de
solucoes ou novas abordagens:

==============================================
#!/usr/bin/perl

use strict;
use warnings;
#use Fcntl qw(:seek);

sub usage{
    print("USAGE: $0 <LOGFILE>\n");
    exit(1);
}

(@ARGV != 1) and usage();

(my $filename) = @ARGV;

open(LOG, $filename) or die "Unable to open $filename: $!";

my @old_file;
my @new_file;

@old_file = stat($filename);

my $w_time = 1;
my $pos;

my $count = 0;
my $changed = 0;
my $test_file_interval = 10;

while(1){
    $pos = 0;

    for($pos = tell(LOG); $_ = <LOG>; $pos = tell(LOG)){
        print;
    }

    if($changed){
        $changed = 0;

        close(LOG);

        while(! -r $filename){
            sleep($w_time);
        }

        open(LOG, $filename);
    }

    if($count == $test_file_interval){
        $count = 0;

        @new_file = stat($filename);
        if(!defined($new_file[1]) or $old_file[1] != $new_file[1]){
            $changed = 1;
        }
    }

    sleep($w_time);
    seek(LOG, $pos, 0);

    $count++;
}
 ==============================================

[]s
Arthur

From wendelscardua em gmail.com  Mon Oct  8 14:20:32 2007
From: wendelscardua em gmail.com (Wendel Scardua)
Date: Mon, 8 Oct 2007 18:20:32 -0300
Subject: [Cascavel-pm] Simulando tail -f
In-Reply-To: <60ecd11d0710081330k2d443015r2f7543eb37a99b9c@mail.gmail.com>
References: <60ecd11d0710081330k2d443015r2f7543eb37a99b9c@mail.gmail.com>
Message-ID: <726229b50710081420y464e7d85ga20a11ec05e9b212@mail.gmail.com>

Não olhei direito o código, mas me parece que falta fazer um $pos = 0; na
hora em que você abre o arquivo novamente...

[]s
Wendel

On 10/8/07, Arthur Renato Mello <farinha.ufpr em gmail.com> wrote:
>
> Ola Monges,
>
> tenho o seguinte problema: Preciso simular um tail -f em um arquivo de
> log. Mas com uma funcionalidade a mais, o arquivo pode mudar de nome
> durante o processo (logrotate). Ou seja, eu comeco a monitorar o
> arquivo "log.txt", apos um tempo o logrotate executa e o arquivo eh
> renomeado para  "log-old.txt", e um novo log.txt eh criado. O script
> precisa esquecer o "log-old.txt" (antigo log.txt que ja esta aberto) e
> comecar a monitorar o novo log.txt.
>
> Um agravante eh que quem solicitou nao gostaria de utilizar nenhum
> modulo do CPAN, apenas o que for built in da linguagem.
>
> Eu utilizei um codigo do perl FAQ que mostra como simular tail -f, e
> acrescentei uma verificacao de inode (usando stat). Caso o inode do
> arquivo com mesmo nome, seja diferente do que eu estou usando eu
> preciso reabrir o arquivo.
>
> O codigo funciona (esta colado no final). Porem eu estou perdendo as
> primeiras linhas do "arquivo novo", a impressao eh que o comando tell,
> utilizado no for de leitura soh comeca a fazer efeito quando o tamanho
> do arquivo novo, passa o tamanaho do antigo. Algo como se o fdescritor
> de arquivo estivesse apontando para uma posicao em bytes qqr e so
> fosse comecara ler dali pra frente. Se isto estiver certo gostaria de
> alguma ideia de como fazer esse apontador voltar pro comeco do
> arquivo.
>
> Espero ter me feito entender :). Desde jah agradeco sugestoes de
> solucoes ou novas abordagens:
>
> ==============================================
> #!/usr/bin/perl
>
> use strict;
> use warnings;
> #use Fcntl qw(:seek);
>
> sub usage{
>     print("USAGE: $0 <LOGFILE>\n");
>     exit(1);
> }
>
> (@ARGV != 1) and usage();
>
> (my $filename) = @ARGV;
>
> open(LOG, $filename) or die "Unable to open $filename: $!";
>
> my @old_file;
> my @new_file;
>
> @old_file = stat($filename);
>
> my $w_time = 1;
> my $pos;
>
> my $count = 0;
> my $changed = 0;
> my $test_file_interval = 10;
>
> while(1){
>     $pos = 0;
>
>     for($pos = tell(LOG); $_ = <LOG>; $pos = tell(LOG)){
>         print;
>     }
>
>     if($changed){
>         $changed = 0;
>
>         close(LOG);
>
>         while(! -r $filename){
>             sleep($w_time);
>         }
>
>         open(LOG, $filename);
>     }
>
>     if($count == $test_file_interval){
>         $count = 0;
>
>         @new_file = stat($filename);
>         if(!defined($new_file[1]) or $old_file[1] != $new_file[1]){
>             $changed = 1;
>         }
>     }
>
>     sleep($w_time);
>     seek(LOG, $pos, 0);
>
>     $count++;
> }
> ==============================================
>
> []s
> Arthur
> ___________________________________________
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: http://mail.pm.org/pipermail/cascavel-pm/attachments/20071008/91d8cdfc/attachment.html 

From igor.sutton em yahoo.co.uk  Mon Oct  8 14:54:06 2007
From: igor.sutton em yahoo.co.uk (Igor Sutton Lopes)
Date: Mon, 8 Oct 2007 23:54:06 +0200
Subject: [Cascavel-pm] Simulando tail -f
In-Reply-To: <60ecd11d0710081330k2d443015r2f7543eb37a99b9c@mail.gmail.com>
References: <60ecd11d0710081330k2d443015r2f7543eb37a99b9c@mail.gmail.com>
Message-ID: <92ED0F68-FDF0-4F99-BFD6-ED3862B83BAA@yahoo.co.uk>


On Oct 8, 2007, at 10:30 PM, Arthur Renato Mello wrote:

> Ola Monges,
>
> <snip>

File::Tail
POE::Wheel::FollowTail

-- Igor


From ricardostock em bol.com.br  Mon Oct  8 19:26:06 2007
From: ricardostock em bol.com.br (Ricardo Stock)
Date: Mon, 8 Oct 2007 23:26:06 -0300
Subject: [Cascavel-pm] smtp via perl
Message-ID: <000701c80a1b$c323fed0$0200a8c0@Ricardo>

boa noite a todos da lista.... gente to com uma duvida..... o script parece 
correto, mas não funciona.... isto é possivel ?? não me da nenhum erro


#!c:\perl\bin\perl.exe

use warnings;
use strict;
use CGI qw(:standard);
#use CGI::Carp qw(fatalsToBrowser warningsToBrowser);

my $servidor='smtps.bol.com.br'; #exemplo
my $usuario='usuario';  # ja tentei coloar com @ e dominio mas também não 
funciona
my $senha='senha';
my $de=param('de');
my $para=param('para');
my $mensagem=param('mensagem');
my $titulo='mensagem de teste';


use Net::SMTP_auth;
my $smtp = Net::SMTP_auth->new("$servidor", Timeout=>60, Debug=>1);
$smtp->auth('PLAIN',$usuario,$senha);
$smtp->mail($de);
$smtp->to($para);
$smtp->data();
$smtp->datasend("To: $para\n");
$smtp->datasend("From: $de\n");
$smtp->datasend("Subject: $titulo\n");
$smtp->datasend("Content-type: text/html\n\n");
$smtp->datasend($mensagem);
$smtp->dataend();
$smtp->quit;

print "Content-type: text/html\n\n";
print "E-mail enviado!";


estou tentando mandar e-mail via smtp, atraves do perl... consultando na net 
e vendo uns modulos, fiz ese script, mas não estou recebemdo os e-mails 
enviados pela pagina de envio.... se alguem tiver uma dica... agradeço.... 
se também isto não for mais possivel, paciencia... :-)

Desde já agradeço a qualquer ajuda ou dica.... Obrigado

Ricardo Stock
ricardostock em bol.com.br 


From glasswalk3r em hotmail.com  Tue Oct  9 05:54:58 2007
From: glasswalk3r em hotmail.com (Alceu Rodrigues de Freitas Junior)
Date: Tue, 9 Oct 2007 15:54:58 +0300
Subject: [Cascavel-pm] smtp via perl
In-Reply-To: <000701c80a1b$c323fed0$0200a8c0@Ricardo>
References: <000701c80a1b$c323fed0$0200a8c0@Ricardo>
Message-ID: <BAY121-W23DDF5F8DC3D22F5007BC1F5A50@phx.gbl>

Ricardo,

Teste conexão com o servidor SMTP usando telnet mesmo... para você ter certeza que está usando parâmetros corretos para conexão.

No mais, pelo que vi você está forçando o método de autenticação "PLAIN". Existe um método nesse mesmo módulo que retorna todos os métodos de autenticação que o servidor suporta, dê uma olhada se plain está incluído.

[]'s

---
Alceu Rodrigues de Freitas Junior
glasswalk3r em hotmail.com


> From: ricardostock em bol.com.br
> To: cascavel-pm em pm.org
> Date: Mon, 8 Oct 2007 23:26:06 -0300
> Subject: [Cascavel-pm] smtp via perl
> 
> boa noite a todos da lista.... gente to com uma duvida..... o script parece 
> correto, mas não funciona.... isto é possivel ?? não me da nenhum erro
> 
> 
> #!c:\perl\bin\perl.exe
> 
> use warnings;
> use strict;
> use CGI qw(:standard);
> #use CGI::Carp qw(fatalsToBrowser warningsToBrowser);
> 
> my $servidor='smtps.bol.com.br'; #exemplo
> my $usuario='usuario';  # ja tentei coloar com @ e dominio mas também não 
> funciona
> my $senha='senha';
> my $de=param('de');
> my $para=param('para');
> my $mensagem=param('mensagem');
> my $titulo='mensagem de teste';
> 
> 
> use Net::SMTP_auth;
> my $smtp = Net::SMTP_auth->new("$servidor", Timeout=>60, Debug=>1);
> $smtp->auth('PLAIN',$usuario,$senha);
> $smtp->mail($de);
> $smtp->to($para);
> $smtp->data();
> $smtp->datasend("To: $para\n");
> $smtp->datasend("From: $de\n");
> $smtp->datasend("Subject: $titulo\n");
> $smtp->datasend("Content-type: text/html\n\n");
> $smtp->datasend($mensagem);
> $smtp->dataend();
> $smtp->quit;
> 
> print "Content-type: text/html\n\n";
> print "E-mail enviado!";
> 
> 
> estou tentando mandar e-mail via smtp, atraves do perl... consultando na net 
> e vendo uns modulos, fiz ese script, mas não estou recebemdo os e-mails 
> enviados pela pagina de envio.... se alguem tiver uma dica... agradeço.... 
> se também isto não for mais possivel, paciencia... :-)


_________________________________________________________________
Explore the seven wonders of the world
http://search.msn.com/results.aspx?q=7+wonders+world&mkt=en-US&form=QBRE
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: http://mail.pm.org/pipermail/cascavel-pm/attachments/20071009/96c2c2ab/attachment.html 

From mdacwb em gmail.com  Tue Oct  9 11:06:36 2007
From: mdacwb em gmail.com (Marco A P D'Andrade)
Date: Tue, 9 Oct 2007 15:06:36 -0300
Subject: [Cascavel-pm] smtp via perl
In-Reply-To: <BAY121-W23DDF5F8DC3D22F5007BC1F5A50@phx.gbl>
References: <000701c80a1b$c323fed0$0200a8c0@Ricardo>
	<BAY121-W23DDF5F8DC3D22F5007BC1F5A50@phx.gbl>
Message-ID: <42dcdd750710091106w724caf5fla5ca9d6eb942380f@mail.gmail.com>

Além disso, é sempre importante fazer teste de retorno, em especial:

my $smtp = Net::SMTP_auth->new("$servidor", Timeout=>60, Debug=>1);

$smtp->mail($de); << a maioria das vezes deve ser o mesmo de login
$smtp->to($para); << pode ser recusado, mas não exige abort para

Como vc não está fazendo logs, ficará dificil saber em qq momento as
causas de falha.


Sds,
Marco Antonio


Em 09/10/07, Alceu Rodrigues de Freitas
Junior<glasswalk3r em hotmail.com> escreveu:
>
> Ricardo,
>
> Teste conexão com o servidor SMTP usando telnet mesmo... para você ter
> certeza que está usando parâmetros corretos para conexão.
>
> No mais, pelo que vi você está forçando o método de autenticação "PLAIN".
> Existe um método nesse mesmo módulo que retorna todos os métodos de
> autenticação que o servidor suporta, dê uma olhada se plain está incluído.
>
> []'s
>
> ---
> Alceu Rodrigues de Freitas Junior
> glasswalk3r em hotmail.com
>
>
> ________________________________
> > From: ricardostock em bol.com.br
> > To: cascavel-pm em pm.org
> > Date: Mon, 8 Oct 2007 23:26:06 -0300
> > Subject: [Cascavel-pm] smtp via perl
>
> >
> > boa noite a todos da lista.... gente to com uma duvida..... o script
> parece
> > correto, mas não funciona.... isto é possivel ?? não me da nenhum erro
> >
> >
> > #!c:\perl\bin\perl.exe
> >
> > use warnings;
> > use strict;
> > use CGI qw(:standard);
> > #use CGI::Carp qw(fatalsToBrowser warningsToBrowser);
> >
> > my $servidor='smtps.bol.com.br'; #exemplo
> > my $usuario='usuario'; # ja tentei coloar com @ e dominio mas também não
> > funciona
> > my $senha='senha';
> > my $de=param('de');
> > my $para=param('para');
> > my $mensagem=param('mensagem');
> > my $titulo='mensagem de teste';
> >
> >
> > use Net::SMTP_auth;
> > my $smtp = Net::SMTP_auth->new("$servidor", Timeout=>60,
> Debug=>1);
> > $smtp->auth('PLAIN',$usuario,$senha);
> > $smtp->mail($de);
> > $smtp->to($para);
> > $smtp->data();
> > $smtp->datasend("To: $para\n");
> > $smtp->datasend("From: $de\n");
> > $smtp->datasend("Subject: $titulo\n");
> > $smtp->datasend("Content-type: text/html\n\n");
> > $smtp->datasend($mensagem);
> > $smtp->dataend();
> > $smtp->quit;
> >
> > print "Content-type: text/html\n\n";
> > print "E-mail enviado!";
> >
> >
> > estou tentando mandar e-mail via smtp, atraves do perl... consultando na
> net
> > e vendo uns modulos, fiz ese script, mas não estou recebemdo os e-mails
> > enviados pela pagina de envio.... se alguem tiver uma dica... agradeço....
> > se também isto não for mais possivel, paciencia... :-)
>
>
> ________________________________
> Explore the seven wonders of the world Learn more!
> _______________________________________________
> Cascavel-pm mailing list
> Cascavel-pm em pm.org
> http://mail.pm.org/mailman/listinfo/cascavel-pm
>

From ricardostock em bol.com.br  Tue Oct  9 11:28:57 2007
From: ricardostock em bol.com.br (Ricardo Stock)
Date: Tue, 9 Oct 2007 15:28:57 -0300
Subject: [Cascavel-pm] smtp via perl
References: <000701c80a1b$c323fed0$0200a8c0@Ricardo><BAY121-W23DDF5F8DC3D22F5007BC1F5A50@phx.gbl>
	<42dcdd750710091106w724caf5fla5ca9d6eb942380f@mail.gmail.com>
Message-ID: <003601c80aa2$45014530$0200a8c0@Ricardo>

poxa como não vi isso antes... valeu mesmo Marco, o que estava dando errado 
era que a variavel "de" tinha que ser o mesmo do usuário.....

Obrigado pelo toque....

----- Original Message ----- 
From: "Marco A P D'Andrade" <mdacwb em gmail.com>
To: "Cascavel Perl Mongers" <cascavel-pm em pm.org>
Sent: Tuesday, October 09, 2007 3:06 PM
Subject: Re: [Cascavel-pm] smtp via perl


Além disso, é sempre importante fazer teste de retorno, em especial:

my $smtp = Net::SMTP_auth->new("$servidor", Timeout=>60, Debug=>1);

$smtp->mail($de); << a maioria das vezes deve ser o mesmo de login
$smtp->to($para); << pode ser recusado, mas não exige abort para

Como vc não está fazendo logs, ficará dificil saber em qq momento as
causas de falha.


Sds,
Marco Antonio


Em 09/10/07, Alceu Rodrigues de Freitas
Junior<glasswalk3r em hotmail.com> escreveu:
>
> Ricardo,
>
> Teste conexão com o servidor SMTP usando telnet mesmo... para você ter
> certeza que está usando parâmetros corretos para conexão.
>
> No mais, pelo que vi você está forçando o método de autenticação "PLAIN".
> Existe um método nesse mesmo módulo que retorna todos os métodos de
> autenticação que o servidor suporta, dê uma olhada se plain está incluído.
>
> []'s
>
> ---
> Alceu Rodrigues de Freitas Junior
> glasswalk3r em hotmail.com
>
>
> ________________________________
> > From: ricardostock em bol.com.br
> > To: cascavel-pm em pm.org
> > Date: Mon, 8 Oct 2007 23:26:06 -0300
> > Subject: [Cascavel-pm] smtp via perl
>
> >
> > boa noite a todos da lista.... gente to com uma duvida..... o script
> parece
> > correto, mas não funciona.... isto é possivel ?? não me da nenhum erro
> >
> >
> > #!c:\perl\bin\perl.exe
> >
> > use warnings;
> > use strict;
> > use CGI qw(:standard);
> > #use CGI::Carp qw(fatalsToBrowser warningsToBrowser);
> >
> > my $servidor='smtps.bol.com.br'; #exemplo
> > my $usuario='usuario'; # ja tentei coloar com @ e dominio mas também não
> > funciona
> > my $senha='senha';
> > my $de=param('de');
> > my $para=param('para');
> > my $mensagem=param('mensagem');
> > my $titulo='mensagem de teste';
> >
> >
> > use Net::SMTP_auth;
> > my $smtp = Net::SMTP_auth->new("$servidor", Timeout=>60,
> Debug=>1);
> > $smtp->auth('PLAIN',$usuario,$senha);
> > $smtp->mail($de);
> > $smtp->to($para);
> > $smtp->data();
> > $smtp->datasend("To: $para\n");
> > $smtp->datasend("From: $de\n");
> > $smtp->datasend("Subject: $titulo\n");
> > $smtp->datasend("Content-type: text/html\n\n");
> > $smtp->datasend($mensagem);
> > $smtp->dataend();
> > $smtp->quit;
> >
> > print "Content-type: text/html\n\n";
> > print "E-mail enviado!";
> >
> >
> > estou tentando mandar e-mail via smtp, atraves do perl... consultando na
> net
> > e vendo uns modulos, fiz ese script, mas não estou recebemdo os e-mails
> > enviados pela pagina de envio.... se alguem tiver uma dica... 
> > agradeço....
> > se também isto não for mais possivel, paciencia... :-)
>
>
> ________________________________
> Explore the seven wonders of the world Learn more!
> _______________________________________________
> Cascavel-pm mailing list
> Cascavel-pm em pm.org
> http://mail.pm.org/mailman/listinfo/cascavel-pm
>
_______________________________________________
Cascavel-pm mailing list
Cascavel-pm em pm.org
http://mail.pm.org/mailman/listinfo/cascavel-pm 


From jaja.gabriel em gmail.com  Tue Oct  9 15:13:00 2007
From: jaja.gabriel em gmail.com (Joao Gabriel C. Laass)
Date: Tue, 9 Oct 2007 19:13:00 -0300
Subject: [Cascavel-pm] smtp via perl
In-Reply-To: <003601c80aa2$45014530$0200a8c0@Ricardo>
References: <000701c80a1b$c323fed0$0200a8c0@Ricardo>
	<BAY121-W23DDF5F8DC3D22F5007BC1F5A50@phx.gbl>
	<42dcdd750710091106w724caf5fla5ca9d6eb942380f@mail.gmail.com>
	<003601c80aa2$45014530$0200a8c0@Ricardo>
Message-ID: <8ff2963a0710091513x67eded6cma4f87492bab2d605@mail.gmail.com>

Dependendo do servidor eu uso o Net::SMTP_auth p/ fazer login em
servidores externos.

-- 
Um abraço,
João Gabriel C. Laass
Página pessoal - www.JGCL.pt.to
CGiClube.net - www.CGiClube.net
Vitória Perl Mongers - Vitoria.pm.org




Em 09/10/07, Ricardo Stock<ricardostock em bol.com.br> escreveu:
> poxa como não vi isso antes... valeu mesmo Marco, o que estava dando errado
> era que a variavel "de" tinha que ser o mesmo do usuário.....
>
> Obrigado pelo toque....
>
> ----- Original Message -----
> From: "Marco A P D'Andrade" <mdacwb em gmail.com>
> To: "Cascavel Perl Mongers" <cascavel-pm em pm.org>
> Sent: Tuesday, October 09, 2007 3:06 PM
> Subject: Re: [Cascavel-pm] smtp via perl
>
>
> Além disso, é sempre importante fazer teste de retorno, em especial:
>
> my $smtp = Net::SMTP_auth->new("$servidor", Timeout=>60, Debug=>1);
>
> $smtp->mail($de); << a maioria das vezes deve ser o mesmo de login
> $smtp->to($para); << pode ser recusado, mas não exige abort para
>
> Como vc não está fazendo logs, ficará dificil saber em qq momento as
> causas de falha.
>
>
> Sds,
> Marco Antonio
>
>
> Em 09/10/07, Alceu Rodrigues de Freitas
> Junior<glasswalk3r em hotmail.com> escreveu:
> >
> > Ricardo,
> >
> > Teste conexão com o servidor SMTP usando telnet mesmo... para você ter
> > certeza que está usando parâmetros corretos para conexão.
> >
> > No mais, pelo que vi você está forçando o método de autenticação "PLAIN".
> > Existe um método nesse mesmo módulo que retorna todos os métodos de
> > autenticação que o servidor suporta, dê uma olhada se plain está incluído.
> >
> > []'s
> >
> > ---
> > Alceu Rodrigues de Freitas Junior
> > glasswalk3r em hotmail.com
> >
> >
> > ________________________________
> > > From: ricardostock em bol.com.br
> > > To: cascavel-pm em pm.org
> > > Date: Mon, 8 Oct 2007 23:26:06 -0300
> > > Subject: [Cascavel-pm] smtp via perl
> >
> > >
> > > boa noite a todos da lista.... gente to com uma duvida..... o script
> > parece
> > > correto, mas não funciona.... isto é possivel ?? não me da nenhum erro
> > >
> > >
> > > #!c:\perl\bin\perl.exe
> > >
> > > use warnings;
> > > use strict;
> > > use CGI qw(:standard);
> > > #use CGI::Carp qw(fatalsToBrowser warningsToBrowser);
> > >
> > > my $servidor='smtps.bol.com.br'; #exemplo
> > > my $usuario='usuario'; # ja tentei coloar com @ e dominio mas também não
> > > funciona
> > > my $senha='senha';
> > > my $de=param('de');
> > > my $para=param('para');
> > > my $mensagem=param('mensagem');
> > > my $titulo='mensagem de teste';
> > >
> > >
> > > use Net::SMTP_auth;
> > > my $smtp = Net::SMTP_auth->new("$servidor", Timeout=>60,
> > Debug=>1);
> > > $smtp->auth('PLAIN',$usuario,$senha);
> > > $smtp->mail($de);
> > > $smtp->to($para);
> > > $smtp->data();
> > > $smtp->datasend("To: $para\n");
> > > $smtp->datasend("From: $de\n");
> > > $smtp->datasend("Subject: $titulo\n");
> > > $smtp->datasend("Content-type: text/html\n\n");
> > > $smtp->datasend($mensagem);
> > > $smtp->dataend();
> > > $smtp->quit;
> > >
> > > print "Content-type: text/html\n\n";
> > > print "E-mail enviado!";
> > >
> > >
> > > estou tentando mandar e-mail via smtp, atraves do perl... consultando na
> > net
> > > e vendo uns modulos, fiz ese script, mas não estou recebemdo os e-mails
> > > enviados pela pagina de envio.... se alguem tiver uma dica...
> > > agradeço....
> > > se também isto não for mais possivel, paciencia... :-)
> >
> >
> > ________________________________
> > Explore the seven wonders of the world Learn more!
> > _______________________________________________
> > Cascavel-pm mailing list
> > Cascavel-pm em pm.org
> > http://mail.pm.org/mailman/listinfo/cascavel-pm
> >
> _______________________________________________
> Cascavel-pm mailing list
> Cascavel-pm em pm.org
> http://mail.pm.org/mailman/listinfo/cascavel-pm
>
> _______________________________________________
> Cascavel-pm mailing list
> Cascavel-pm em pm.org
> http://mail.pm.org/mailman/listinfo/cascavel-pm
>

From jaja.gabriel em gmail.com  Tue Oct  9 15:14:10 2007
From: jaja.gabriel em gmail.com (Joao Gabriel C. Laass)
Date: Tue, 9 Oct 2007 19:14:10 -0300
Subject: [Cascavel-pm] smtp via perl
In-Reply-To: <8ff2963a0710091513x67eded6cma4f87492bab2d605@mail.gmail.com>
References: <000701c80a1b$c323fed0$0200a8c0@Ricardo>
	<BAY121-W23DDF5F8DC3D22F5007BC1F5A50@phx.gbl>
	<42dcdd750710091106w724caf5fla5ca9d6eb942380f@mail.gmail.com>
	<003601c80aa2$45014530$0200a8c0@Ricardo>
	<8ff2963a0710091513x67eded6cma4f87492bab2d605@mail.gmail.com>
Message-ID: <8ff2963a0710091514v5959657fr7daf5043109ea5e@mail.gmail.com>

Ops!!
Li com pressa e não li que você também usa o "Net::SMTP_auth" :P
Malz galera.

-- 
Um abraço,
João Gabriel C. Laass
Página pessoal - www.JGCL.pt.to
CGiClube.net - www.CGiClube.net
Vitória Perl Mongers - Vitoria.pm.org






Em 09/10/07, Joao Gabriel C. Laass<jaja.gabriel em gmail.com> escreveu:
> Dependendo do servidor eu uso o Net::SMTP_auth p/ fazer login em
> servidores externos.
>
> --
> Um abraço,
> João Gabriel C. Laass
> Página pessoal - www.JGCL.pt.to
> CGiClube.net - www.CGiClube.net
> Vitória Perl Mongers - Vitoria.pm.org
>
>
>
>
> Em 09/10/07, Ricardo Stock<ricardostock em bol.com.br> escreveu:
> > poxa como não vi isso antes... valeu mesmo Marco, o que estava dando errado
> > era que a variavel "de" tinha que ser o mesmo do usuário.....
> >
> > Obrigado pelo toque....
> >
> > ----- Original Message -----
> > From: "Marco A P D'Andrade" <mdacwb em gmail.com>
> > To: "Cascavel Perl Mongers" <cascavel-pm em pm.org>
> > Sent: Tuesday, October 09, 2007 3:06 PM
> > Subject: Re: [Cascavel-pm] smtp via perl
> >
> >
> > Além disso, é sempre importante fazer teste de retorno, em especial:
> >
> > my $smtp = Net::SMTP_auth->new("$servidor", Timeout=>60, Debug=>1);
> >
> > $smtp->mail($de); << a maioria das vezes deve ser o mesmo de login
> > $smtp->to($para); << pode ser recusado, mas não exige abort para
> >
> > Como vc não está fazendo logs, ficará dificil saber em qq momento as
> > causas de falha.
> >
> >
> > Sds,
> > Marco Antonio
> >
> >
> > Em 09/10/07, Alceu Rodrigues de Freitas
> > Junior<glasswalk3r em hotmail.com> escreveu:
> > >
> > > Ricardo,
> > >
> > > Teste conexão com o servidor SMTP usando telnet mesmo... para você ter
> > > certeza que está usando parâmetros corretos para conexão.
> > >
> > > No mais, pelo que vi você está forçando o método de autenticação "PLAIN".
> > > Existe um método nesse mesmo módulo que retorna todos os métodos de
> > > autenticação que o servidor suporta, dê uma olhada se plain está incluído.
> > >
> > > []'s
> > >
> > > ---
> > > Alceu Rodrigues de Freitas Junior
> > > glasswalk3r em hotmail.com
> > >
> > >
> > > ________________________________
> > > > From: ricardostock em bol.com.br
> > > > To: cascavel-pm em pm.org
> > > > Date: Mon, 8 Oct 2007 23:26:06 -0300
> > > > Subject: [Cascavel-pm] smtp via perl
> > >
> > > >
> > > > boa noite a todos da lista.... gente to com uma duvida..... o script
> > > parece
> > > > correto, mas não funciona.... isto é possivel ?? não me da nenhum erro
> > > >
> > > >
> > > > #!c:\perl\bin\perl.exe
> > > >
> > > > use warnings;
> > > > use strict;
> > > > use CGI qw(:standard);
> > > > #use CGI::Carp qw(fatalsToBrowser warningsToBrowser);
> > > >
> > > > my $servidor='smtps.bol.com.br'; #exemplo
> > > > my $usuario='usuario'; # ja tentei coloar com @ e dominio mas também não
> > > > funciona
> > > > my $senha='senha';
> > > > my $de=param('de');
> > > > my $para=param('para');
> > > > my $mensagem=param('mensagem');
> > > > my $titulo='mensagem de teste';
> > > >
> > > >
> > > > use Net::SMTP_auth;
> > > > my $smtp = Net::SMTP_auth->new("$servidor", Timeout=>60,
> > > Debug=>1);
> > > > $smtp->auth('PLAIN',$usuario,$senha);
> > > > $smtp->mail($de);
> > > > $smtp->to($para);
> > > > $smtp->data();
> > > > $smtp->datasend("To: $para\n");
> > > > $smtp->datasend("From: $de\n");
> > > > $smtp->datasend("Subject: $titulo\n");
> > > > $smtp->datasend("Content-type: text/html\n\n");
> > > > $smtp->datasend($mensagem);
> > > > $smtp->dataend();
> > > > $smtp->quit;
> > > >
> > > > print "Content-type: text/html\n\n";
> > > > print "E-mail enviado!";
> > > >
> > > >
> > > > estou tentando mandar e-mail via smtp, atraves do perl... consultando na
> > > net
> > > > e vendo uns modulos, fiz ese script, mas não estou recebemdo os e-mails
> > > > enviados pela pagina de envio.... se alguem tiver uma dica...
> > > > agradeço....
> > > > se também isto não for mais possivel, paciencia... :-)
> > >
> > >
> > > ________________________________
> > > Explore the seven wonders of the world Learn more!
> > > _______________________________________________
> > > Cascavel-pm mailing list
> > > Cascavel-pm em pm.org
> > > http://mail.pm.org/mailman/listinfo/cascavel-pm
> > >
> > _______________________________________________
> > Cascavel-pm mailing list
> > Cascavel-pm em pm.org
> > http://mail.pm.org/mailman/listinfo/cascavel-pm
> >
> > _______________________________________________
> > Cascavel-pm mailing list
> > Cascavel-pm em pm.org
> > http://mail.pm.org/mailman/listinfo/cascavel-pm
> >
>

From agnaldo em starweb-software.com.br  Wed Oct 10 05:05:23 2007
From: agnaldo em starweb-software.com.br (Agnaldo Macedo)
Date: Wed, 10 Oct 2007 09:05:23 -0300
Subject: [Cascavel-pm] Identificar SO
References: <000701c80a1b$c323fed0$0200a8c0@Ricardo><BAY121-W23DDF5F8DC3D22F5007BC1F5A50@phx.gbl><42dcdd750710091106w724caf5fla5ca9d6eb942380f@mail.gmail.com><003601c80aa2$45014530$0200a8c0@Ricardo>
	<8ff2963a0710091513x67eded6cma4f87492bab2d605@mail.gmail.com>
Message-ID: <000401c80b35$d680da00$6401a8c0@swmobile>


Olá Pessoal.

Existe alguma função no Perl que identifique qual sistema operacional esta 
sendo usado?

No caso, se é WIN32 ou Unix/Linux


From acid06 em gmail.com  Wed Oct 10 05:06:46 2007
From: acid06 em gmail.com (Nilson Santos Figueiredo Junior)
Date: Wed, 10 Oct 2007 09:06:46 -0300
Subject: [Cascavel-pm] Identificar SO
In-Reply-To: <000401c80b35$d680da00$6401a8c0@swmobile>
References: <000701c80a1b$c323fed0$0200a8c0@Ricardo>
	<BAY121-W23DDF5F8DC3D22F5007BC1F5A50@phx.gbl>
	<42dcdd750710091106w724caf5fla5ca9d6eb942380f@mail.gmail.com>
	<003601c80aa2$45014530$0200a8c0@Ricardo>
	<8ff2963a0710091513x67eded6cma4f87492bab2d605@mail.gmail.com>
	<000401c80b35$d680da00$6401a8c0@swmobile>
Message-ID: <9a08c9b40710100506r3a1bff8axd96e751fc84055bb@mail.gmail.com>

On 10/10/07, Agnaldo Macedo <agnaldo em starweb-software.com.br> wrote:
> Existe alguma função no Perl que identifique qual sistema operacional esta
> sendo usado?

perldoc perlvar

Use a variável especial $^O.

-Nilson Santos F. Jr.

From fernandolouis em terra.com.br  Wed Oct 10 06:33:49 2007
From: fernandolouis em terra.com.br (fernandolouis em terra.com.br)
Date: Wed, 10 Oct 2007 10:33:49 -0300
Subject: [Cascavel-pm] Identificar SO
References: <000701c80a1b$c323fed0$0200a8c0@Ricardo><BAY121-W23DDF5F8DC3D22F5007BC1F5A50@phx.gbl><42dcdd750710091106w724caf5fla5ca9d6eb942380f@mail.gmail.com><003601c80aa2$45014530$0200a8c0@Ricardo><8ff2963a0710091513x67eded6cma4f87492bab2d605@mail.gmail.com><000401c80b35$d680da00$6401a8c0@swmobile>
	<9a08c9b40710100506r3a1bff8axd96e751fc84055bb@mail.gmail.com>
Message-ID: <001d01c80b42$31596b70$2801a8c0@servidorliz>

Se é uma página web, não vai retornar o SO do cliente, sempre do servidor. 
Estou certo?

[]s,
Fernando

----- Original Message ----- 
From: "Nilson Santos Figueiredo Junior" <acid06 em gmail.com>
To: "Agnaldo Macedo" <agnaldo em starweb-software.com.br>; "Cascavel Perl 
Mongers" <cascavel-pm em pm.org>
Sent: Wednesday, October 10, 2007 9:06 AM
Subject: Re: [Cascavel-pm] Identificar SO


On 10/10/07, Agnaldo Macedo <agnaldo em starweb-software.com.br> wrote:
> Existe alguma função no Perl que identifique qual sistema operacional esta
> sendo usado?

perldoc perlvar

Use a variável especial $^O.

-Nilson Santos F. Jr.
_______________________________________________
Cascavel-pm mailing list
Cascavel-pm em pm.org
http://mail.pm.org/mailman/listinfo/cascavel-pm


From glasswalk3r em hotmail.com  Wed Oct 10 06:56:03 2007
From: glasswalk3r em hotmail.com (Alceu Rodrigues de Freitas Junior)
Date: Wed, 10 Oct 2007 16:56:03 +0300
Subject: [Cascavel-pm] Identificar SO
In-Reply-To: <001d01c80b42$31596b70$2801a8c0@servidorliz>
References: <000701c80a1b$c323fed0$0200a8c0@Ricardo><BAY121-W23DDF5F8DC3D22F5007BC1F5A50@phx.gbl><42dcdd750710091106w724caf5fla5ca9d6eb942380f@mail.gmail.com><003601c80aa2$45014530$0200a8c0@Ricardo><8ff2963a0710091513x67eded6cma4f87492bab2d605@mail.gmail.com><000401c80b35$d680da00$6401a8c0@swmobile>
	<9a08c9b40710100506r3a1bff8axd96e751fc84055bb@mail.gmail.com> 
	<001d01c80b42$31596b70$2801a8c0@servidorliz>
Message-ID: <BAY121-W16EB47E01C0903E1E92EFBF5A60@phx.gbl>

Vai retornar o sistema operacional aonde o script está sendo executado, sempre.
Agora no caso de Perlscript (www.activestate.com) eu não sei dizer porque nunca usei. :-)

[]'s

---
Alceu Rodrigues de Freitas Junior
glasswalk3r em hotmail.com


> From: fernandolouis em terra.com.br
> To: cascavel-pm em pm.org
> Date: Wed, 10 Oct 2007 10:33:49 -0300
> Subject: Re: [Cascavel-pm] Identificar SO
> 
> Se é uma página web, não vai retornar o SO do cliente, sempre do servidor. 
> Estou certo?
> 
> []s,
> Fernando
> 
> ----- Original Message ----- 
> From: "Nilson Santos Figueiredo Junior" <acid06 em gmail.com>
> To: "Agnaldo Macedo" <agnaldo em starweb-software.com.br>; "Cascavel Perl 
> Mongers" <cascavel-pm em pm.org>
> Sent: Wednesday, October 10, 2007 9:06 AM
> Subject: Re: [Cascavel-pm] Identificar SO
> 
> 
> On 10/10/07, Agnaldo Macedo <agnaldo em starweb-software.com.br> wrote:
> > Existe alguma função no Perl que identifique qual sistema operacional esta
> > sendo usado?
> 
> perldoc perlvar
> 
> Use a variável especial $^O.
> 
> -Nilson Santos F. Jr.
> _______________________________________________
> Cascavel-pm mailing list
> Cascavel-pm em pm.org
> http://mail.pm.org/mailman/listinfo/cascavel-pm
> 
> _______________________________________________
> Cascavel-pm mailing list
> Cascavel-pm em pm.org
> http://mail.pm.org/mailman/listinfo/cascavel-pm

_________________________________________________________________
Invite your mail contacts to join your friends list with Windows Live Spaces. It's easy!
http://spaces.live.com/spacesapi.aspx?wx_action=create&wx_url=/friends.aspx&mkt=en-us
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: http://mail.pm.org/pipermail/cascavel-pm/attachments/20071010/ba53a7c7/attachment.html 

From glasswalk3r em hotmail.com  Wed Oct 10 06:57:23 2007
From: glasswalk3r em hotmail.com (Alceu Rodrigues de Freitas Junior)
Date: Wed, 10 Oct 2007 16:57:23 +0300
Subject: [Cascavel-pm] =?iso-8859-1?q?FastCGI_dispon=EDvel_para_IIS?=
In-Reply-To: <001d01c80b42$31596b70$2801a8c0@servidorliz>
References: <000701c80a1b$c323fed0$0200a8c0@Ricardo><BAY121-W23DDF5F8DC3D22F5007BC1F5A50@phx.gbl><42dcdd750710091106w724caf5fla5ca9d6eb942380f@mail.gmail.com><003601c80aa2$45014530$0200a8c0@Ricardo><8ff2963a0710091513x67eded6cma4f87492bab2d605@mail.gmail.com><000401c80b35$d680da00$6401a8c0@swmobile>
	<9a08c9b40710100506r3a1bff8axd96e751fc84055bb@mail.gmail.com> 
	<001d01c80b42$31596b70$2801a8c0@servidorliz>
Message-ID: <BAY121-W10B1A31FD022D617DE0A91F5A60@phx.gbl>

Acho que isso beneficia não somente desenvolvedores de PHP:

http://www.iis.net/php

[]'s

---
Alceu Rodrigues de Freitas Junior
glasswalk3r em hotmail.com


_________________________________________________________________
Connect to the next generation of MSN Messenger 
http://imagine-msn.com/messenger/launch80/default.aspx?locale=en-us&source=wlmailtagline
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: http://mail.pm.org/pipermail/cascavel-pm/attachments/20071010/27d6472f/attachment-0001.html 

From mdacwb em gmail.com  Wed Oct 10 09:42:52 2007
From: mdacwb em gmail.com (Marco A P D'Andrade)
Date: Wed, 10 Oct 2007 13:42:52 -0300
Subject: [Cascavel-pm] =?iso-8859-1?q?FastCGI_dispon=EDvel_para_IIS?=
In-Reply-To: <BAY121-W10B1A31FD022D617DE0A91F5A60@phx.gbl>
References: <000701c80a1b$c323fed0$0200a8c0@Ricardo>
	<BAY121-W23DDF5F8DC3D22F5007BC1F5A50@phx.gbl>
	<42dcdd750710091106w724caf5fla5ca9d6eb942380f@mail.gmail.com>
	<003601c80aa2$45014530$0200a8c0@Ricardo>
	<8ff2963a0710091513x67eded6cma4f87492bab2d605@mail.gmail.com>
	<000401c80b35$d680da00$6401a8c0@swmobile>
	<9a08c9b40710100506r3a1bff8axd96e751fc84055bb@mail.gmail.com>
	<001d01c80b42$31596b70$2801a8c0@servidorliz>
	<BAY121-W10B1A31FD022D617DE0A91F5A60@phx.gbl>
Message-ID: <42dcdd750710100942t7e9155eboddc07877cafc7070@mail.gmail.com>

Opa !!

Então quando eu precisar (ou for forçado - ok ok requisitos de
projeto) já tenho alternativas !

Muito bom !

Em 10/10/07, Alceu Rodrigues de Freitas
Junior<glasswalk3r em hotmail.com> escreveu:
>
> Acho que isso beneficia não somente desenvolvedores de PHP:
>
> http://www.iis.net/php
>
> []'s
>
> ---
> Alceu Rodrigues de Freitas Junior
> glasswalk3r em hotmail.com
>
>
> ________________________________
> Connect to the next generation of MSN Messenger  Get it now!
> _______________________________________________
> Cascavel-pm mailing list
> Cascavel-pm em pm.org
> http://mail.pm.org/mailman/listinfo/cascavel-pm
>

From acid06 em gmail.com  Wed Oct 10 09:50:52 2007
From: acid06 em gmail.com (Nilson Santos Figueiredo Junior)
Date: Wed, 10 Oct 2007 13:50:52 -0300
Subject: [Cascavel-pm] Identificar SO
In-Reply-To: <001d01c80b42$31596b70$2801a8c0@servidorliz>
References: <000701c80a1b$c323fed0$0200a8c0@Ricardo>
	<BAY121-W23DDF5F8DC3D22F5007BC1F5A50@phx.gbl>
	<42dcdd750710091106w724caf5fla5ca9d6eb942380f@mail.gmail.com>
	<003601c80aa2$45014530$0200a8c0@Ricardo>
	<8ff2963a0710091513x67eded6cma4f87492bab2d605@mail.gmail.com>
	<000401c80b35$d680da00$6401a8c0@swmobile>
	<9a08c9b40710100506r3a1bff8axd96e751fc84055bb@mail.gmail.com>
	<001d01c80b42$31596b70$2801a8c0@servidorliz>
Message-ID: <9a08c9b40710100950n4fd46c75r291edb9fa8db3daf@mail.gmail.com>

On 10/10/07, fernandolouis em terra.com.br <fernandolouis em terra.com.br> wrote:
> Se é uma página web, não vai retornar o SO do cliente, sempre do servidor.
> Estou certo?

Pelo cabeçalho User-Agent enviado pelo cliente normalmente é possível
identificar o sistema operacional.

-Nilson Santis F. Jr.

From ptfzs em yahoo.com.br  Wed Oct 10 11:05:24 2007
From: ptfzs em yahoo.com.br (Patty Silva)
Date: Wed, 10 Oct 2007 15:05:24 -0300 (ART)
Subject: [Cascavel-pm] Duvida campo numerico
Message-ID: <242847.15378.qm@web31308.mail.mud.yahoo.com>

Ola Pessoal..
pintou uma duvida aqui

tenho uma variavel= 0.0
so que ela pode mudar e ser nula tb..
como faco um if para verificar?
se eu fizer $a == "" nao funciona..

Alguem pode dar uma luz? :D

Obrigada

       Abra sua conta no Yahoo! Mail, o único sem limite de espaço para armazenamento! 
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: http://mail.pm.org/pipermail/cascavel-pm/attachments/20071010/7182b8e0/attachment.html 

From gabriel.vieira em gmail.com  Wed Oct 10 11:12:13 2007
From: gabriel.vieira em gmail.com (Gabriel Vieira)
Date: Wed, 10 Oct 2007 15:12:13 -0300
Subject: [Cascavel-pm] Duvida campo numerico
In-Reply-To: <242847.15378.qm@web31308.mail.mud.yahoo.com>
References: <242847.15378.qm@web31308.mail.mud.yahoo.com>
Message-ID: <83d8367f0710101112j307a929dkc6bc366d624eb6a7@mail.gmail.com>

$a = 0.0;
print "zero/nulo" unless $a;

Resolve?



On 10/10/07, Patty Silva <ptfzs em yahoo.com.br> wrote:
> Ola Pessoal..
> pintou uma duvida aqui
>
> tenho uma variavel= 0.0
> so que ela pode mudar e ser nula tb..
> como faco um if para verificar?
> se eu fizer $a == "" nao funciona..
>
> Alguem pode dar uma luz? :D
>
> Obrigada
>
>
>  Abra sua conta no Yahoo! Mail, o único sem limite de espaço para
> armazenamento!
> _______________________________________________
> Cascavel-pm mailing list
> Cascavel-pm em pm.org
> http://mail.pm.org/mailman/listinfo/cascavel-pm
>


-- 
Gabriel Vieira

From fernandolouis em terra.com.br  Wed Oct 10 11:12:01 2007
From: fernandolouis em terra.com.br (fernandolouis em terra.com.br)
Date: Wed, 10 Oct 2007 15:12:01 -0300
Subject: [Cascavel-pm] Duvida campo numerico
References: <242847.15378.qm@web31308.mail.mud.yahoo.com>
Message-ID: <00a501c80b69$0e5c49e0$2801a8c0@servidorliz>

Utilize "defined", acho que resolve.

[]s,
Fernando
  ----- Original Message ----- 
  From: Patty Silva 
  To: Cascavel Perl Mongers 
  Sent: Wednesday, October 10, 2007 3:05 PM
  Subject: [Cascavel-pm] Duvida campo numerico


  Ola Pessoal..
  pintou uma duvida aqui

  tenho uma variavel= 0.0
  so que ela pode mudar e ser nula tb..
  como faco um if para verificar?
  se eu fizer $a == "" nao funciona..

  Alguem pode dar uma luz? :D

  Obrigada

  Abra sua conta no Yahoo! Mail, o único sem limite de espaço para armazenamento! 



------------------------------------------------------------------------------


  _______________________________________________
  Cascavel-pm mailing list
  Cascavel-pm em pm.org
  http://mail.pm.org/mailman/listinfo/cascavel-pm
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: http://mail.pm.org/pipermail/cascavel-pm/attachments/20071010/2eba5cf4/attachment.html 

From ptfzs em yahoo.com.br  Wed Oct 10 11:23:49 2007
From: ptfzs em yahoo.com.br (Patty Silva)
Date: Wed, 10 Oct 2007 15:23:49 -0300 (ART)
Subject: [Cascavel-pm] Duvida campo numerico
In-Reply-To: <00a501c80b69$0e5c49e0$2801a8c0@servidorliz>
Message-ID: <901864.71883.qm@web31305.mail.mud.yahoo.com>

Nao resolveu :?(
usei:

if(!defined($fields[13]) && $fields[13] eq '"')
                {

                  print "zero";

                }



fernandolouis em terra.com.br escreveu:       Utilize "defined", acho que  resolve.
  
 []s,
 Fernando
    ----- Original Message ----- 
   From:    Patty Silva    
   To: Cascavel Perl Mongers 
   Sent: Wednesday, October 10, 2007 3:05    PM
   Subject: [Cascavel-pm] Duvida campo    numerico
   

Ola Pessoal..
pintou uma duvida aqui

tenho uma    variavel= 0.0
so que ela pode mudar e ser nula tb..
como faco um if para    verificar?
se eu fizer $a == "" nao funciona..

Alguem pode dar uma    luz? :D

Obrigada
   Abra sua conta no Yahoo!    Mail, o único sem limite de espaço para armazenamento!    
   

---------------------------------
    
_______________________________________________
Cascavel-pm mailing    list
Cascavel-pm em pm.org
http://mail.pm.org/mailman/listinfo/cascavel-pm_______________________________________________
Cascavel-pm mailing list
Cascavel-pm em pm.org
http://mail.pm.org/mailman/listinfo/cascavel-pm

       Abra sua conta no Yahoo! Mail, o único sem limite de espaço para armazenamento! 
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: http://mail.pm.org/pipermail/cascavel-pm/attachments/20071010/5a195e50/attachment.html 

From mdacwb em gmail.com  Wed Oct 10 11:57:35 2007
From: mdacwb em gmail.com (Marco A P D'Andrade)
Date: Wed, 10 Oct 2007 15:57:35 -0300
Subject: [Cascavel-pm] Duvida campo numerico
In-Reply-To: <901864.71883.qm@web31305.mail.mud.yahoo.com>
References: <00a501c80b69$0e5c49e0$2801a8c0@servidorliz>
	<901864.71883.qm@web31305.mail.mud.yahoo.com>
Message-ID: <42dcdd750710101157j4273b82icfc146aeaa742a94@mail.gmail.com>

"Joao = Maria E Maria = Jose " não vale !!

utilize um OU  ...

Em 10/10/07, Patty Silva<ptfzs em yahoo.com.br> escreveu:
> Nao resolveu :?(
> usei:
>
> if(!defined($fields[13]) && $fields[13] eq '"')
>                 {
>
>                   print "zero";
>
>                 }
>
>
>
> fernandolouis em terra.com.br escreveu:
>
> Utilize "defined", acho que resolve.
>
> []s,
> Fernando
>
> ----- Original Message -----
> From: Patty Silva
> To: Cascavel Perl Mongers
> Sent: Wednesday, October 10, 2007 3:05 PM
> Subject: [Cascavel-pm] Duvida campo numerico
>
> Ola Pessoal..
> pintou uma duvida aqui
>
> tenho uma variavel= 0.0
> so que ela pode mudar e ser nula tb..
> como faco um if para verificar?
> se eu fizer $a == "" nao funciona..
>
> Alguem pode dar uma luz? :D
>
> Obrigada
>
> Abra sua conta no Yahoo! Mail, o único sem limite de espaço para
> armazenamento!
>  ________________________________
>
> _______________________________________________
> Cascavel-pm mailing list
> Cascavel-pm em pm.org
> http://mail.pm.org/mailman/listinfo/cascavel-pm_______________________________________________
> Cascavel-pm mailing list
> Cascavel-pm em pm.org
> http://mail.pm.org/mailman/listinfo/cascavel-pm
>
>
>  Abra sua conta no Yahoo! Mail, o único sem limite de espaço para
> armazenamento!
> _______________________________________________
> Cascavel-pm mailing list
> Cascavel-pm em pm.org
> http://mail.pm.org/mailman/listinfo/cascavel-pm
>

From ptfzs em yahoo.com.br  Wed Oct 10 12:04:26 2007
From: ptfzs em yahoo.com.br (Patty Silva)
Date: Wed, 10 Oct 2007 16:04:26 -0300 (ART)
Subject: [Cascavel-pm] Duvida campo numerico
In-Reply-To: <42dcdd750710101157j4273b82icfc146aeaa742a94@mail.gmail.com>
Message-ID: <831852.2764.qm@web31310.mail.mud.yahoo.com>

Sorry era || msm :D eu digite errado :)
e nao funcionou..

Marco A P D'Andrade <mdacwb em gmail.com> escreveu: "Joao = Maria E Maria = Jose " não vale !!

utilize um OU  ...

Em 10/10/07, Patty Silva
 escreveu:
> Nao resolveu :?(
> usei:
>
> if(!defined($fields[13]) && $fields[13] eq '"')
>                 {
>
>                   print "zero";
>
>                 }
>
>
>
> fernandolouis em terra.com.br escreveu:
>
> Utilize "defined", acho que resolve.
>
> []s,
> Fernando
>
> ----- Original Message -----
> From: Patty Silva
> To: Cascavel Perl Mongers
> Sent: Wednesday, October 10, 2007 3:05 PM
> Subject: [Cascavel-pm] Duvida campo numerico
>
> Ola Pessoal..
> pintou uma duvida aqui
>
> tenho uma variavel= 0.0
> so que ela pode mudar e ser nula tb..
> como faco um if para verificar?
> se eu fizer $a == "" nao funciona..
>
> Alguem pode dar uma luz? :D
>
> Obrigada
>
> Abra sua conta no Yahoo! Mail, o único sem limite de espaço para
> armazenamento!
>  ________________________________
>
> _______________________________________________
> Cascavel-pm mailing list
> Cascavel-pm em pm.org
> http://mail.pm.org/mailman/listinfo/cascavel-pm_______________________________________________
> Cascavel-pm mailing list
> Cascavel-pm em pm.org
> http://mail.pm.org/mailman/listinfo/cascavel-pm
>
>
>  Abra sua conta no Yahoo! Mail, o único sem limite de espaço para
> armazenamento!
> _______________________________________________
> Cascavel-pm mailing list
> Cascavel-pm em pm.org
> http://mail.pm.org/mailman/listinfo/cascavel-pm
>
_______________________________________________
Cascavel-pm mailing list
Cascavel-pm em pm.org
http://mail.pm.org/mailman/listinfo/cascavel-pm



       Abra sua conta no Yahoo! Mail, o único sem limite de espaço para armazenamento! 
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: http://mail.pm.org/pipermail/cascavel-pm/attachments/20071010/92830970/attachment.html 

From fernandolouis em terra.com.br  Wed Oct 10 12:09:33 2007
From: fernandolouis em terra.com.br (fernandolouis em terra.com.br)
Date: Wed, 10 Oct 2007 16:09:33 -0300
Subject: [Cascavel-pm] Duvida campo numerico
References: <901864.71883.qm@web31305.mail.mud.yahoo.com>
Message-ID: <003601c80b71$18209e60$2801a8c0@servidorliz>

if (defined($fields[13]) {
  # se entrou é pq $fields[13] está definido
}

# senão é pq não tem nenhum valor real nele
  ----- Original Message ----- 
  From: Patty Silva 
  To: Cascavel Perl Mongers 
  Sent: Wednesday, October 10, 2007 3:23 PM
  Subject: Re: [Cascavel-pm] Duvida campo numerico


  Nao resolveu :?(
  usei:

  if(!defined($fields[13]) && $fields[13] eq '"')
                  {

                    print "zero";

                  }



  fernandolouis em terra.com.br escreveu:
    Utilize "defined", acho que resolve.

    []s,
    Fernando
      ----- Original Message ----- 
      From: Patty Silva 
      To: Cascavel Perl Mongers 
      Sent: Wednesday, October 10, 2007 3:05 PM
      Subject: [Cascavel-pm] Duvida campo numerico


      Ola Pessoal..
      pintou uma duvida aqui

      tenho uma variavel= 0.0
      so que ela pode mudar e ser nula tb..
      como faco um if para verificar?
      se eu fizer $a == "" nao funciona..

      Alguem pode dar uma luz? :D

      Obrigada

      Abra sua conta no Yahoo! Mail, o único sem limite de espaço para armazenamento! 

--------------------------------------------------------------------------

      _______________________________________________
      Cascavel-pm mailing list
      Cascavel-pm em pm.org
      http://mail.pm.org/mailman/listinfo/cascavel-pm
    _______________________________________________
    Cascavel-pm mailing list
    Cascavel-pm em pm.org
    http://mail.pm.org/mailman/listinfo/cascavel-pm


  Abra sua conta no Yahoo! Mail, o único sem limite de espaço para armazenamento! 



------------------------------------------------------------------------------


  _______________________________________________
  Cascavel-pm mailing list
  Cascavel-pm em pm.org
  http://mail.pm.org/mailman/listinfo/cascavel-pm
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: http://mail.pm.org/pipermail/cascavel-pm/attachments/20071010/29e30b22/attachment.html 

From nferraz em gmail.com  Wed Oct 10 15:00:05 2007
From: nferraz em gmail.com (Nelson Ferraz)
Date: Wed, 10 Oct 2007 23:00:05 +0100
Subject: [Cascavel-pm] Duvida campo numerico
In-Reply-To: <242847.15378.qm@web31308.mail.mud.yahoo.com>
References: <242847.15378.qm@web31308.mail.mud.yahoo.com>
Message-ID: <604cec170710101500y66e455c6r66ffba395a180224@mail.gmail.com>

> se eu fizer $a == "" nao funciona..

Acho que você queria dizer $a eq "".

Por favor, leia qualquer texto introdutório de perl.

From ptfzs em yahoo.com.br  Thu Oct 11 04:56:31 2007
From: ptfzs em yahoo.com.br (Patty Silva)
Date: Thu, 11 Oct 2007 08:56:31 -0300 (ART)
Subject: [Cascavel-pm] Duvida campo numerico
In-Reply-To: <604cec170710101500y66e455c6r66ffba395a180224@mail.gmail.com>
Message-ID: <291789.8105.qm@web31306.mail.mud.yahoo.com>

Entao Nelson...

Se eu colocar if($fields[4] =="\\N")
ele entra no IF
:/
pq sera q no banco esta assim?


entao essa verificacao nao funciona:
if(!defined($fields[9]) ||  $fields[9] eq "" || $fields[9] == -9999)

se eu acrescentar 
!defined($fields[9]) ||  $fields[9] eq "" || $fields[9] == -9999 || $fields[9] == "\\N")
ai ele entra


:?)



Nelson Ferraz <nferraz em gmail.com> escreveu: > se eu fizer $a == "" nao funciona..

Acho que você queria dizer $a eq "".

Por favor, leia qualquer texto introdutório de perl.
_______________________________________________
Cascavel-pm mailing list
Cascavel-pm em pm.org
http://mail.pm.org/mailman/listinfo/cascavel-pm


       Abra sua conta no Yahoo! Mail, o único sem limite de espaço para armazenamento! 
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: http://mail.pm.org/pipermail/cascavel-pm/attachments/20071011/03ebb31c/attachment.html 

From nferraz em gmail.com  Thu Oct 11 06:10:32 2007
From: nferraz em gmail.com (Nelson Ferraz)
Date: Thu, 11 Oct 2007 14:10:32 +0100
Subject: [Cascavel-pm] Duvida campo numerico
In-Reply-To: <291789.8105.qm@web31306.mail.mud.yahoo.com>
References: <291789.8105.qm@web31306.mail.mud.yahoo.com>
Message-ID: <B446AF6C-887D-413A-A743-91548A16EDD8@gmail.com>

Em Oct 11, 2007, às 12:56 PM, Patty Silva escreveu:

> Se eu colocar if($fields[4] =="\\N")
> ele entra no IF
> :/
> pq sera q no banco esta assim?

Calma, Patty... vamos voltar para o básico.

Como você deve se lembrar, não existe diferença entre variáveis  
numéricas e alfanuméricas em Perl: as mesmas variáveis (escalares)  
podem armazenar letras e números.

O que acontece se você quiser comparar, por exemplo, $a=7 com  
$b="007"? As duas variáveis têm valores iguais ou diferentes?

A resposta é: depende. Se compararmos numericamente, $a e $b são  
iguais; mas se compararmos literalmente, são diferentes.

Portanto, quando você estiver trabalhando com números, utilize  
comparações numéricas, e quando estiver trabalhando com strings,  
utilize comparações literais:

    # Comparações numéricas
    if ($idade == 18) { ... }
    if ($idade > 100) { ... }

    # Comparações literais
    if ($resposta eq "s") { ... }
    if ($field ne "") { ... }


From ptfzs em yahoo.com.br  Thu Oct 11 06:42:40 2007
From: ptfzs em yahoo.com.br (Patty Silva)
Date: Thu, 11 Oct 2007 10:42:40 -0300 (ART)
Subject: [Cascavel-pm] Duvida campo numerico
In-Reply-To: <B446AF6C-887D-413A-A743-91548A16EDD8@gmail.com>
Message-ID: <580803.60134.qm@web31307.mail.mud.yahoo.com>

Obrigada pela dica :D
O problema eh que ele retorna do banco vazio aparentemente,, mas se fou verificar com defined ele nao pega.. :/
O problema deve estar ao retornar do banco..


Nelson Ferraz <nferraz em gmail.com> escreveu: Em Oct 11, 2007, às 12:56 PM, Patty Silva escreveu:

> Se eu colocar if($fields[4] =="\\N")
> ele entra no IF
> :/
> pq sera q no banco esta assim?

Calma, Patty... vamos voltar para o básico.

Como você deve se lembrar, não existe diferença entre variáveis  
numéricas e alfanuméricas em Perl: as mesmas variáveis (escalares)  
podem armazenar letras e números.

O que acontece se você quiser comparar, por exemplo, $a=7 com  
$b="007"? As duas variáveis têm valores iguais ou diferentes?

A resposta é: depende. Se compararmos numericamente, $a e $b são  
iguais; mas se compararmos literalmente, são diferentes.

Portanto, quando você estiver trabalhando com números, utilize  
comparações numéricas, e quando estiver trabalhando com strings,  
utilize comparações literais:

    # Comparações numéricas
    if ($idade == 18) { ... }
    if ($idade > 100) { ... }

    # Comparações literais
    if ($resposta eq "s") { ... }
    if ($field ne "") { ... }

_______________________________________________
Cascavel-pm mailing list
Cascavel-pm em pm.org
http://mail.pm.org/mailman/listinfo/cascavel-pm


       Abra sua conta no Yahoo! Mail, o único sem limite de espaço para armazenamento! 
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: http://mail.pm.org/pipermail/cascavel-pm/attachments/20071011/cb97f74f/attachment-0001.html 

From ptfzs em yahoo.com.br  Thu Oct 11 07:08:44 2007
From: ptfzs em yahoo.com.br (Patty Silva)
Date: Thu, 11 Oct 2007 11:08:44 -0300 (ART)
Subject: [Cascavel-pm] Duvida campo numerico
In-Reply-To: <B446AF6C-887D-413A-A743-91548A16EDD8@gmail.com>
Message-ID: <356984.2278.qm@web31313.mail.mud.yahoo.com>

Bom.. depois de tanto procurar.. descobri que o retorno do banco estava com 2 espacos..
fiz:
$fields[9]=~ /\s+/ e funcionou...
isso msm pessoal?? :D


Nelson Ferraz <nferraz em gmail.com> escreveu: Em Oct 11, 2007, às 12:56 PM, Patty Silva escreveu:

> Se eu colocar if($fields[4] =="\\N")
> ele entra no IF
> :/
> pq sera q no banco esta assim?

Calma, Patty... vamos voltar para o básico.

Como você deve se lembrar, não existe diferença entre variáveis  
numéricas e alfanuméricas em Perl: as mesmas variáveis (escalares)  
podem armazenar letras e números.

O que acontece se você quiser comparar, por exemplo, $a=7 com  
$b="007"? As duas variáveis têm valores iguais ou diferentes?

A resposta é: depende. Se compararmos numericamente, $a e $b são  
iguais; mas se compararmos literalmente, são diferentes.

Portanto, quando você estiver trabalhando com números, utilize  
comparações numéricas, e quando estiver trabalhando com strings,  
utilize comparações literais:

    # Comparações numéricas
    if ($idade == 18) { ... }
    if ($idade > 100) { ... }

    # Comparações literais
    if ($resposta eq "s") { ... }
    if ($field ne "") { ... }

_______________________________________________
Cascavel-pm mailing list
Cascavel-pm em pm.org
http://mail.pm.org/mailman/listinfo/cascavel-pm


       Abra sua conta no Yahoo! Mail, o único sem limite de espaço para armazenamento! 
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: http://mail.pm.org/pipermail/cascavel-pm/attachments/20071011/fb92040a/attachment.html 

From nferraz em gmail.com  Thu Oct 11 07:12:35 2007
From: nferraz em gmail.com (Nelson Ferraz)
Date: Thu, 11 Oct 2007 15:12:35 +0100
Subject: [Cascavel-pm] Duvida campo numerico
In-Reply-To: <580803.60134.qm@web31307.mail.mud.yahoo.com>
References: <580803.60134.qm@web31307.mail.mud.yahoo.com>
Message-ID: <31EFD92B-67C7-41A7-906B-5164D43379DA@gmail.com>

Em Oct 11, 2007, às 2:42 PM, Patty Silva escreveu:

> O problema eh que ele retorna do banco vazio aparentemente,, mas se  
> fou verificar com defined ele nao pega.. :/
> O problema deve estar ao retornar do banco..

Só por curiosidade, você se deu ao trabalho de ler a documentação da  
função defined?

Se o campo vem vazio, ele está definido -- com o valor vazio.


From rudolforosa em gmail.com  Thu Oct 11 07:26:10 2007
From: rudolforosa em gmail.com (Rudolfo Rosa)
Date: Thu, 11 Oct 2007 11:26:10 -0300
Subject: [Cascavel-pm] [OFF] query SQL
Message-ID: <810df6a30710110726v62446c7fha3b78a34f5c8c217@mail.gmail.com>

Caros,
  utilizo a ferramenta de monitoração OpenNMS aqui na empresa e estou
tentando obter algumas informações diretamente do seu DB(postgresql).

Estou fazendo a seguinte query:
SELECT node.nodelabel, assets.serialnumber, ifservices.serviceid from
node, assets, ifservices where node.nodeid=assets.nodeid and
node.nodeid=ifservices.nodeid and ifservices.status='A' and
(ifservices.serviceid='1'or ifservices.serviceid='7').

que retorna:
             nodelabel             | serialnumber | serviceid
-----------------------------------+--------------+-----------
 DD_SL011                          | 7398         |         1
 DD_SL011                          | 7398         |         7
....

Dentro do script eu deixo o resultado no seguinte formato:
             nodelabel             | serialnumber | service1|service7
-----------------------------------+--------------+-----------
 DD_SL011                          | 7398         |           1|         7

Teria como fazer isto diretamente em na query ??


Obrigado, Rudolfo Rosa.

From fernandolouis em terra.com.br  Thu Oct 11 12:17:28 2007
From: fernandolouis em terra.com.br (fernandolouis em terra.com.br)
Date: Thu, 11 Oct 2007 16:17:28 -0300
Subject: [Cascavel-pm] [OFF-TOPIC] Editar PDFs
References: <7c1ab7e20710020537t39b57874y59d9081015e28151@mail.gmail.com><00be01c804f8$cc275770$0a01a8c0@servidorliz>
	<65934b450710020815q17c96afdy914d70ebd522dbbd@mail.gmail.com>
Message-ID: <001901c80c3b$60becd20$2801a8c0@servidorliz>

Daí amigos...
Sempre tive essa dúvida, então criei esse OT pra ver se alguém aqui da lista 
sabe.

Há alguma maneira de editar um documento PDF? por exemplo... deixar dentro 
do pdf só as páginas 4 à 9 e as demais tirar fora.

[]s,
Fernando 


From wendelscardua em gmail.com  Thu Oct 11 16:18:21 2007
From: wendelscardua em gmail.com (Wendel Scardua)
Date: Thu, 11 Oct 2007 20:18:21 -0300
Subject: [Cascavel-pm] [OFF-TOPIC] Editar PDFs
In-Reply-To: <001901c80c3b$60becd20$2801a8c0@servidorliz>
References: <7c1ab7e20710020537t39b57874y59d9081015e28151@mail.gmail.com>
	<00be01c804f8$cc275770$0a01a8c0@servidorliz>
	<65934b450710020815q17c96afdy914d70ebd522dbbd@mail.gmail.com>
	<001901c80c3b$60becd20$2801a8c0@servidorliz>
Message-ID: <726229b50710111618j585e0d26gd34ecd3c62aed80@mail.gmail.com>

Não sei a resposta direta à sua pergunta (embora seja alta a chance de ser
"sim"), mas você já tentou procurar em search.cpan.org  ?

[]s

Wendel

On 10/11/07, fernandolouis em terra.com.br <fernandolouis em terra.com.br> wrote:
>
> Daí amigos...
> Sempre tive essa dúvida, então criei esse OT pra ver se alguém aqui da
> lista
> sabe.
>
> Há alguma maneira de editar um documento PDF? por exemplo... deixar dentro
> do pdf só as páginas 4 à 9 e as demais tirar fora.
>
> []s,
> Fernando
>
>
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: http://mail.pm.org/pipermail/cascavel-pm/attachments/20071011/9668fb39/attachment.html 

From a.r.ferreira em gmail.com  Sat Oct 13 09:37:53 2007
From: a.r.ferreira em gmail.com (Adriano Ferreira)
Date: Sat, 13 Oct 2007 13:37:53 -0300
Subject: [Cascavel-pm] [OFF-TOPIC] Editar PDFs
In-Reply-To: <001901c80c3b$60becd20$2801a8c0@servidorliz>
References: <7c1ab7e20710020537t39b57874y59d9081015e28151@mail.gmail.com>
	<00be01c804f8$cc275770$0a01a8c0@servidorliz>
	<65934b450710020815q17c96afdy914d70ebd522dbbd@mail.gmail.com>
	<001901c80c3b$60becd20$2801a8c0@servidorliz>
Message-ID: <73ddeb6c0710130937x18dc80eue2945c9bcecfd883@mail.gmail.com>

On 10/11/07, fernandolouis em terra.com.br <fernandolouis em terra.com.br> wrote:
> Daí amigos...
> Sempre tive essa dúvida, então criei esse OT pra ver se alguém aqui da lista
> sabe.
>
> Há alguma maneira de editar um documento PDF? por exemplo... deixar dentro
> do pdf só as páginas 4 à 9 e as demais tirar fora.

Adobe Acrobat, que é a versão paga e extendida do Acrobat Reader. Você
retira páginas, combina PDFs, etc., etc. Pelo que eu sei, é caro como
um legítimo software proprietário :(

> []s,
> Fernando
>
> _______________________________________________
> Cascavel-pm mailing list
> Cascavel-pm em pm.org
> http://mail.pm.org/mailman/listinfo/cascavel-pm
>

From acid06 em gmail.com  Sat Oct 13 10:16:09 2007
From: acid06 em gmail.com (Nilson Santos Figueiredo Junior)
Date: Sat, 13 Oct 2007 14:16:09 -0300
Subject: [Cascavel-pm] [OFF-TOPIC] Editar PDFs
In-Reply-To: <001901c80c3b$60becd20$2801a8c0@servidorliz>
References: <7c1ab7e20710020537t39b57874y59d9081015e28151@mail.gmail.com>
	<00be01c804f8$cc275770$0a01a8c0@servidorliz>
	<65934b450710020815q17c96afdy914d70ebd522dbbd@mail.gmail.com>
	<001901c80c3b$60becd20$2801a8c0@servidorliz>
Message-ID: <9a08c9b40710131016i5c555b22t127ef4f3fc71e4ab@mail.gmail.com>

On 10/11/07, fernandolouis em terra.com.br <fernandolouis em terra.com.br> wrote:
> Há alguma maneira de editar um documento PDF? por exemplo... deixar dentro
> do pdf só as páginas 4 à 9 e as demais tirar fora.

Existe uma maneira meio "gambiarra" de fazer este exemplo específico.

Normalmente, quando se instala o Acrobat, ele instala aquela
impressora virtual também que imprime pra PDFs. Você pode abrir um PDF
e mandar imprimir em PDF somente as páginas 4 a 9.

Funciona. ;-)

-Nilson Santos F. Jr.

From glasswalk3r em hotmail.com  Sun Oct 14 13:50:55 2007
From: glasswalk3r em hotmail.com (Alceu Rodrigues de Freitas Junior)
Date: Sun, 14 Oct 2007 23:50:55 +0300
Subject: [Cascavel-pm] [OFF-TOPIC] Editar PDFs
In-Reply-To: <9a08c9b40710131016i5c555b22t127ef4f3fc71e4ab@mail.gmail.com>
References: <7c1ab7e20710020537t39b57874y59d9081015e28151@mail.gmail.com>
	<00be01c804f8$cc275770$0a01a8c0@servidorliz>
	<65934b450710020815q17c96afdy914d70ebd522dbbd@mail.gmail.com>
	<001901c80c3b$60becd20$2801a8c0@servidorliz> 
	<9a08c9b40710131016i5c555b22t127ef4f3fc71e4ab@mail.gmail.com>
Message-ID: <BAY121-W115B6EFB9611B27D86D652F5A20@phx.gbl>

Bem, se é só gerar algumas páginas em PDF, dá para usar o PDFCreator, que é livre.

---
Alceu Rodrigues de Freitas Junior
glasswalk3r em hotmail.com

> To: cascavel-pm em pm.org
> Subject: Re: [Cascavel-pm] [OFF-TOPIC] Editar PDFs
> 
> On 10/11/07, fernandolouis em terra.com.br <fernandolouis em terra.com.br> wrote:
> > Há alguma maneira de editar um documento PDF? por exemplo... deixar dentro
> > do pdf só as páginas 4 à 9 e as demais tirar fora.
> 
> Existe uma maneira meio "gambiarra" de fazer este exemplo específico.
> 
> Normalmente, quando se instala o Acrobat, ele instala aquela
> impressora virtual também que imprime pra PDFs. Você pode abrir um PDF
> e mandar imprimir em PDF somente as páginas 4 a 9.


_________________________________________________________________
News, entertainment and everything you care about at Live.com. Get it now!
http://www.live.com/getstarted.aspx
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: http://mail.pm.org/pipermail/cascavel-pm/attachments/20071014/a5b7156c/attachment.html 

From nferraz em gmail.com  Mon Oct 15 03:08:03 2007
From: nferraz em gmail.com (Nelson Ferraz)
Date: Mon, 15 Oct 2007 11:08:03 +0100
Subject: [Cascavel-pm] [OFF-TOPIC] Editar PDFs
In-Reply-To: <9a08c9b40710131016i5c555b22t127ef4f3fc71e4ab@mail.gmail.com>
References: <7c1ab7e20710020537t39b57874y59d9081015e28151@mail.gmail.com>
	<00be01c804f8$cc275770$0a01a8c0@servidorliz>
	<65934b450710020815q17c96afdy914d70ebd522dbbd@mail.gmail.com>
	<001901c80c3b$60becd20$2801a8c0@servidorliz>
	<9a08c9b40710131016i5c555b22t127ef4f3fc71e4ab@mail.gmail.com>
Message-ID: <F971FCB5-F635-4DDA-BC25-34D533E02865@gmail.com>

> On 10/11/07, fernandolouis em terra.com.br  
> <fernandolouis em terra.com.br> wrote:
>> Há alguma maneira de editar um documento PDF? por exemplo...  
>> deixar dentro
>> do pdf só as páginas 4 à 9 e as demais tirar fora.
>
> Existe uma maneira meio "gambiarra" de fazer este exemplo específico.
>
> Normalmente, quando se instala o Acrobat, ele instala aquela
> impressora virtual também que imprime pra PDFs. Você pode abrir um PDF
> e mandar imprimir em PDF somente as páginas 4 a 9.

Acho que você pode fazer isso em Perl, com o PDF::Reuse.


From lgbassani em terra.com.br  Mon Oct 15 06:33:15 2007
From: lgbassani em terra.com.br (Luciano Giordani Bassani)
Date: Mon, 15 Oct 2007 11:33:15 -0200
Subject: [Cascavel-pm] [OFF-TOPIC] Editar PDFs
In-Reply-To: <F971FCB5-F635-4DDA-BC25-34D533E02865@gmail.com>
References: <7c1ab7e20710020537t39b57874y59d9081015e28151@mail.gmail.com>	<00be01c804f8$cc275770$0a01a8c0@servidorliz>	<65934b450710020815q17c96afdy914d70ebd522dbbd@mail.gmail.com>	<001901c80c3b$60becd20$2801a8c0@servidorliz>	<9a08c9b40710131016i5c555b22t127ef4f3fc71e4ab@mail.gmail.com>
	<F971FCB5-F635-4DDA-BC25-34D533E02865@gmail.com>
Message-ID: <47136C1B.3000301@terra.com.br>

Um anexo em HTML foi limpo...
URL: http://mail.pm.org/pipermail/cascavel-pm/attachments/20071015/e7d64d55/attachment.html 

From glasswalk3r em hotmail.com  Mon Oct 15 11:05:08 2007
From: glasswalk3r em hotmail.com (Alceu Rodrigues de Freitas Junior)
Date: Mon, 15 Oct 2007 21:05:08 +0300
Subject: [Cascavel-pm] problemas com automount no Fedora 7 [off-topic]
Message-ID: <BAY121-W154EE1F6382C8BCAF37BA4F5A30@phx.gbl>

Olá monges,

Como sei que tem alguns craques em Linux aqui na lista, vou tentar a sorte.

Eu instalei recentemente o Fedora 7 no meu computador. A instalação tinha (aparentemente) ocorrido perfeitamente até eu resolver ler um DVD ou um pendrive: o automount não está funcionando.

Eu fiz algumas checagens básicas (como procurar por pacotes que poderiam não ter sido instalados) e notei que o script hotplug não existe no sistema.

Como não encontrei nenhum pacote que tenha esse script, fiquei meio sem saída. Depois de alguma pesquisa no Google, eu verifiquei que o Fedora 7 usa o udev para gerenciar montagens automáticas, mas sinceramente não sei se é por isso que não está funcionando (eu ainda não chequei atualização para o pacote do udev no repositório do Fedora).

Alguém já passou por esse problema? Eu já havia instalado o Fedora em outro computador e a montagem automática funcionou conforme o esperado.

[]'s

---
Alceu Rodrigues de Freitas Junior
glasswalk3r em hotmail.com


_________________________________________________________________
Discover the new Windows Vista
http://search.msn.com/results.aspx?q=windows+vista&mkt=en-US&form=QBRE
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: http://mail.pm.org/pipermail/cascavel-pm/attachments/20071015/f06808d7/attachment.html 

From nelio.nunes em sapo.pt  Tue Oct 16 06:17:16 2007
From: nelio.nunes em sapo.pt (=?ISO-8859-1?Q?N=E9lio_Nunes?=)
Date: Tue, 16 Oct 2007 14:17:16 +0100
Subject: [Cascavel-pm] problemas com automount no Fedora 7 [off-topic]
In-Reply-To: <BAY121-W154EE1F6382C8BCAF37BA4F5A30@phx.gbl>
References: <BAY121-W154EE1F6382C8BCAF37BA4F5A30@phx.gbl>
Message-ID: <18872EF2-B2AF-4D89-851F-40B31ECD0985@sapo.pt>

A solução está aqui :)

http://www.ubuntu.com/getubuntu/download

Nélio Nunes
nelio.nunes em sapo.pt



On 2007/10/15, at 19:05, Alceu Rodrigues de Freitas Junior wrote:

> Olá monges,
>
> Como sei que tem alguns craques em Linux aqui na lista, vou tentar  
> a sorte.
>
> Eu instalei recentemente o Fedora 7 no meu computador. A instalação  
> tinha (aparentemente) ocorrido perfeitamente até eu resolver ler um  
> DVD ou um pendrive: o automount não está funcionando.
>
> Eu fiz algumas checagens básicas (como procurar por pacotes que  
> poderiam não ter sido instalados) e notei que o script hotplug não  
> existe no sistema.
>
> Como não encontrei nenhum pacote que tenha esse script, fiquei meio  
> sem saída. Depois de alguma pesquisa no Google, eu verifiquei que o  
> Fedora 7 usa o udev para gerenciar montagens automáticas, mas  
> sinceramente não sei se é por isso que não está funcionando (eu  
> ainda não chequei atualização para o pacote do udev no repositório  
> do Fedora).
>
> Alguém já passou por esse problema? Eu já havia instalado o Fedora  
> em outro computador e a montagem automática funcionou conforme o  
> esperado.
>
> []'s
>
> ---
> Alceu Rodrigues de Freitas Junior
> glasswalk3r em hotmail.com
>
>
> Discover the new Windows Vista Learn more!
> _______________________________________________
> Cascavel-pm mailing list
> Cascavel-pm em pm.org
> http://mail.pm.org/mailman/listinfo/cascavel-pm

-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: http://mail.pm.org/pipermail/cascavel-pm/attachments/20071016/2e71dd3a/attachment.html 

From luismottacampos em yahoo.co.uk  Tue Oct 16 07:14:37 2007
From: luismottacampos em yahoo.co.uk (Luis Motta Campos)
Date: Tue, 16 Oct 2007 16:14:37 +0200
Subject: [Cascavel-pm] problemas com automount no Fedora 7 [off-topic]
In-Reply-To: <18872EF2-B2AF-4D89-851F-40B31ECD0985@sapo.pt>
References: <BAY121-W154EE1F6382C8BCAF37BA4F5A30@phx.gbl>
	<18872EF2-B2AF-4D89-851F-40B31ECD0985@sapo.pt>
Message-ID: <20071016141437.GD30311@bitbistro.com>

On Tue, Oct 16, 2007 at 02:17:16PM +0100, Nélio Nunes wrote:
> A solução está aqui :)
>
> http://www.ubuntu.com/getubuntu/download

(Nelio Nunes)-- # estrategias de solucao de problemas do windows no linux

Alceu, vou olhar o teu problema mais tarde, devo te enviar um email
quando chegar em casa, vamos falar sobre isso em privado.

Putamplexos!
-- 
Luis Motta Campos
Perl Programmer, Hobbyist Cook and Photographer

From nelio.nunes em sapo.pt  Tue Oct 16 08:03:04 2007
From: nelio.nunes em sapo.pt (=?ISO-8859-1?Q?N=E9lio_Nunes?=)
Date: Tue, 16 Oct 2007 16:03:04 +0100
Subject: [Cascavel-pm] problemas com automount no Fedora 7 [off-topic]
In-Reply-To: <20071016141437.GD30311@bitbistro.com>
References: <BAY121-W154EE1F6382C8BCAF37BA4F5A30@phx.gbl>
	<18872EF2-B2AF-4D89-851F-40B31ECD0985@sapo.pt>
	<20071016141437.GD30311@bitbistro.com>
Message-ID: <F789D919-DEB8-4086-BDF4-6AB12173E1F1@sapo.pt>

Luís, que mau humor!

Só estava fazendo um pouco de publicidade ao ubuntu, não faz mal nenhum.

Nélio Nunes
nelio.nunes em sapo.pt


On 2007/10/16, at 15:14, Luis Motta Campos wrote:

> On Tue, Oct 16, 2007 at 02:17:16PM +0100, Nélio Nunes wrote:
>> A solução está aqui :)
>>
>> http://www.ubuntu.com/getubuntu/download
>
> (Nelio Nunes)-- # estrategias de solucao de problemas do windows no  
> linux
>
> Alceu, vou olhar o teu problema mais tarde, devo te enviar um email
> quando chegar em casa, vamos falar sobre isso em privado.
>
> Putamplexos!
> -- 
> Luis Motta Campos
> Perl Programmer, Hobbyist Cook and Photographer
> _______________________________________________
> Cascavel-pm mailing list
> Cascavel-pm em pm.org
> http://mail.pm.org/mailman/listinfo/cascavel-pm
>

-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: http://mail.pm.org/pipermail/cascavel-pm/attachments/20071016/3a3738e3/attachment.html 

From joaohf em gmail.com  Tue Oct 16 08:20:49 2007
From: joaohf em gmail.com (=?UTF-8?Q?Jo=C3=A3o_Henrique_Freitas?=)
Date: Tue, 16 Oct 2007 12:20:49 -0300
Subject: [Cascavel-pm] Win32 PerfMon
Message-ID: <88e33d220710160820w47266310yd1c30ac07b62692e@mail.gmail.com>

Olá, tudo bom?

Estou tentando utilizar o PERL e o módulo Win32::PerfMon disponível em
http://search.cpan.org/~glensmall/Win32-PerfMon-0.07/PerfMon.pm com o
seguinte objetivo:

Gerar uma listagem dos objetos, contadores e instâncias relacionados aos
monitores de desempenho de um servidor Windows 2000/2003.

Alguém na lista já teve a oportunidade de utilizar com sucesso o módulo
Win32::PerfMon?

Estou tendo alguns problemas como relado em
http://www.perlmonks.org/?node_id=439313 por Solli Moreira Honorio.


Obrigado
-- 
-------------------------------------------------------------
João Henrique Freitas - joaohf_at_gmail.com
Americana-SP-Brasil
BSD051283
LPI 1
http://paginas.terra.com.br/informatica/joaohf
http://www.livejournal.com/users/joaohf/
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: http://mail.pm.org/pipermail/cascavel-pm/attachments/20071016/63f19c72/attachment.html 

From frederico em gmail.com  Tue Oct 16 08:29:17 2007
From: frederico em gmail.com (Frederico Recsky)
Date: Tue, 16 Oct 2007 11:29:17 -0400
Subject: [Cascavel-pm] problemas com automount no Fedora 7 [off-topic]
In-Reply-To: <BAY121-W154EE1F6382C8BCAF37BA4F5A30@phx.gbl>
References: <BAY121-W154EE1F6382C8BCAF37BA4F5A30@phx.gbl>
Message-ID: <88fe68ee0710160829j729832b2x4fd066da9dfacfb4@mail.gmail.com>

Olá

On 10/15/07, Alceu Rodrigues de Freitas Junior <glasswalk3r em hotmail.com> wrote:
> Eu instalei recentemente o Fedora 7 no meu computador. A instalação tinha
> (aparentemente) ocorrido perfeitamente até eu resolver ler um DVD ou um
> pendrive: o automount não está funcionando.

em geral no /etc/udev/rules.d tem um monte de arquivos com as regras,
que éum match no log do kernel de um lado com a ação do outro. Ve se
esse diretorio existe e tem os arquivos. A regra do meu usb key por
exemplo é:

KERNEL=="sd*[!0-9]|sr*|st*", ENV{ID_SERIAL}!="?*",
IMPORT{program}="usb_id --ex    port %p"

Onde se (quando vc espeta) aparecer no log do kernel sd*[!0-9] ele
executa o usb_id... bla.  Está no arquivo
"60-persistent-storage.rules". Eu verifiquei em um suse, pode ser que
no fedora os nomes dos arquivos possa ser um pouco diferente.

> Alguém já passou por esse problema? Eu já havia instalado o Fedora em outro
> computador e a montagem automática funcionou conforme o esperado.

Não sei se você já tentou, mas reinstala o udev somente ou da o update
dele. As vezes o update não reescreve os arquivos de config, nesse
caso você tira ele com rpm -e --nodeps e rpm -i instala a mesma versão
de novo.  Para pegar o rpm só do udev deve ter no yum alguma opção de
só baixar o pacote e não instala-lo. Ou de instalar fazer purge dos
arquivos de config, dai vc nem precisa arrancar na mao via rpm -e
--nodeps.
Quando voce colocar o usb key confere no dmesg se está aparecendo algo
como new device sda ou sdb etc.. Para isolar o problema no udev.

[]'s

-- 
____________________________
Frederico Recsky
Linux User: #253572
http://www.fred.eti.br
http://www.perl.org.br

From glasswalk3r em hotmail.com  Tue Oct 16 09:00:20 2007
From: glasswalk3r em hotmail.com (Alceu Rodrigues de Freitas Junior)
Date: Tue, 16 Oct 2007 19:00:20 +0300
Subject: [Cascavel-pm] le invisibles champ (era: problemas com automount
 no Fedora 7 [off-topic])
In-Reply-To: <F789D919-DEB8-4086-BDF4-6AB12173E1F1@sapo.pt>
References: <BAY121-W154EE1F6382C8BCAF37BA4F5A30@phx.gbl>
	<18872EF2-B2AF-4D89-851F-40B31ECD0985@sapo.pt>
	<20071016141437.GD30311@bitbistro.com> 
	<F789D919-DEB8-4086-BDF4-6AB12173E1F1@sapo.pt>
Message-ID: <BAY121-W14BA246F480021E4CAC001F59C0@phx.gbl>

Acho que vai ter que ser fora da lista mesmo Luis... por algum motivo eu nunca recebo email seu vindo pela Cascavel.PM.

Algum monge já passou por isso?

---
Alceu Rodrigues de Freitas Junior
glasswalk3r em hotmail.com


From: nelio.nunes em sapo.pt
Date: Tue, 16 Oct 2007 16:03:04 +0100
To: cascavel-pm em pm.org
Subject: Re: [Cascavel-pm] problemas com automount no Fedora 7 [off-topic]

Luís, que mau humor!Só estava fazendo um pouco de publicidade ao ubuntu, não faz mal nenhum.
 Nélio Nunesnelio.nunes em sapo.pt 
On 2007/10/16, at 15:14, Luis Motta Campos wrote:On Tue, Oct 16, 2007 at 02:17:16PM +0100, Nélio Nunes wrote: A solução está aqui :)
http://www.ubuntu.com/getubuntu/download 
(Nelio Nunes)-- # estrategias de solucao de problemas do windows no linux
Alceu, vou olhar o teu problema mais tarde, devo te enviar um emailquando chegar em casa, vamos falar sobre isso em privado.
Putamplexos!-- Luis Motta CamposPerl Programmer, Hobbyist Cook and Photographer_______________________________________________Cascavel-pm mailing listCascavel-pm em pm.orghttp://mail.pm.org/mailman/listinfo/cascavel-pm
 

_________________________________________________________________
Explore the seven wonders of the world
http://search.msn.com/results.aspx?q=7+wonders+world&mkt=en-US&form=QBRE
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: http://mail.pm.org/pipermail/cascavel-pm/attachments/20071016/eadfcfe6/attachment-0001.html 

From shonorio em gmail.com  Tue Oct 16 18:49:32 2007
From: shonorio em gmail.com (Solli Honorio)
Date: Tue, 16 Oct 2007 22:49:32 -0300
Subject: [Cascavel-pm] Win32 PerfMon
In-Reply-To: <88e33d220710160820w47266310yd1c30ac07b62692e@mail.gmail.com>
References: <88e33d220710160820w47266310yd1c30ac07b62692e@mail.gmail.com>
Message-ID: <12d1f4ee0710161849j4e07462er2cdb3c0d1a156550@mail.gmail.com>

Cara, eu acabei de dar uma olhada rápida no código XS e ví que o pdh está
reclamando de argumentos inválidos. Ví também que o código é no mínimo
estranho, pena pois este módulo realmente é interssante, mas faz tempo que
eu não trabalho com ele.

Mas fala aí o que vc está precisando ? Talvez eu possa ajudar enquanto dou
olhada com mais calma no código XS deste módulo.

Solli M. Honório

On 10/16/07, João Henrique Freitas <joaohf em gmail.com> wrote:
>
> Olá, tudo bom?
>
> Estou tentando utilizar o PERL e o módulo Win32::PerfMon disponível em http://search.cpan.org/~glensmall/Win32-PerfMon-0.07/PerfMon.pm
> <http://search.cpan.org/%7Eglensmall/Win32-PerfMon-0.07/PerfMon.pm> com o
> seguinte objetivo:
>
> Gerar uma listagem dos objetos, contadores e instâncias relacionados aos
> monitores de desempenho de um servidor Windows 2000/2003.
>
> Alguém na lista já teve a oportunidade de utilizar com sucesso o módulo
> Win32::PerfMon?
>
> Estou tendo alguns problemas como relado em
> http://www.perlmonks.org/?node_id=439313 por Solli Moreira Honorio.
>
>
> Obrigado
> --
> -------------------------------------------------------------
> João Henrique Freitas - joaohf_at_gmail.com
> Americana-SP-Brasil
> BSD051283
> LPI 1
> http://paginas.terra.com.br/informatica/joaohf
> http://www.livejournal.com/users/joaohf/
> _______________________________________________
> Cascavel-pm mailing list
> Cascavel-pm em pm.org
> http://mail.pm.org/mailman/listinfo/cascavel-pm
>



-- 
"o animal satisfeito dorme". - Guimarães Rosa
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: http://mail.pm.org/pipermail/cascavel-pm/attachments/20071016/c6a0f49e/attachment.html 

From luismottacampos em yahoo.co.uk  Wed Oct 17 00:17:52 2007
From: luismottacampos em yahoo.co.uk (Luis Motta Campos)
Date: Wed, 17 Oct 2007 09:17:52 +0200
Subject: [Cascavel-pm] [OT] Sobre o teu problema com Fedora e Automount...
Message-ID: <20071017071752.GB1655@bitbistro.com>

> Ola monges,

> Como sei que tem alguns craques em Linux aqui na lista, vou tentar a sorte.

> Eu instalei recentemente o Fedora 7 no meu computador. A instalacao tinha
> (aparentemente) ocorrido perfeitamente ate eu resolver ler um DVD ou um
> pendrive: o automount nao esta funcionando.

> Eu fiz algumas checagens basicas (como procurar por pacotes que poderiam nao
> ter sido instalados) e notei que o script hotplug nao existe no sistema.

> Como nao encontrei nenhum pacote que tenha esse script, fiquei meio sem
> saida. Depois de alguma pesquisa no Google, eu verifiquei que o Fedora 7 usa o
> udev para gerenciar montagens automaticas, mas sinceramente nao sei se e por
> isso que nao esta funcionando (eu ainda nao chequei atualizacao para o pacote
> do udev no repositorio do Fedora).

> Alguem ja passou por esse problema? Eu ja havia instalado o Fedora em outro
> computador e a montagem automatica funcionou conforme o esperado.

Oies. Desculpe nao ter enviado email ontem - eu desmaiei na cama depois
de jantar, estava exausto. Eu estou trocando de emprego aqui, e isso
quer dizer que tenho de deixar tudo em ordem na empresa velha. Estou
trabalhando como um Cao Infiel ;)

Eu nunca passei por isso, Alceu. Mas tres palavras para o Bibliotecario
Bebado (fedora udev automount) me trouxeram este artigo:

http://www.g-loaded.eu/2005/11/10/packet-writing-on-cdrw-and-dvdrw-media/

Que menciona alguma coisa sobre o Fedora nao ter uma regra muito
importante sobre automounting de midia removivel (aa primeira vista o
artigo parece nao ter nada a ver, mas ele converge para o teu problema e
ainda te dah a solucao completa).

E, jah que eu estou aqui, posso adiantar que esta eh uma das distros
mais mal documentadas que eu jah vi... :( nao eh facil encontrar
documentacao especifica, eles nao tem politicas para a maior parte das
coisas que se pode fazer de mais de uma forma, e me parece que o melhor
que se pode fazer a este respeito eh evitar a distro.

http://tldp.org/HOWTO/Automount.html

BTW, pode ser que voce se beneficie de ler o Automount Mini Howto. ;) 

Me diz se isso ajudou, sim?

Putamplexos.
-- 
Luis Motta Campos
Perl Programmer, Hobbyist Cook and Photographer

From joaohf em gmail.com  Wed Oct 17 04:19:43 2007
From: joaohf em gmail.com (=?UTF-8?Q?Jo=C3=A3o_Henrique_Freitas?=)
Date: Wed, 17 Oct 2007 09:19:43 -0200
Subject: [Cascavel-pm] Win32 PerfMon
In-Reply-To: <12d1f4ee0710161849j4e07462er2cdb3c0d1a156550@mail.gmail.com>
References: <88e33d220710160820w47266310yd1c30ac07b62692e@mail.gmail.com>
	<12d1f4ee0710161849j4e07462er2cdb3c0d1a156550@mail.gmail.com>
Message-ID: <88e33d220710170419m25263f94w52707207fae9d776@mail.gmail.com>

Olá,

É um módulo bem fácil de mexer. Pena que nem tudo funciona mas acho que dá
para consertar.

Estou trabalhando com uma aplicação chamada Zabbix. Ela suporta inserção de
informações para serem monitoradas em um servidor via XML, facilitando o
trabalho. A minha intenção é pegar cada contador de desempenho do windows e
gerar o XML para o Zabbix.

Uma das formas é utilizar o módulo e a outra é extrair os contadores com o
comando typeperf e depois utilizar os recursos do perl para extrar as
informações necessárias e estruturar o XML.

A primeira forma via módulo Win32:PerfMon tem um design mais interessante e
expansível, infelizmente esbarrei no retorno da função ListInstances().

Obrigado pela atenção.


On 10/16/07, Solli Honorio <shonorio em gmail.com> wrote:
>
> Cara, eu acabei de dar uma olhada rápida no código XS e ví que o pdh está
> reclamando de argumentos inválidos. Ví também que o código é no mínimo
> estranho, pena pois este módulo realmente é interssante, mas faz tempo que
> eu não trabalho com ele.
>
> Mas fala aí o que vc está precisando ? Talvez eu possa ajudar enquanto dou
> olhada com mais calma no código XS deste módulo.
>
> Solli M. Honório
>
> On 10/16/07, João Henrique Freitas <joaohf em gmail.com> wrote:
>
> > Olá, tudo bom?
> >
> > Estou tentando utilizar o PERL e o módulo Win32::PerfMon disponível em http://search.cpan.org/~glensmall/Win32-PerfMon-0.07/PerfMon.pm
> > <http://search.cpan.org/%7Eglensmall/Win32-PerfMon-0.07/PerfMon.pm> com
> > o seguinte objetivo:
> >
> > Gerar uma listagem dos objetos, contadores e instâncias relacionados aos
> > monitores de desempenho de um servidor Windows 2000/2003.
> >
> > Alguém na lista já teve a oportunidade de utilizar com sucesso o módulo
> > Win32::PerfMon?
> >
> > Estou tendo alguns problemas como relado em
> > http://www.perlmonks.org/?node_id=439313 por Solli Moreira Honorio.
> >
> >
> > Obrigado
> > --
> > -------------------------------------------------------------
> > João Henrique Freitas - joaohf_at_gmail.com
> > Americana-SP-Brasil
> > BSD051283
> > LPI 1
> > http://paginas.terra.com.br/informatica/joaohf
> > http://www.livejournal.com/users/joaohf/
> > _______________________________________________
> > Cascavel-pm mailing list
> > Cascavel-pm em pm.org
> > http://mail.pm.org/mailman/listinfo/cascavel-pm
> >
>
>
>
> --
> "o animal satisfeito dorme". - Guimarães Rosa
> _______________________________________________
> Cascavel-pm mailing list
> Cascavel-pm em pm.org
> http://mail.pm.org/mailman/listinfo/cascavel-pm
>



-- 
-------------------------------------------------------------
João Henrique Freitas - joaohf_at_gmail.com
Americana-SP-Brasil
BSD051283
LPI 1
http://paginas.terra.com.br/informatica/joaohf
http://www.livejournal.com/users/joaohf/
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: http://mail.pm.org/pipermail/cascavel-pm/attachments/20071017/59ef8992/attachment.html 

From shonorio em gmail.com  Wed Oct 17 06:04:52 2007
From: shonorio em gmail.com (Solli Honorio)
Date: Wed, 17 Oct 2007 11:04:52 -0200
Subject: [Cascavel-pm] Win32 PerfMon
In-Reply-To: <88e33d220710170419m25263f94w52707207fae9d776@mail.gmail.com>
References: <88e33d220710160820w47266310yd1c30ac07b62692e@mail.gmail.com>
	<12d1f4ee0710161849j4e07462er2cdb3c0d1a156550@mail.gmail.com>
	<88e33d220710170419m25263f94w52707207fae9d776@mail.gmail.com>
Message-ID: <12d1f4ee0710170604m506356e5l4c5ac6629fd052b0@mail.gmail.com>

Eu conheço o Zabbix, vou dar uma olhada neste no PerfMon para tentar
resolver este problema.

Pelo o que eu ví não deve estar tão difícil de resolver este problema, só
preciso montar o circo em casa.... vou dar uma olhada nisto neste final de
semana (se o meu orientador deixar é claro ;) ). O teu problema está apenas
na lista de instâncias ? Pois eu acho que ainda tenho um programa com o
PerfLib que faz isto !!!

Onde vc estará utilizando o Zabbix ? Eu tenho interesse nestes projetos de
monitoramento de infra-estrutura e gostaria de saber mais o que você está
fazendo, se isto for possível é claro.

Solli M. Honório

On 10/17/07, João Henrique Freitas <joaohf em gmail.com> wrote:
>
> Olá,
>
> É um módulo bem fácil de mexer. Pena que nem tudo funciona mas acho que dá
> para consertar.
>
> Estou trabalhando com uma aplicação chamada Zabbix. Ela suporta inserção
> de informações para serem monitoradas em um servidor via XML, facilitando o
> trabalho. A minha intenção é pegar cada contador de desempenho do windows e
> gerar o XML para o Zabbix.
>
> Uma das formas é utilizar o módulo e a outra é extrair os contadores com o
> comando typeperf e depois utilizar os recursos do perl para extrar as
> informações necessárias e estruturar o XML.
>
> A primeira forma via módulo Win32:PerfMon tem um design mais interessante
> e expansível, infelizmente esbarrei no retorno da função ListInstances().
>
> Obrigado pela atenção.
>
>
> On 10/16/07, Solli Honorio <shonorio em gmail.com> wrote:
> >
> > Cara, eu acabei de dar uma olhada rápida no código XS e ví que o pdh
> > está reclamando de argumentos inválidos. Ví também que o código é no mínimo
> > estranho, pena pois este módulo realmente é interssante, mas faz tempo que
> > eu não trabalho com ele.
> >
> > Mas fala aí o que vc está precisando ? Talvez eu possa ajudar enquanto
> > dou olhada com mais calma no código XS deste módulo.
> >
> > Solli M. Honório
> >
> > On 10/16/07, João Henrique Freitas < joaohf em gmail.com> wrote:
> >
> > > Olá, tudo bom?
> > >
> > > Estou tentando utilizar o PERL e o módulo Win32::PerfMon disponível em
> > > http://search.cpan.org/~glensmall/Win32-PerfMon-0.07/PerfMon.pm
> > > <http://search.cpan.org/%7Eglensmall/Win32-PerfMon-0.07/PerfMon.pm>com o seguinte objetivo:
> > >
> > > Gerar uma listagem dos objetos, contadores e instâncias relacionados
> > > aos monitores de desempenho de um servidor Windows 2000/2003.
> > >
> > > Alguém na lista já teve a oportunidade de utilizar com sucesso o
> > > módulo Win32::PerfMon?
> > >
> > > Estou tendo alguns problemas como relado em
> > > http://www.perlmonks.org/?node_id=439313 por Solli Moreira Honorio.
> > >
> > >
> > > Obrigado
> > > --
> > > -------------------------------------------------------------
> > > João Henrique Freitas - joaohf_at_gmail.com
> > > Americana-SP-Brasil
> > > BSD051283
> > > LPI 1
> > > http://paginas.terra.com.br/informatica/joaohf
> > > http://www.livejournal.com/users/joaohf/
> > > _______________________________________________
> > > Cascavel-pm mailing list
> > > Cascavel-pm em pm.org
> > > http://mail.pm.org/mailman/listinfo/cascavel-pm
> > >
> >
> >
> >
> > --
> > "o animal satisfeito dorme". - Guimarães Rosa
> > _______________________________________________
> > Cascavel-pm mailing list
> > Cascavel-pm em pm.org
> > http://mail.pm.org/mailman/listinfo/cascavel-pm
> >
>
>
>
> --
> -------------------------------------------------------------
> João Henrique Freitas - joaohf_at_gmail.com
> Americana-SP-Brasil
> BSD051283
> LPI 1
> http://paginas.terra.com.br/informatica/joaohf
> http://www.livejournal.com/users/joaohf/
>
> _______________________________________________
> Cascavel-pm mailing list
> Cascavel-pm em pm.org
> http://mail.pm.org/mailman/listinfo/cascavel-pm
>



-- 
"o animal satisfeito dorme". - Guimarães Rosa
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: http://mail.pm.org/pipermail/cascavel-pm/attachments/20071017/5dcf5680/attachment-0001.html 

From joaohf em gmail.com  Wed Oct 17 11:42:46 2007
From: joaohf em gmail.com (=?UTF-8?Q?Jo=C3=A3o_Henrique_Freitas?=)
Date: Wed, 17 Oct 2007 16:42:46 -0200
Subject: [Cascavel-pm] Win32 PerfMon
In-Reply-To: <12d1f4ee0710170604m506356e5l4c5ac6629fd052b0@mail.gmail.com>
References: <88e33d220710160820w47266310yd1c30ac07b62692e@mail.gmail.com>
	<12d1f4ee0710161849j4e07462er2cdb3c0d1a156550@mail.gmail.com>
	<88e33d220710170419m25263f94w52707207fae9d776@mail.gmail.com>
	<12d1f4ee0710170604m506356e5l4c5ac6629fd052b0@mail.gmail.com>
Message-ID: <88e33d220710171142r27e43641ge09fa869466503c1@mail.gmail.com>

Solli,

O link http://www.perlmonks.org/?node_id=439313 relata exatamente o problema
que encontrei.

Tenho um código meio pronto para extrair (usando o PerfMon) a informação e
montar o XML mas está faltando justamente a parte da instância que é
primordial. Se quiser posto aqui.

Sobre o Zabbix, basicamente estou usando os agentes de monitoramento
instalados em alguns clientes geograficamente separados para coletar o maior
número de informações que necessitam ser armazenadas para identificação de
problemas de forma proativa.




On 10/17/07, Solli Honorio <shonorio em gmail.com> wrote:
>
> Eu conheço o Zabbix, vou dar uma olhada neste no PerfMon para tentar
> resolver este problema.
>
> Pelo o que eu ví não deve estar tão difícil de resolver este problema, só
> preciso montar o circo em casa.... vou dar uma olhada nisto neste final de
> semana (se o meu orientador deixar é claro ;) ). O teu problema está apenas
> na lista de instâncias ? Pois eu acho que ainda tenho um programa com o
> PerfLib que faz isto !!!
>
> Onde vc estará utilizando o Zabbix ? Eu tenho interesse nestes projetos de
> monitoramento de infra-estrutura e gostaria de saber mais o que você está
> fazendo, se isto for possível é claro.
>
> Solli M. Honório
>
> On 10/17/07, João Henrique Freitas <joaohf em gmail.com> wrote:
> >
> > Olá,
> >
> > É um módulo bem fácil de mexer. Pena que nem tudo funciona mas acho que
> > dá para consertar.
> >
> > Estou trabalhando com uma aplicação chamada Zabbix. Ela suporta inserção
> > de informações para serem monitoradas em um servidor via XML, facilitando o
> > trabalho. A minha intenção é pegar cada contador de desempenho do windows e
> > gerar o XML para o Zabbix.
> >
> > Uma das formas é utilizar o módulo e a outra é extrair os contadores com
> > o comando typeperf e depois utilizar os recursos do perl para extrar as
> > informações necessárias e estruturar o XML.
> >
> > A primeira forma via módulo Win32:PerfMon tem um design mais
> > interessante e expansível, infelizmente esbarrei no retorno da função
> > ListInstances().
> >
> > Obrigado pela atenção.
> >
> >
> > On 10/16/07, Solli Honorio < shonorio em gmail.com> wrote:
> > >
> > > Cara, eu acabei de dar uma olhada rápida no código XS e ví que o pdh
> > > está reclamando de argumentos inválidos. Ví também que o código é no mínimo
> > > estranho, pena pois este módulo realmente é interssante, mas faz tempo que
> > > eu não trabalho com ele.
> > >
> > > Mas fala aí o que vc está precisando ? Talvez eu possa ajudar enquanto
> > > dou olhada com mais calma no código XS deste módulo.
> > >
> > > Solli M. Honório
> > >
> > > On 10/16/07, João Henrique Freitas < joaohf em gmail.com> wrote:
> > >
> > > > Olá, tudo bom?
> > > >
> > > > Estou tentando utilizar o PERL e o módulo Win32::PerfMon disponível
> > > > em http://search.cpan.org/~glensmall/Win32-PerfMon-0.07/PerfMon.pm
> > > > <http://search.cpan.org/%7Eglensmall/Win32-PerfMon-0.07/PerfMon.pm>com o seguinte objetivo:
> > > >
> > > > Gerar uma listagem dos objetos, contadores e instâncias relacionados
> > > > aos monitores de desempenho de um servidor Windows 2000/2003.
> > > >
> > > > Alguém na lista já teve a oportunidade de utilizar com sucesso o
> > > > módulo Win32::PerfMon?
> > > >
> > > > Estou tendo alguns problemas como relado em
> > > > http://www.perlmonks.org/?node_id=439313 por Solli Moreira Honorio.
> > > >
> > > >
> > > > Obrigado
> > > > --
> > > > -------------------------------------------------------------
> > > > João Henrique Freitas - joaohf_at_gmail.com
> > > > Americana-SP-Brasil
> > > > BSD051283
> > > > LPI 1
> > > > http://paginas.terra.com.br/informatica/joaohf
> > > > http://www.livejournal.com/users/joaohf/
> > > > _______________________________________________
> > > > Cascavel-pm mailing list
> > > > Cascavel-pm em pm.org
> > > > http://mail.pm.org/mailman/listinfo/cascavel-pm
> > > >
> > >
> > >
> > >
> > > --
> > > "o animal satisfeito dorme". - Guimarães Rosa
> > > _______________________________________________
> > > Cascavel-pm mailing list
> > > Cascavel-pm em pm.org
> > >  http://mail.pm.org/mailman/listinfo/cascavel-pm
> > >
> >
> >
> >
> > --
> > -------------------------------------------------------------
> > João Henrique Freitas - joaohf_at_gmail.com
> > Americana-SP-Brasil
> > BSD051283
> > LPI 1
> > http://paginas.terra.com.br/informatica/joaohf
> > http://www.livejournal.com/users/joaohf/
> >
> > _______________________________________________
> > Cascavel-pm mailing list
> > Cascavel-pm em pm.org
> > http://mail.pm.org/mailman/listinfo/cascavel-pm
> >
>
>
>
> --
> "o animal satisfeito dorme". - Guimarães Rosa
>
> _______________________________________________
> Cascavel-pm mailing list
> Cascavel-pm em pm.org
> http://mail.pm.org/mailman/listinfo/cascavel-pm
>



-- 
-------------------------------------------------------------
João Henrique Freitas - joaohf_at_gmail.com
Americana-SP-Brasil
BSD051283
LPI 1
http://paginas.terra.com.br/informatica/joaohf
http://www.livejournal.com/users/joaohf/
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: http://mail.pm.org/pipermail/cascavel-pm/attachments/20071017/f3f4e237/attachment.html 

From ricardostock em bol.com.br  Thu Oct 18 04:07:20 2007
From: ricardostock em bol.com.br (Ricardo Stock)
Date: Thu, 18 Oct 2007 08:07:20 -0300
Subject: [Cascavel-pm] contra barra
Message-ID: <000801c81177$1037c550$0