From daniel em ruoso.com  Wed Apr  1 05:58:55 2009
From: daniel em ruoso.com (Daniel Ruoso)
Date: Wed, 01 Apr 2009 09:58:55 -0300
Subject: [Cascavel-pm] Google Summer Of Code 2009
In-Reply-To: <1238501718.26084.20.camel@cajueiro>
References: <1238501718.26084.20.camel@cajueiro>
Message-ID: <1238590735.26084.58.camel@cajueiro>

Em Ter, 2009-03-31 às 09:15 -0300, Daniel Ruoso escreveu:
> Só para lembrar que o Summer Of Code já está recebendo as inscrições de
> estudantes. Então se você for estudante de nível superior tem a
> oportunidade de receber uma bolsa para trabalhar em algum projeto de
> Perl interessante.
> Esse ano estou novamente dentre os possíveis "mentors" da Perl
> Foundation no programa, então se tiverem uma idéia legal e quiserem
> ajuda para formatá-la melhor, é só entrar em contato.

Só para lembrar que o prazo termina dia 3 de abril, ou seja, depois de
amanhã. Então corram inscrever suas propostas.

daniel


From daniel.oliveira.mantovani em gmail.com  Wed Apr  1 07:01:30 2009
From: daniel.oliveira.mantovani em gmail.com (Daniel de Oliveira Mantovani)
Date: Wed, 1 Apr 2009 11:01:30 -0300
Subject: [Cascavel-pm] Google Summer Of Code 2009
In-Reply-To: <1238590735.26084.58.camel@cajueiro>
References: <1238501718.26084.20.camel@cajueiro>
	<1238590735.26084.58.camel@cajueiro>
Message-ID: <214823ca0904010701n5fe26ba9l7493f838594c20bb@mail.gmail.com>

Daniel, você pode explicar como funciona o Summer of Code ?
Muitas pessoas estão com muitas dúvidas. Por exemplo:

* Os estudantes tem que enviar uma proposta?
* Qual o site para se inscrever ?
* Como será divida as tarefas ?

2009/4/1 Daniel Ruoso <daniel em ruoso.com>

> Em Ter, 2009-03-31 às 09:15 -0300, Daniel Ruoso escreveu:
> > Só para lembrar que o Summer Of Code já está recebendo as inscrições de
> > estudantes. Então se você for estudante de nível superior tem a
> > oportunidade de receber uma bolsa para trabalhar em algum projeto de
> > Perl interessante.
> > Esse ano estou novamente dentre os possíveis "mentors" da Perl
> > Foundation no programa, então se tiverem uma idéia legal e quiserem
> > ajuda para formatá-la melhor, é só entrar em contato.
>
> Só para lembrar que o prazo termina dia 3 de abril, ou seja, depois de
> amanhã. Então corram inscrever suas propostas.
>
> daniel
>
> _______________________________________________
> Cascavel-pm mailing list
> Cascavel-pm em pm.org
> http://mail.pm.org/mailman/listinfo/cascavel-pm
>



-- 
http://mantovanihouse.blogspot.com/
This is my poney:
-------(\_------------_/)-----------
-------)--(----------)--(-----------
------(----(---------)----)----------
-------)----(-------)----(-----------
-------(----(-------)----)-----------
--------\_-(\\.---.//)-_/------------
----------\)' -8--8- '(/--------------
-----------/------------\---------------
----------(--)--------(--)--------------
------------(_c__c_)----------------
----------------------------------------
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: <http://mail.pm.org/pipermail/cascavel-pm/attachments/20090401/5267344f/attachment.html>

From lorn.br em gmail.com  Wed Apr  1 07:06:15 2009
From: lorn.br em gmail.com (Lindolfo "Lorn" Rodrigues)
Date: Wed, 1 Apr 2009 11:06:15 -0300
Subject: [Cascavel-pm] Google Summer Of Code 2009
In-Reply-To: <214823ca0904010701n5fe26ba9l7493f838594c20bb@mail.gmail.com>
References: <1238501718.26084.20.camel@cajueiro>
	<1238590735.26084.58.camel@cajueiro>
	<214823ca0904010701n5fe26ba9l7493f838594c20bb@mail.gmail.com>
Message-ID: <bb8590d00904010706h45d16982i3b9eac00a52bdda5@mail.gmail.com>

Muitas pessoas a.k.a vc :P

http://code.google.com/soc/

2009/4/1 Daniel de Oliveira Mantovani <daniel.oliveira.mantovani em gmail.com>

> Daniel, você pode explicar como funciona o Summer of Code ?
> Muitas pessoas estão com muitas dúvidas. Por exemplo:
>
> * Os estudantes tem que enviar uma proposta?
> * Qual o site para se inscrever ?
> * Como será divida as tarefas ?
>
> 2009/4/1 Daniel Ruoso <daniel em ruoso.com>
>
> Em Ter, 2009-03-31 às 09:15 -0300, Daniel Ruoso escreveu:
>> > Só para lembrar que o Summer Of Code já está recebendo as inscrições de
>> > estudantes. Então se você for estudante de nível superior tem a
>> > oportunidade de receber uma bolsa para trabalhar em algum projeto de
>> > Perl interessante.
>> > Esse ano estou novamente dentre os possíveis "mentors" da Perl
>> > Foundation no programa, então se tiverem uma idéia legal e quiserem
>> > ajuda para formatá-la melhor, é só entrar em contato.
>>
>> Só para lembrar que o prazo termina dia 3 de abril, ou seja, depois de
>> amanhã. Então corram inscrever suas propostas.
>>
>> daniel
>>
>> _______________________________________________
>> Cascavel-pm mailing list
>> Cascavel-pm em pm.org
>> http://mail.pm.org/mailman/listinfo/cascavel-pm
>>
>
>
>
> --
> http://mantovanihouse.blogspot.com/
> This is my poney:
> -------(\_------------_/)-----------
> -------)--(----------)--(-----------
> ------(----(---------)----)----------
> -------)----(-------)----(-----------
> -------(----(-------)----)-----------
> --------\_-(\\.---.//)-_/------------
> ----------\)' -8--8- '(/--------------
> -----------/------------\---------------
> ----------(--)--------(--)--------------
> ------------(_c__c_)----------------
> ----------------------------------------
>
> _______________________________________________
> Cascavel-pm mailing list
> Cascavel-pm em pm.org
> http://mail.pm.org/mailman/listinfo/cascavel-pm
>



-- 
--Lindolfo "Lorn" Rodrigues
www.slackwarezine.com.br
http://lornlab.org
http://sao-paulo.pm.org
use Catalyst;
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: <http://mail.pm.org/pipermail/cascavel-pm/attachments/20090401/b17378c6/attachment.html>

From nferraz em gmail.com  Wed Apr  1 07:09:41 2009
From: nferraz em gmail.com (Nelson Ferraz)
Date: Wed, 1 Apr 2009 16:09:41 +0200
Subject: [Cascavel-pm] Google Summer Of Code 2009
In-Reply-To: <214823ca0904010701n5fe26ba9l7493f838594c20bb@mail.gmail.com>
References: <1238501718.26084.20.camel@cajueiro>
	<1238590735.26084.58.camel@cajueiro>
	<214823ca0904010701n5fe26ba9l7493f838594c20bb@mail.gmail.com>
Message-ID: <604cec170904010709m77d38908y4246b6067abd28ba@mail.gmail.com>

2009/4/1 Daniel de Oliveira Mantovani <daniel.oliveira.mantovani em gmail.com>:
> Daniel, você pode explicar como funciona o Summer of Code ?
> Muitas pessoas estão com muitas dúvidas. Por exemplo:
>
> * Os estudantes tem que enviar uma proposta?
> * Qual o site para se inscrever ?
> * Como será divida as tarefas ?

http://socghop.appspot.com/

http://socghop.appspot.com/document/show/program/google/gsoc2009/userguide#depth_students

From daniel em ruoso.com  Wed Apr  1 07:13:03 2009
From: daniel em ruoso.com (Daniel Ruoso)
Date: Wed, 01 Apr 2009 11:13:03 -0300
Subject: [Cascavel-pm] Google Summer Of Code 2009
In-Reply-To: <214823ca0904010701n5fe26ba9l7493f838594c20bb@mail.gmail.com>
References: <1238501718.26084.20.camel@cajueiro>
	<1238590735.26084.58.camel@cajueiro>
	<214823ca0904010701n5fe26ba9l7493f838594c20bb@mail.gmail.com>
Message-ID: <1238595183.26084.72.camel@cajueiro>

Em Qua, 2009-04-01 às 11:01 -0300, Daniel de Oliveira Mantovani
escreveu:
> Daniel, você pode explicar como funciona o Summer of Code ?

É um programa de bolsas para estudantes que querem desenvolver algum
projeto de software nas férias (de verão no hemisfério norte).

> Muitas pessoas estão com muitas dúvidas. Por exemplo:
> * Os estudantes tem que enviar uma proposta?

Sim. Os estudantes devem enviar uma proposta até 3 de abril 19:00 UTC,
ou seja, 16:00 horário de brasília.

> * Qual o site para se inscrever ?

http://socghop.appspot.com/

> * Como será divida as tarefas ?

O projeto será totalmente desenvolvido por você, e necessariamente deve
ser um projeto individual. Uma comissão de orientadores irá votar nas
propostas. As mais bem votadas serão aceitas.

daniel


From elvio.barbalho em gmail.com  Wed Apr  1 08:25:51 2009
From: elvio.barbalho em gmail.com (Elvio Barbalho)
Date: Wed, 1 Apr 2009 12:25:51 -0300
Subject: [Cascavel-pm] Erro ao tentar conectar no Oracle
Message-ID: <8fb8eacb0904010825m4264c1d0of384425346791b11@mail.gmail.com>

Senhores boa tarde, estou com problemas ao tentar conectar no oracle 9
Estou utilizando o ActivePerl 5.6, Windows XP. Instalei os modulos DBI e
DBI:ORACLE atraves do PPM, tenho o oracle client instalado ok em minha
maquina pois acesso o banco perfeitamente atraves do sqldeveloper.


ao utilizar o exemplo abaixo


use DBI;
use DBD::Oracle;

my $usuario = "xxxx";
my $senha = "xxxx";
my $banco = "xxxxx";

my $dbh = DBI->connect( "DBI:Oracle:$banco",$usuario,$senha )
or die "Can't connect to Oracle database: $DBI::errstr\n";
exit;

apresenta o seguinte erro:

DBI connect('bilprd2','extract',...) failed: ORA-12705: Cannot access NLS
data files or invalid environment specified (DBD ERROR: OCISessionBegin) at
D:/Documents and Settings/elvio.barbalho/workspace/PRODUCAO/all_drivers.pl
line 8
Can't connect to Oracle database: ORA-12705: Cannot access NLS data files or
invalid environment specified (DBD ERROR: OCISessionBegin)


poderiam me dar uma ajuda no que esta acontecendo?????


Elvio Barbalho
Brasília, DF
Brasil

T + 55 61 21096814
C + 55 61 84223137
C + 55 61 81751213
elvio.barbalho em gmail.com
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: <http://mail.pm.org/pipermail/cascavel-pm/attachments/20090401/128575fa/attachment-0001.html>

From joenio em gmail.com  Wed Apr  1 09:11:32 2009
From: joenio em gmail.com (Joenio Costa)
Date: Wed, 1 Apr 2009 13:11:32 -0300
Subject: [Cascavel-pm]
	=?iso-8859-1?q?=5BSP-pm=5D_Links_Quebrados=2C_Infor?=
	=?iso-8859-1?q?ma=E7=E3o_Confusa_e_Linha_Cruzada_com_Singapura_=5B?=
	=?iso-8859-1?q?Was=3A_Re=3A_Chamada_de_trabalho_para_o_FISL=5D?=
In-Reply-To: <49D2D327.9090705@aware.com.br>
References: <12d1f4ee0903310416k63de2d07xef5b4bf5d3dd511@mail.gmail.com>
	<49D28BCA.6030802@yahoo.co.uk> <49D2D327.9090705@aware.com.br>
Message-ID: <65934b450904010911m7b17d4b3ubc904b905ea7fb8e@mail.gmail.com>

Feito!

ps.: quem é o mágico?

2009/3/31 Thiago Rondon <thiago em aware.com.br>:
>
> Este conceito de 'Bazar' muitas vezes é totalmente distorcida.........
>
> A informação do curso ainda esta lá e até agora o mágico não atualizou a
> informação, se ele vai existir fora do FISL ou se o evento foi
> redimensionado errado.
>
> Fico só preocupado com as pessoas fora da 'comunidade' que olham isto, acaba
> virando um evento só da comunidade, por que só ela entende.
>
> ** Não estou jogando pedras, é apenas uma observação construtiva. ;-)
>
> -Thiago Rondon
>
> Luis Motta Campos escreveu:
>>
>> Solli Honorio wrote:
>>
>>>
>>> Pessoal,
>>>
>>> Está aberto as inscrições para a chamada de trabalho para o FISL 10 (
>>> http://fisl.softwarelivre.org/10/www/chamada-de-trabalhos), com limite
>>> até o
>>> dia 26/4/2009. Não estarei no FISL este ano, mas coloco à disposição
>>> minha
>>> experiência de palestrante para ajudá-lo a escrever propostas com maior
>>> possibilidade de serem aceitas.
>>>
>>> O Joênio já disponibilizou o site do YAPC::SA::2009
>>> http://www.perl.org.br/YAPC/SA2009/, que está sendo organizada pelo
>>> Brasil.pm.
>>>
>>
>> O website está confuso, lamento dizer. A data no cabeçalho diz "24 a 27
>> de Junho de 2009", mas mais abaixo tem uma entrada dizendo "Last call
>> for paper submission. The deadline is September 30th, submit your
>> paper!", que obviamente deve se referir ao ano passado, sem tornar isso
>> explícito.
>>
>> Fora isso, o link http://www.conisli.org/grade/grade.html está quebrado:
>>
>> $ whois conisli.org.
>> # ...
>> Domain ID:D155220281-LROR
>> Domain Name:CONISLI.ORG
>> Created On:29-Jan-2009 14:31:11 UTC
>> Last Updated On:31-Mar-2009 03:58:02 UTC
>> Expiration Date:29-Jan-2010 14:31:11 UTC
>> Sponsoring Registrar:Blue Razor Domains, Inc. (R1268-LROR)
>> #...
>> Registrant ID:DABO-03539033
>> Registrant Name:Zheng Hua
>> Registrant Street1:Jurong East
>> Registrant City:Singapore
>> Registrant State/Province:Singapore
>> Registrant Postal Code:600251
>> Registrant Country:SG
>> Registrant Phone:+65.96252761
>> Registrant Phone Ext.:
>> Registrant Email:barryford82 em gmail.com
>>
>> Parece que os chineses já registraram o domínio... e parece que a
>> expiração venceu faz tempo, já que os chineses registraram este no final
>> de janeiro. Eu até poderia arriscar dizer quem deve ter se comprometido
>> a pagar pelo registro do DNS...
>>
>> O Conisli está fora da jogada, pessoal. E o YAPC::SA já levou os
>> primeiros respingos... :-(
>>
>> Putamplexos.
>>
>
> _______________________________________________
> SaoPaulo-pm mailing list
> SaoPaulo-pm em pm.org
> http://mail.pm.org/mailman/listinfo/saopaulo-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 daniel.oliveira.mantovani em gmail.com  Wed Apr  1 09:15:50 2009
From: daniel.oliveira.mantovani em gmail.com (Daniel de Oliveira Mantovani)
Date: Wed, 1 Apr 2009 13:15:50 -0300
Subject: [Cascavel-pm] Erro ao tentar conectar no Oracle
In-Reply-To: <8fb8eacb0904010825m4264c1d0of384425346791b11@mail.gmail.com>
References: <8fb8eacb0904010825m4264c1d0of384425346791b11@mail.gmail.com>
Message-ID: <214823ca0904010915j5479b805i97ba2d99fbf35628@mail.gmail.com>

Uma pergunta, quando você instalou o DBD::Oracle, no Windows, você pulou os
testes ?

2009/4/1 Elvio Barbalho <elvio.barbalho em gmail.com>

> Senhores boa tarde, estou com problemas ao tentar conectar no oracle 9
> Estou utilizando o ActivePerl 5.6, Windows XP. Instalei os modulos DBI e
> DBI:ORACLE atraves do PPM, tenho o oracle client instalado ok em minha
> maquina pois acesso o banco perfeitamente atraves do sqldeveloper.
>
>
> ao utilizar o exemplo abaixo
>
>
> use DBI;
> use DBD::Oracle;
>
> my $usuario = "xxxx";
> my $senha = "xxxx";
> my $banco = "xxxxx";
>
> my $dbh = DBI->connect( "DBI:Oracle:$banco",$usuario,$senha )
> or die "Can't connect to Oracle database: $DBI::errstr\n";
> exit;
>
> apresenta o seguinte erro:
>
> DBI connect('bilprd2','extract',...) failed: ORA-12705: Cannot access NLS
> data files or invalid environment specified (DBD ERROR: OCISessionBegin) at
> D:/Documents and Settings/elvio.barbalho/workspace/PRODUCAO/all_drivers.pl
> line 8
> Can't connect to Oracle database: ORA-12705: Cannot access NLS data files
> or invalid environment specified (DBD ERROR: OCISessionBegin)
>
>
> poderiam me dar uma ajuda no que esta acontecendo?????
>
>
> Elvio Barbalho
> Brasília, DF
> Brasil
>
> T + 55 61 21096814
> C + 55 61 84223137
> C + 55 61 81751213
> elvio.barbalho em gmail.com
>
>
>
> _______________________________________________
> Cascavel-pm mailing list
> Cascavel-pm em pm.org
> http://mail.pm.org/mailman/listinfo/cascavel-pm
>



-- 
http://mantovanihouse.blogspot.com/
This is my poney:
-------(\_------------_/)-----------
-------)--(----------)--(-----------
------(----(---------)----)----------
-------)----(-------)----(-----------
-------(----(-------)----)-----------
--------\_-(\\.---.//)-_/------------
----------\)' -8--8- '(/--------------
-----------/------------\---------------
----------(--)--------(--)--------------
------------(_c__c_)----------------
----------------------------------------
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: <http://mail.pm.org/pipermail/cascavel-pm/attachments/20090401/269f563b/attachment.html>

From elvio.barbalho em gmail.com  Wed Apr  1 09:19:38 2009
From: elvio.barbalho em gmail.com (Elvio Barbalho)
Date: Wed, 1 Apr 2009 13:19:38 -0300
Subject: [Cascavel-pm] Erro ao tentar conectar no Oracle
In-Reply-To: <214823ca0904010915j5479b805i97ba2d99fbf35628@mail.gmail.com>
References: <8fb8eacb0904010825m4264c1d0of384425346791b11@mail.gmail.com>
	<214823ca0904010915j5479b805i97ba2d99fbf35628@mail.gmail.com>
Message-ID: <8fb8eacb0904010919k6901f673q5b28dc582a876feb@mail.gmail.com>

Não simplesmente fiz istall DBI:ORACLE e não apresentou erros. pelo menos eu
não os vi!!!!!

Elvio Barbalho
Brasília, DF
Brasil

T + 55 61 21096814
C + 55 61 84223137
C + 55 61 81751213
elvio.barbalho em gmail.com




2009/4/1 Daniel de Oliveira Mantovani <daniel.oliveira.mantovani em gmail.com>

> Uma pergunta, quando você instalou o DBD::Oracle, no Windows, você pulou os
> testes ?
>
> 2009/4/1 Elvio Barbalho <elvio.barbalho em gmail.com>
>
>> Senhores boa tarde, estou com problemas ao tentar conectar no oracle 9
>> Estou utilizando o ActivePerl 5.6, Windows XP. Instalei os modulos DBI e
>> DBI:ORACLE atraves do PPM, tenho o oracle client instalado ok em minha
>> maquina pois acesso o banco perfeitamente atraves do sqldeveloper.
>>
>>
>> ao utilizar o exemplo abaixo
>>
>>
>> use DBI;
>> use DBD::Oracle;
>>
>> my $usuario = "xxxx";
>> my $senha = "xxxx";
>> my $banco = "xxxxx";
>>
>> my $dbh = DBI->connect( "DBI:Oracle:$banco",$usuario,$senha )
>> or die "Can't connect to Oracle database: $DBI::errstr\n";
>> exit;
>>
>> apresenta o seguinte erro:
>>
>> DBI connect('bilprd2','extract',...) failed: ORA-12705: Cannot access NLS
>> data files or invalid environment specified (DBD ERROR: OCISessionBegin) at
>> D:/Documents and Settings/elvio.barbalho/workspace/PRODUCAO/all_drivers.pl
>> line 8
>> Can't connect to Oracle database: ORA-12705: Cannot access NLS data files
>> or invalid environment specified (DBD ERROR: OCISessionBegin)
>>
>>
>> poderiam me dar uma ajuda no que esta acontecendo?????
>>
>>
>> Elvio Barbalho
>> Brasília, DF
>> Brasil
>>
>> T + 55 61 21096814
>> C + 55 61 84223137
>> C + 55 61 81751213
>> elvio.barbalho em gmail.com
>>
>>
>>
>> _______________________________________________
>> Cascavel-pm mailing list
>> Cascavel-pm em pm.org
>> http://mail.pm.org/mailman/listinfo/cascavel-pm
>>
>
>
>
> --
> http://mantovanihouse.blogspot.com/
> This is my poney:
> -------(\_------------_/)-----------
> -------)--(----------)--(-----------
> ------(----(---------)----)----------
> -------)----(-------)----(-----------
> -------(----(-------)----)-----------
> --------\_-(\\.---.//)-_/------------
> ----------\)' -8--8- '(/--------------
> -----------/------------\---------------
> ----------(--)--------(--)--------------
> ------------(_c__c_)----------------
> ----------------------------------------
>
> _______________________________________________
> 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/20090401/9de32090/attachment.html>

From thiago em aware.com.br  Wed Apr  1 09:19:17 2009
From: thiago em aware.com.br (Thiago Rondon)
Date: Wed, 01 Apr 2009 13:19:17 -0300
Subject: [Cascavel-pm] Erro ao tentar conectar no Oracle
In-Reply-To: <8fb8eacb0904010825m4264c1d0of384425346791b11@mail.gmail.com>
References: <8fb8eacb0904010825m4264c1d0of384425346791b11@mail.gmail.com>
Message-ID: <49D39405.3050409@aware.com.br>


Verifique as variaveis NLS_LANG, ORA_NLSxx ou ORACLE_HOME se estão corretas.

-Thiago Rondon

Elvio Barbalho escreveu:
> Senhores boa tarde, estou com problemas ao tentar conectar no oracle 9
>
> Estou utilizando o ActivePerl 5.6, Windows XP. Instalei os modulos DBI 
> e DBI:ORACLE atraves do PPM, tenho o oracle client instalado ok em 
> minha maquina pois acesso o banco perfeitamente atraves do sqldeveloper.
>
>
> ao utilizar o exemplo abaixo 
>
>
> use DBI;
> use DBD::Oracle;
>
> my $usuario = "xxxx";
> my $senha = "xxxx";
> my $banco = "xxxxx";
>
> my $dbh = DBI->connect( "DBI:Oracle:$banco",$usuario,$senha )
> or die "Can't connect to Oracle database: $DBI::errstr\n";
> exit;
>
> apresenta o seguinte erro:
>
> DBI connect('bilprd2','extract',...) failed: ORA-12705: Cannot access 
> NLS data files or invalid environment specified (DBD ERROR: 
> OCISessionBegin) at D:/Documents and 
> Settings/elvio.barbalho/workspace/PRODUCAO/all_drivers.pl line 8
> Can't connect to Oracle database: ORA-12705: Cannot access NLS data 
> files or invalid environment specified (DBD ERROR: OCISessionBegin)
>
>
> poderiam me dar uma ajuda no que esta acontecendo?????
>
>
> Elvio Barbalho
> Brasília, DF
> Brasil
>
> T + 55 61 21096814
> C + 55 61 84223137
> C + 55 61 81751213
> elvio.barbalho em gmail.com <mailto:elvio.barbalho em gmail.com>
>
>
> ------------------------------------------------------------------------
>
> _______________________________________________
> Cascavel-pm mailing list
> Cascavel-pm em pm.org
> http://mail.pm.org/mailman/listinfo/cascavel-pm


From elvio.barbalho em gmail.com  Wed Apr  1 09:22:15 2009
From: elvio.barbalho em gmail.com (Elvio Barbalho)
Date: Wed, 1 Apr 2009 13:22:15 -0300
Subject: [Cascavel-pm] Erro ao tentar conectar no Oracle
In-Reply-To: <8fb8eacb0904010919k6901f673q5b28dc582a876feb@mail.gmail.com>
References: <8fb8eacb0904010825m4264c1d0of384425346791b11@mail.gmail.com>
	<214823ca0904010915j5479b805i97ba2d99fbf35628@mail.gmail.com>
	<8fb8eacb0904010919k6901f673q5b28dc582a876feb@mail.gmail.com>
Message-ID: <8fb8eacb0904010922m6d357bfaw488f5c35bb95206c@mail.gmail.com>

corrigindo!!!

install DBI
install DBD::Oracle

Elvio Barbalho
Brasília, DF
Brasil

T + 55 61 21096814
C + 55 61 84223137
C + 55 61 81751213
elvio.barbalho em gmail.com




2009/4/1 Elvio Barbalho <elvio.barbalho em gmail.com>

> Não simplesmente fiz istall DBI:ORACLE e não apresentou erros. pelo menos
> eu não os vi!!!!!
>
> Elvio Barbalho
> Brasília, DF
> Brasil
>
> T + 55 61 21096814
> C + 55 61 84223137
> C + 55 61 81751213
> elvio.barbalho em gmail.com
>
>
>
>
> 2009/4/1 Daniel de Oliveira Mantovani <daniel.oliveira.mantovani em gmail.com
> >
>
> Uma pergunta, quando você instalou o DBD::Oracle, no Windows, você pulou os
>> testes ?
>>
>> 2009/4/1 Elvio Barbalho <elvio.barbalho em gmail.com>
>>
>>> Senhores boa tarde, estou com problemas ao tentar conectar no oracle 9
>>> Estou utilizando o ActivePerl 5.6, Windows XP. Instalei os modulos DBI e
>>> DBI:ORACLE atraves do PPM, tenho o oracle client instalado ok em minha
>>> maquina pois acesso o banco perfeitamente atraves do sqldeveloper.
>>>
>>>
>>> ao utilizar o exemplo abaixo
>>>
>>>
>>> use DBI;
>>> use DBD::Oracle;
>>>
>>> my $usuario = "xxxx";
>>> my $senha = "xxxx";
>>> my $banco = "xxxxx";
>>>
>>> my $dbh = DBI->connect( "DBI:Oracle:$banco",$usuario,$senha )
>>> or die "Can't connect to Oracle database: $DBI::errstr\n";
>>> exit;
>>>
>>> apresenta o seguinte erro:
>>>
>>> DBI connect('bilprd2','extract',...) failed: ORA-12705: Cannot access NLS
>>> data files or invalid environment specified (DBD ERROR: OCISessionBegin) at
>>> D:/Documents and Settings/elvio.barbalho/workspace/PRODUCAO/all_drivers.pl
>>> line 8
>>> Can't connect to Oracle database: ORA-12705: Cannot access NLS data files
>>> or invalid environment specified (DBD ERROR: OCISessionBegin)
>>>
>>>
>>> poderiam me dar uma ajuda no que esta acontecendo?????
>>>
>>>
>>> Elvio Barbalho
>>> Brasília, DF
>>> Brasil
>>>
>>> T + 55 61 21096814
>>> C + 55 61 84223137
>>> C + 55 61 81751213
>>> elvio.barbalho em gmail.com
>>>
>>>
>>>
>>> _______________________________________________
>>> Cascavel-pm mailing list
>>> Cascavel-pm em pm.org
>>> http://mail.pm.org/mailman/listinfo/cascavel-pm
>>>
>>
>>
>>
>> --
>> http://mantovanihouse.blogspot.com/
>> This is my poney:
>> -------(\_------------_/)-----------
>> -------)--(----------)--(-----------
>> ------(----(---------)----)----------
>> -------)----(-------)----(-----------
>> -------(----(-------)----)-----------
>> --------\_-(\\.---.//)-_/------------
>> ----------\)' -8--8- '(/--------------
>> -----------/------------\---------------
>> ----------(--)--------(--)--------------
>> ------------(_c__c_)----------------
>> ----------------------------------------
>>
>> _______________________________________________
>> 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/20090401/e29a59df/attachment-0001.html>

From elvio.barbalho em gmail.com  Wed Apr  1 09:25:01 2009
From: elvio.barbalho em gmail.com (Elvio Barbalho)
Date: Wed, 1 Apr 2009 13:25:01 -0300
Subject: [Cascavel-pm] Erro ao tentar conectar no Oracle
In-Reply-To: <49D39405.3050409@aware.com.br>
References: <8fb8eacb0904010825m4264c1d0of384425346791b11@mail.gmail.com>
	<49D39405.3050409@aware.com.br>
Message-ID: <8fb8eacb0904010925k2008be3cyedc6f8b6ee0e30c3@mail.gmail.com>

Blz Thiago, como vou saber quais os valores que deveriam estar nestas
variáveis.

Elvio Barbalho
Brasília, DF
Brasil

T + 55 61 21096814
C + 55 61 84223137
C + 55 61 81751213
elvio.barbalho em gmail.com




2009/4/1 Thiago Rondon <thiago em aware.com.br>

>
> Verifique as variaveis NLS_LANG, ORA_NLSxx ou ORACLE_HOME se estão
> corretas.
>
> -Thiago Rondon
>
> Elvio Barbalho escreveu:
>
>> Senhores boa tarde, estou com problemas ao tentar conectar no oracle 9
>>
>> Estou utilizando o ActivePerl 5.6, Windows XP. Instalei os modulos DBI e
>> DBI:ORACLE atraves do PPM, tenho o oracle client instalado ok em minha
>> maquina pois acesso o banco perfeitamente atraves do sqldeveloper.
>>
>>
>> ao utilizar o exemplo abaixo
>>
>> use DBI;
>> use DBD::Oracle;
>>
>> my $usuario = "xxxx";
>> my $senha = "xxxx";
>> my $banco = "xxxxx";
>>
>> my $dbh = DBI->connect( "DBI:Oracle:$banco",$usuario,$senha )
>> or die "Can't connect to Oracle database: $DBI::errstr\n";
>> exit;
>>
>> apresenta o seguinte erro:
>>
>> DBI connect('bilprd2','extract',...) failed: ORA-12705: Cannot access NLS
>> data files or invalid environment specified (DBD ERROR: OCISessionBegin) at
>> D:/Documents and Settings/elvio.barbalho/workspace/PRODUCAO/all_drivers.pl
>> line 8
>> Can't connect to Oracle database: ORA-12705: Cannot access NLS data files
>> or invalid environment specified (DBD ERROR: OCISessionBegin)
>>
>>
>> poderiam me dar uma ajuda no que esta acontecendo?????
>>
>>
>> Elvio Barbalho
>> Brasília, DF
>> Brasil
>>
>> T + 55 61 21096814
>> C + 55 61 84223137
>> C + 55 61 81751213
>> elvio.barbalho em gmail.com <mailto:elvio.barbalho em gmail.com>
>>
>>
>> ------------------------------------------------------------------------
>>
>> _______________________________________________
>> 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
>
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: <http://mail.pm.org/pipermail/cascavel-pm/attachments/20090401/afe6911a/attachment.html>

From elvio.barbalho em gmail.com  Wed Apr  1 09:26:36 2009
From: elvio.barbalho em gmail.com (Elvio Barbalho)
Date: Wed, 1 Apr 2009 13:26:36 -0300
Subject: [Cascavel-pm] Erro ao tentar conectar no Oracle
In-Reply-To: <8fb8eacb0904010925k2008be3cyedc6f8b6ee0e30c3@mail.gmail.com>
References: <8fb8eacb0904010825m4264c1d0of384425346791b11@mail.gmail.com>
	<49D39405.3050409@aware.com.br>
	<8fb8eacb0904010925k2008be3cyedc6f8b6ee0e30c3@mail.gmail.com>
Message-ID: <8fb8eacb0904010926y4e1c943cu681f13e3a4ebe851@mail.gmail.com>

Segue as saidas que ocorreram durante a instalação.
ppm> install DBI:ORACLE
Searching for 'DBI:ORACLE' returned no results. Try a broader search first.
ppm> install DBD::Oracle
Note: Package 'DBD-Oracle' is already installed.
====================
Install 'DBD-Oracle' version 1.16 in ActivePerl 5.6.1.635.
====================
Downloaded 212798 bytes.
Extracting 58/58: blib/script/.exists
ORACLE TECHNOLOGY NETWORK
DEVELOPMENT AND DISTRIBUTION LICENSE AGREEMENT

Do you accept the terms of this license ? (y/n) : y
Fetching oci.dll.gz (94 Kb)
  94Kb/94Kb (100.00%)
Decompressing.
oci.dll checksum: OK
Fetching oraociei10.dll.gz (28 Mb)
  28Mb/28Mb (100.00%)
Decompressing..................................................................
...............................................................................
...........................
oraociei10.dll checksum: OK
Successfully installed DBD-Oracle version 1.16 in ActivePerl 5.6.1.635.
ppm>

Elvio Barbalho
Brasília, DF
Brasil

T + 55 61 21096814
C + 55 61 84223137
C + 55 61 81751213
elvio.barbalho em gmail.com




2009/4/1 Elvio Barbalho <elvio.barbalho em gmail.com>

> Blz Thiago, como vou saber quais os valores que deveriam estar nestas
> variáveis.
>
> Elvio Barbalho
> Brasília, DF
> Brasil
>
> T + 55 61 21096814
> C + 55 61 84223137
> C + 55 61 81751213
> elvio.barbalho em gmail.com
>
>
>
>
> 2009/4/1 Thiago Rondon <thiago em aware.com.br>
>
>
>> Verifique as variaveis NLS_LANG, ORA_NLSxx ou ORACLE_HOME se estão
>> corretas.
>>
>> -Thiago Rondon
>>
>> Elvio Barbalho escreveu:
>>
>>> Senhores boa tarde, estou com problemas ao tentar conectar no oracle 9
>>>
>>> Estou utilizando o ActivePerl 5.6, Windows XP. Instalei os modulos DBI e
>>> DBI:ORACLE atraves do PPM, tenho o oracle client instalado ok em minha
>>> maquina pois acesso o banco perfeitamente atraves do sqldeveloper.
>>>
>>>
>>> ao utilizar o exemplo abaixo
>>>
>>> use DBI;
>>> use DBD::Oracle;
>>>
>>> my $usuario = "xxxx";
>>> my $senha = "xxxx";
>>> my $banco = "xxxxx";
>>>
>>> my $dbh = DBI->connect( "DBI:Oracle:$banco",$usuario,$senha )
>>> or die "Can't connect to Oracle database: $DBI::errstr\n";
>>> exit;
>>>
>>> apresenta o seguinte erro:
>>>
>>> DBI connect('bilprd2','extract',...) failed: ORA-12705: Cannot access NLS
>>> data files or invalid environment specified (DBD ERROR: OCISessionBegin) at
>>> D:/Documents and Settings/elvio.barbalho/workspace/PRODUCAO/all_drivers.pl
>>> line 8
>>> Can't connect to Oracle database: ORA-12705: Cannot access NLS data files
>>> or invalid environment specified (DBD ERROR: OCISessionBegin)
>>>
>>>
>>> poderiam me dar uma ajuda no que esta acontecendo?????
>>>
>>>
>>> Elvio Barbalho
>>> Brasília, DF
>>> Brasil
>>>
>>> T + 55 61 21096814
>>> C + 55 61 84223137
>>> C + 55 61 81751213
>>> elvio.barbalho em gmail.com <mailto:elvio.barbalho em gmail.com>
>>>
>>>
>>> ------------------------------------------------------------------------
>>>
>>> _______________________________________________
>>> 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
>>
>
>
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: <http://mail.pm.org/pipermail/cascavel-pm/attachments/20090401/b43ecef3/attachment.html>

From thiago em aware.com.br  Wed Apr  1 09:34:59 2009
From: thiago em aware.com.br (Thiago Rondon)
Date: Wed, 01 Apr 2009 13:34:59 -0300
Subject: [Cascavel-pm] Erro ao tentar conectar no Oracle
In-Reply-To: <8fb8eacb0904010925k2008be3cyedc6f8b6ee0e30c3@mail.gmail.com>
References: <8fb8eacb0904010825m4264c1d0of384425346791b11@mail.gmail.com>	<49D39405.3050409@aware.com.br>
	<8fb8eacb0904010925k2008be3cyedc6f8b6ee0e30c3@mail.gmail.com>
Message-ID: <49D397B3.6030505@aware.com.br>


Elvio,

Acredito que você esteja com dúdiva de Oracle e não de Perl, acho que 
você esta no lugar errado. :-)

Mas, falando sobre o Oracle, verifique por exemplo a ORACLE_HOME (que 
possivelmente deve ser o teu problema), se esta variavel de ambiente 
esta apontando para o diretorio 'home' do 'oracle'!

-Thiago Rondon

Elvio Barbalho escreveu:
> Blz Thiago, como vou saber quais os valores que deveriam estar nestas 
> variáveis.
>
>
> Elvio Barbalho
> Brasília, DF
> Brasil
>
> T + 55 61 21096814
> C + 55 61 84223137
> C + 55 61 81751213
> elvio.barbalho em gmail.com <mailto:elvio.barbalho em gmail.com>
>
>
>
>
> 2009/4/1 Thiago Rondon <thiago em aware.com.br <mailto:thiago em aware.com.br>>
>
>
>     Verifique as variaveis NLS_LANG, ORA_NLSxx ou ORACLE_HOME se estão
>     corretas.
>
>     -Thiago Rondon
>
>     Elvio Barbalho escreveu:
>
>         Senhores boa tarde, estou com problemas ao tentar conectar no
>         oracle 9
>
>         Estou utilizando o ActivePerl 5.6, Windows XP. Instalei os
>         modulos DBI e DBI:ORACLE atraves do PPM, tenho o oracle client
>         instalado ok em minha maquina pois acesso o banco
>         perfeitamente atraves do sqldeveloper.
>
>
>         ao utilizar o exemplo abaixo
>
>         use DBI;
>         use DBD::Oracle;
>
>         my $usuario = "xxxx";
>         my $senha = "xxxx";
>         my $banco = "xxxxx";
>
>         my $dbh = DBI->connect( "DBI:Oracle:$banco",$usuario,$senha )
>         or die "Can't connect to Oracle database: $DBI::errstr\n";
>         exit;
>
>         apresenta o seguinte erro:
>
>         DBI connect('bilprd2','extract',...) failed: ORA-12705: Cannot
>         access NLS data files or invalid environment specified (DBD
>         ERROR: OCISessionBegin) at D:/Documents and
>         Settings/elvio.barbalho/workspace/PRODUCAO/all_drivers.pl line 8
>         Can't connect to Oracle database: ORA-12705: Cannot access NLS
>         data files or invalid environment specified (DBD ERROR:
>         OCISessionBegin)
>
>
>         poderiam me dar uma ajuda no que esta acontecendo?????
>
>
>         Elvio Barbalho
>         Brasília, DF
>         Brasil
>
>         T + 55 61 21096814
>         C + 55 61 84223137
>         C + 55 61 81751213
>         elvio.barbalho em gmail.com <mailto:elvio.barbalho em gmail.com>
>         <mailto:elvio.barbalho em gmail.com
>         <mailto:elvio.barbalho em gmail.com>>
>
>
>
>         ------------------------------------------------------------------------
>
>         _______________________________________________
>         Cascavel-pm mailing list
>         Cascavel-pm em pm.org <mailto:Cascavel-pm em pm.org>
>         http://mail.pm.org/mailman/listinfo/cascavel-pm
>
>
>     _______________________________________________
>     Cascavel-pm mailing list
>     Cascavel-pm em pm.org <mailto: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 cromo.jml em gmail.com  Wed Apr  1 09:50:56 2009
From: cromo.jml em gmail.com (=?ISO-8859-1?Q?M=E1rcio_Vitor?=)
Date: Wed, 1 Apr 2009 13:50:56 -0300
Subject: [Cascavel-pm] Erro ao tentar conectar no Oracle
In-Reply-To: <8fb8eacb0904010825m4264c1d0of384425346791b11@mail.gmail.com>
References: <8fb8eacb0904010825m4264c1d0of384425346791b11@mail.gmail.com>
Message-ID: <3530b8ce0904010950n341f5c08nb55e215e93c46da2@mail.gmail.com>

Olá Elvio,

Me parece que é um problema na configuração nas variáveis de ambiente do seu
banco.
Você consegue se conectar normalmente via cliente?

Dá uma olhada nisso:
http://ora-12705.ora-code.com/

Márcio Vitor

2009/4/1 Elvio Barbalho <elvio.barbalho em gmail.com>

> Senhores boa tarde, estou com problemas ao tentar conectar no oracle 9
> Estou utilizando o ActivePerl 5.6, Windows XP. Instalei os modulos DBI e
> DBI:ORACLE atraves do PPM, tenho o oracle client instalado ok em minha
> maquina pois acesso o banco perfeitamente atraves do sqldeveloper.
>
>
> ao utilizar o exemplo abaixo
>
>
> use DBI;
> use DBD::Oracle;
>
> my $usuario = "xxxx";
> my $senha = "xxxx";
> my $banco = "xxxxx";
>
> my $dbh = DBI->connect( "DBI:Oracle:$banco",$usuario,$senha )
> or die "Can't connect to Oracle database: $DBI::errstr\n";
> exit;
>
> apresenta o seguinte erro:
>
> DBI connect('bilprd2','extract',...) failed: ORA-12705: Cannot access NLS
> data files or invalid environment specified (DBD ERROR: OCISessionBegin) at
> D:/Documents and Settings/elvio.barbalho/workspace/PRODUCAO/all_drivers.pl
> line 8
> Can't connect to Oracle database: ORA-12705: Cannot access NLS data files
> or invalid environment specified (DBD ERROR: OCISessionBegin)
>
>
> poderiam me dar uma ajuda no que esta acontecendo?????
>
>
> Elvio Barbalho
> Brasília, DF
> Brasil
>
> T + 55 61 21096814
> C + 55 61 84223137
> C + 55 61 81751213
> elvio.barbalho em gmail.com
>
>
>
> _______________________________________________
> 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/20090401/b4ea09d6/attachment-0001.html>

From elvio.barbalho em gmail.com  Wed Apr  1 09:58:32 2009
From: elvio.barbalho em gmail.com (Elvio Barbalho)
Date: Wed, 1 Apr 2009 13:58:32 -0300
Subject: [Cascavel-pm] Erro ao tentar conectar no Oracle
In-Reply-To: <3530b8ce0904010950n341f5c08nb55e215e93c46da2@mail.gmail.com>
References: <8fb8eacb0904010825m4264c1d0of384425346791b11@mail.gmail.com>
	<3530b8ce0904010950n341f5c08nb55e215e93c46da2@mail.gmail.com>
Message-ID: <8fb8eacb0904010958q77e8bbb7n3233c290d7df5c05@mail.gmail.com>

Márcio conecto normalmente via sqlplus!!!

Elvio Barbalho
Brasília, DF
Brasil

T + 55 61 21096814
C + 55 61 84223137
C + 55 61 81751213
elvio.barbalho em gmail.com




2009/4/1 Márcio Vitor <cromo.jml em gmail.com>

> Olá Elvio,
>
> Me parece que é um problema na configuração nas variáveis de ambiente do
> seu banco.
> Você consegue se conectar normalmente via cliente?
>
> Dá uma olhada nisso:
> http://ora-12705.ora-code.com/
>
> Márcio Vitor
>
> 2009/4/1 Elvio Barbalho <elvio.barbalho em gmail.com>
>
>> Senhores boa tarde, estou com problemas ao tentar conectar no oracle 9
>> Estou utilizando o ActivePerl 5.6, Windows XP. Instalei os modulos DBI e
>> DBI:ORACLE atraves do PPM, tenho o oracle client instalado ok em minha
>> maquina pois acesso o banco perfeitamente atraves do sqldeveloper.
>>
>>
>> ao utilizar o exemplo abaixo
>>
>>
>> use DBI;
>> use DBD::Oracle;
>>
>> my $usuario = "xxxx";
>> my $senha = "xxxx";
>> my $banco = "xxxxx";
>>
>> my $dbh = DBI->connect( "DBI:Oracle:$banco",$usuario,$senha )
>> or die "Can't connect to Oracle database: $DBI::errstr\n";
>> exit;
>>
>> apresenta o seguinte erro:
>>
>> DBI connect('bilprd2','extract',...) failed: ORA-12705: Cannot access NLS
>> data files or invalid environment specified (DBD ERROR: OCISessionBegin) at
>> D:/Documents and Settings/elvio.barbalho/workspace/PRODUCAO/all_drivers.pl
>> line 8
>> Can't connect to Oracle database: ORA-12705: Cannot access NLS data files
>> or invalid environment specified (DBD ERROR: OCISessionBegin)
>>
>>
>> poderiam me dar uma ajuda no que esta acontecendo?????
>>
>>
>> Elvio Barbalho
>> Brasília, DF
>> Brasil
>>
>> T + 55 61 21096814
>> C + 55 61 84223137
>> C + 55 61 81751213
>> elvio.barbalho em gmail.com
>>
>>
>>
>> _______________________________________________
>> 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
>
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: <http://mail.pm.org/pipermail/cascavel-pm/attachments/20090401/c4313e57/attachment.html>

From agnaldo em starweb-software.com.br  Wed Apr  1 10:04:11 2009
From: agnaldo em starweb-software.com.br (Agnaldo Macedo)
Date: Wed, 1 Apr 2009 14:04:11 -0300
Subject: [Cascavel-pm] Erro ao tentar conectar no Oracle
References: <8fb8eacb0904010825m4264c1d0of384425346791b11@mail.gmail.com><3530b8ce0904010950n341f5c08nb55e215e93c46da2@mail.gmail.com>
	<8fb8eacb0904010958q77e8bbb7n3233c290d7df5c05@mail.gmail.com>
Message-ID: <CCFC95D98E434450BE1878A7E49687A4@swmobile>


Abre uma janela do DOS.
Digita 
set ou então set >saida.txt e olha o valor das variaveis, se é que elas estão lá.



  ----- Original Message ----- 
  From: Elvio Barbalho 
  To: Cascavel Perl Mongers 
  Sent: Wednesday, April 01, 2009 1:58 PM
  Subject: Re: [Cascavel-pm] Erro ao tentar conectar no Oracle


  Márcio conecto normalmente via sqlplus!!!



  Elvio Barbalho
  Brasília, DF
  Brasil

  T + 55 61 21096814
  C + 55 61 84223137
  C + 55 61 81751213
  elvio.barbalho em gmail.com





  2009/4/1 Márcio Vitor <cromo.jml em gmail.com>

    Olá Elvio,

    Me parece que é um problema na configuração nas variáveis de ambiente do seu banco. 
    Você consegue se conectar normalmente via cliente?

    Dá uma olhada nisso:
    http://ora-12705.ora-code.com/

    Márcio Vitor


    2009/4/1 Elvio Barbalho <elvio.barbalho em gmail.com>

      Senhores boa tarde, estou com problemas ao tentar conectar no oracle 9


      Estou utilizando o ActivePerl 5.6, Windows XP. Instalei os modulos DBI e DBI:ORACLE atraves do PPM, tenho o oracle client instalado ok em minha maquina pois acesso o banco perfeitamente atraves do sqldeveloper.




      ao utilizar o exemplo abaixo 




      use DBI;
      use DBD::Oracle;


      my $usuario = "xxxx";
      my $senha = "xxxx";
      my $banco = "xxxxx";


      my $dbh = DBI->connect( "DBI:Oracle:$banco",$usuario,$senha )
      or die "Can't connect to Oracle database: $DBI::errstr\n";
      exit;


      apresenta o seguinte erro:


      DBI connect('bilprd2','extract',...) failed: ORA-12705: Cannot access NLS data files or invalid environment specified (DBD ERROR: OCISessionBegin) at D:/Documents and Settings/elvio.barbalho/workspace/PRODUCAO/all_drivers.pl line 8
      Can't connect to Oracle database: ORA-12705: Cannot access NLS data files or invalid environment specified (DBD ERROR: OCISessionBegin)




      poderiam me dar uma ajuda no que esta acontecendo?????




      Elvio Barbalho
      Brasília, DF
      Brasil

      T + 55 61 21096814
      C + 55 61 84223137
      C + 55 61 81751213
      elvio.barbalho em gmail.com





      _______________________________________________
      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
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: <http://mail.pm.org/pipermail/cascavel-pm/attachments/20090401/64224401/attachment.html>

From elvio.barbalho em gmail.com  Wed Apr  1 10:10:12 2009
From: elvio.barbalho em gmail.com (Elvio Barbalho)
Date: Wed, 1 Apr 2009 14:10:12 -0300
Subject: [Cascavel-pm] Erro ao tentar conectar no Oracle
In-Reply-To: <CCFC95D98E434450BE1878A7E49687A4@swmobile>
References: <8fb8eacb0904010825m4264c1d0of384425346791b11@mail.gmail.com>
	<3530b8ce0904010950n341f5c08nb55e215e93c46da2@mail.gmail.com>
	<8fb8eacb0904010958q77e8bbb7n3233c290d7df5c05@mail.gmail.com>
	<CCFC95D98E434450BE1878A7E49687A4@swmobile>
Message-ID: <8fb8eacb0904011010y443f0447m5daf9a3b023cf39b@mail.gmail.com>

Agnaldo, fiz e as variáveis não estão presentes, se este é o problema como
consigo usar o sqlplus normalmente???
Elvio Barbalho
Brasília, DF
Brasil

T + 55 61 21096814
C + 55 61 84223137
C + 55 61 81751213
elvio.barbalho em gmail.com




2009/4/1 Agnaldo Macedo <agnaldo em starweb-software.com.br>

>
> Abre uma janela do DOS.
> Digita
> set ou então set >saida.txt e olha o valor das variaveis, se é que elas
> estão lá.
>
>
>
>
> ----- Original Message -----
> *From:* Elvio Barbalho <elvio.barbalho em gmail.com>
> *To:* Cascavel Perl Mongers <cascavel-pm em pm.org>
> *Sent:* Wednesday, April 01, 2009 1:58 PM
> *Subject:* Re: [Cascavel-pm] Erro ao tentar conectar no Oracle
>
> Márcio conecto normalmente via sqlplus!!!
>
> Elvio Barbalho
> Brasília, DF
> Brasil
>
> T + 55 61 21096814
> C + 55 61 84223137
> C + 55 61 81751213
> elvio.barbalho em gmail.com
>
>
>
>
> 2009/4/1 Márcio Vitor <cromo.jml em gmail.com>
>
>> Olá Elvio,
>>
>> Me parece que é um problema na configuração nas variáveis de ambiente do
>> seu banco.
>> Você consegue se conectar normalmente via cliente?
>>
>> Dá uma olhada nisso:
>> http://ora-12705.ora-code.com/
>>
>> Márcio Vitor
>>
>> 2009/4/1 Elvio Barbalho <elvio.barbalho em gmail.com>
>>
>>>  Senhores boa tarde, estou com problemas ao tentar conectar no oracle 9
>>> Estou utilizando o ActivePerl 5.6, Windows XP. Instalei os modulos DBI e
>>> DBI:ORACLE atraves do PPM, tenho o oracle client instalado ok em minha
>>> maquina pois acesso o banco perfeitamente atraves do sqldeveloper.
>>>
>>>
>>> ao utilizar o exemplo abaixo
>>>
>>>
>>>  use DBI;
>>> use DBD::Oracle;
>>>
>>> my $usuario = "xxxx";
>>> my $senha = "xxxx";
>>> my $banco = "xxxxx";
>>>
>>> my $dbh = DBI->connect( "DBI:Oracle:$banco",$usuario,$senha )
>>> or die "Can't connect to Oracle database: $DBI::errstr\n";
>>> exit;
>>>
>>> apresenta o seguinte erro:
>>>
>>>  DBI connect('bilprd2','extract',...) failed: ORA-12705: Cannot access
>>> NLS data files or invalid environment specified (DBD ERROR: OCISessionBegin)
>>> at D:/Documents and
>>> Settings/elvio.barbalho/workspace/PRODUCAO/all_drivers.pl line 8
>>> Can't connect to Oracle database: ORA-12705: Cannot access NLS data files
>>> or invalid environment specified (DBD ERROR: OCISessionBegin)
>>>
>>>
>>> poderiam me dar uma ajuda no que esta acontecendo?????
>>>
>>>
>>>  Elvio Barbalho
>>> Brasília, DF
>>> Brasil
>>>
>>> T + 55 61 21096814
>>> C + 55 61 84223137
>>> C + 55 61 81751213
>>> elvio.barbalho em gmail.com
>>>
>>>
>>>
>>> _______________________________________________
>>> 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
>
>
> _______________________________________________
> 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/20090401/3039dc24/attachment-0001.html>

From agnaldo em starweb-software.com.br  Wed Apr  1 10:29:27 2009
From: agnaldo em starweb-software.com.br (Agnaldo Macedo)
Date: Wed, 1 Apr 2009 14:29:27 -0300
Subject: [Cascavel-pm] Erro ao tentar conectar no Oracle
References: <8fb8eacb0904010825m4264c1d0of384425346791b11@mail.gmail.com>
	<3530b8ce0904010950n341f5c08nb55e215e93c46da2@mail.gmail.com>
	<8fb8eacb0904010958q77e8bbb7n3233c290d7df5c05@mail.gmail.com>
	<CCFC95D98E434450BE1878A7E49687A4@swmobile>
	<8fb8eacb0904011010y443f0447m5daf9a3b023cf39b@mail.gmail.com>
Message-ID: <25B785883988458C8822BD4AA6293BF2@swmobile>


Vem provavel que ele esteja usando algum .ini ou as informações do registro do windows.

Sete as variaveis no painel de controle do windows

Iniciar
  Painel de controle
    Sistema
      Avançado
         Variaveis de ambiente
            Variaveis do sistema




  ----- Original Message ----- 
  From: Elvio Barbalho 
  To: Agnaldo Macedo ; Cascavel Perl Mongers 
  Sent: Wednesday, April 01, 2009 2:10 PM
  Subject: Re: [Cascavel-pm] Erro ao tentar conectar no Oracle


  Agnaldo, fiz e as variáveis não estão presentes, se este é o problema como consigo usar o sqlplus normalmente???

  Elvio Barbalho
  Brasília, DF
  Brasil

  T + 55 61 21096814
  C + 55 61 84223137
  C + 55 61 81751213
  elvio.barbalho em gmail.com





  2009/4/1 Agnaldo Macedo <agnaldo em starweb-software.com.br>


    Abre uma janela do DOS.
    Digita 
    set ou então set >saida.txt e olha o valor das variaveis, se é que elas estão lá.



      ----- Original Message ----- 
      From: Elvio Barbalho 
      To: Cascavel Perl Mongers 
      Sent: Wednesday, April 01, 2009 1:58 PM
      Subject: Re: [Cascavel-pm] Erro ao tentar conectar no Oracle


      Márcio conecto normalmente via sqlplus!!! 



      Elvio Barbalho
      Brasília, DF
      Brasil

      T + 55 61 21096814
      C + 55 61 84223137
      C + 55 61 81751213
      elvio.barbalho em gmail.com





      2009/4/1 Márcio Vitor <cromo.jml em gmail.com>

        Olá Elvio,

        Me parece que é um problema na configuração nas variáveis de ambiente do seu banco. 
        Você consegue se conectar normalmente via cliente?

        Dá uma olhada nisso:
        http://ora-12705.ora-code.com/

        Márcio Vitor


        2009/4/1 Elvio Barbalho <elvio.barbalho em gmail.com>

          Senhores boa tarde, estou com problemas ao tentar conectar no oracle 9 


          Estou utilizando o ActivePerl 5.6, Windows XP. Instalei os modulos DBI e DBI:ORACLE atraves do PPM, tenho o oracle client instalado ok em minha maquina pois acesso o banco perfeitamente atraves do sqldeveloper.




          ao utilizar o exemplo abaixo 




          use DBI;
          use DBD::Oracle;


          my $usuario = "xxxx";
          my $senha = "xxxx";
          my $banco = "xxxxx";


          my $dbh = DBI->connect( "DBI:Oracle:$banco",$usuario,$senha )
          or die "Can't connect to Oracle database: $DBI::errstr\n";
          exit;


          apresenta o seguinte erro:


          DBI connect('bilprd2','extract',...) failed: ORA-12705: Cannot access NLS data files or invalid environment specified (DBD ERROR: OCISessionBegin) at D:/Documents and Settings/elvio.barbalho/workspace/PRODUCAO/all_drivers.pl line 8
          Can't connect to Oracle database: ORA-12705: Cannot access NLS data files or invalid environment specified (DBD ERROR: OCISessionBegin)




          poderiam me dar uma ajuda no que esta acontecendo?????




          Elvio Barbalho
          Brasília, DF
          Brasil

          T + 55 61 21096814
          C + 55 61 84223137
          C + 55 61 81751213
          elvio.barbalho em gmail.com





          _______________________________________________
          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


    _______________________________________________
    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/20090401/fa90b37a/attachment.html>

From cromo.jml em gmail.com  Wed Apr  1 10:37:13 2009
From: cromo.jml em gmail.com (=?ISO-8859-1?Q?M=E1rcio_Vitor?=)
Date: Wed, 1 Apr 2009 14:37:13 -0300
Subject: [Cascavel-pm] Erro ao tentar conectar no Oracle
In-Reply-To: <25B785883988458C8822BD4AA6293BF2@swmobile>
References: <8fb8eacb0904010825m4264c1d0of384425346791b11@mail.gmail.com>
	<3530b8ce0904010950n341f5c08nb55e215e93c46da2@mail.gmail.com>
	<8fb8eacb0904010958q77e8bbb7n3233c290d7df5c05@mail.gmail.com>
	<CCFC95D98E434450BE1878A7E49687A4@swmobile>
	<8fb8eacb0904011010y443f0447m5daf9a3b023cf39b@mail.gmail.com>
	<25B785883988458C8822BD4AA6293BF2@swmobile>
Message-ID: <3530b8ce0904011037k140bc0c9lc6dc6cbc67b79a53@mail.gmail.com>

Você também pode conectar sem a variáveis de ambiente:
http://search.cpan.org/dist/DBD-Oracle/Oracle.pm#Connecting_without_environment_variables_or_tnsnames.ora_file

Mas recomendo que o faça, dá uma lida na documentação do DBD::Oracle, é bem
completa.

Márcio Vitor


2009/4/1 Agnaldo Macedo <agnaldo em starweb-software.com.br>

>
> Vem provavel que ele esteja usando algum .ini ou as informações do registro
> do windows.
>
> Sete as variaveis no painel de controle do windows
>
> Iniciar
>   Painel de controle
>     Sistema
>       Avançado
>          Variaveis de ambiente
>             Variaveis do sistema
>
>
>
>
>
> ----- Original Message -----
> *From:* Elvio Barbalho <elvio.barbalho em gmail.com>
> *To:* Agnaldo Macedo <agnaldo em starweb-software.com.br> ; Cascavel Perl
> Mongers <cascavel-pm em pm.org>
> *Sent:* Wednesday, April 01, 2009 2:10 PM
> *Subject:* Re: [Cascavel-pm] Erro ao tentar conectar no Oracle
>
> Agnaldo, fiz e as variáveis não estão presentes, se este é o problema como
> consigo usar o sqlplus normalmente???
> Elvio Barbalho
> Brasília, DF
> Brasil
>
> T + 55 61 21096814
> C + 55 61 84223137
> C + 55 61 81751213
> elvio.barbalho em gmail.com
>
>
>
>
> 2009/4/1 Agnaldo Macedo <agnaldo em starweb-software.com.br>
>
>>
>> Abre uma janela do DOS.
>> Digita
>> set ou então set >saida.txt e olha o valor das variaveis, se é que elas
>> estão lá.
>>
>>
>>
>>
>>   ----- Original Message -----
>> *From:* Elvio Barbalho <elvio.barbalho em gmail.com>
>> *To:* Cascavel Perl Mongers <cascavel-pm em pm.org>
>> *Sent:* Wednesday, April 01, 2009 1:58 PM
>> *Subject:* Re: [Cascavel-pm] Erro ao tentar conectar no Oracle
>>
>> Márcio conecto normalmente via sqlplus!!!
>>
>> Elvio Barbalho
>> Brasília, DF
>> Brasil
>>
>> T + 55 61 21096814
>> C + 55 61 84223137
>> C + 55 61 81751213
>> elvio.barbalho em gmail.com
>>
>>
>>
>>
>> 2009/4/1 Márcio Vitor <cromo.jml em gmail.com>
>>
>>> Olá Elvio,
>>>
>>> Me parece que é um problema na configuração nas variáveis de ambiente do
>>> seu banco.
>>> Você consegue se conectar normalmente via cliente?
>>>
>>> Dá uma olhada nisso:
>>> http://ora-12705.ora-code.com/
>>>
>>> Márcio Vitor
>>>
>>> 2009/4/1 Elvio Barbalho <elvio.barbalho em gmail.com>
>>>
>>>>  Senhores boa tarde, estou com problemas ao tentar conectar no oracle 9
>>>>
>>>> Estou utilizando o ActivePerl 5.6, Windows XP. Instalei os modulos DBI e
>>>> DBI:ORACLE atraves do PPM, tenho o oracle client instalado ok em minha
>>>> maquina pois acesso o banco perfeitamente atraves do sqldeveloper.
>>>>
>>>>
>>>> ao utilizar o exemplo abaixo
>>>>
>>>>
>>>>  use DBI;
>>>> use DBD::Oracle;
>>>>
>>>> my $usuario = "xxxx";
>>>> my $senha = "xxxx";
>>>> my $banco = "xxxxx";
>>>>
>>>> my $dbh = DBI->connect( "DBI:Oracle:$banco",$usuario,$senha )
>>>> or die "Can't connect to Oracle database: $DBI::errstr\n";
>>>> exit;
>>>>
>>>> apresenta o seguinte erro:
>>>>
>>>>  DBI connect('bilprd2','extract',...) failed: ORA-12705: Cannot access
>>>> NLS data files or invalid environment specified (DBD ERROR: OCISessionBegin)
>>>> at D:/Documents and
>>>> Settings/elvio.barbalho/workspace/PRODUCAO/all_drivers.pl line 8
>>>> Can't connect to Oracle database: ORA-12705: Cannot access NLS data
>>>> files or invalid environment specified (DBD ERROR: OCISessionBegin)
>>>>
>>>>
>>>> poderiam me dar uma ajuda no que esta acontecendo?????
>>>>
>>>>
>>>>  Elvio Barbalho
>>>> Brasília, DF
>>>> Brasil
>>>>
>>>> T + 55 61 21096814
>>>> C + 55 61 84223137
>>>> C + 55 61 81751213
>>>> elvio.barbalho em gmail.com
>>>>
>>>>
>>>>
>>>> _______________________________________________
>>>> 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
>>
>>
>> _______________________________________________
>> 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
>
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: <http://mail.pm.org/pipermail/cascavel-pm/attachments/20090401/18354a89/attachment-0001.html>

From elvio.barbalho em gmail.com  Wed Apr  1 10:45:20 2009
From: elvio.barbalho em gmail.com (Elvio Barbalho)
Date: Wed, 1 Apr 2009 14:45:20 -0300
Subject: [Cascavel-pm] Erro ao tentar conectar no Oracle
In-Reply-To: <3530b8ce0904011037k140bc0c9lc6dc6cbc67b79a53@mail.gmail.com>
References: <8fb8eacb0904010825m4264c1d0of384425346791b11@mail.gmail.com>
	<3530b8ce0904010950n341f5c08nb55e215e93c46da2@mail.gmail.com>
	<8fb8eacb0904010958q77e8bbb7n3233c290d7df5c05@mail.gmail.com>
	<CCFC95D98E434450BE1878A7E49687A4@swmobile>
	<8fb8eacb0904011010y443f0447m5daf9a3b023cf39b@mail.gmail.com>
	<25B785883988458C8822BD4AA6293BF2@swmobile>
	<3530b8ce0904011037k140bc0c9lc6dc6cbc67b79a53@mail.gmail.com>
Message-ID: <8fb8eacb0904011045m491f5831kc493969173ffec5e@mail.gmail.com>

Senhores obrigado a todos pela ajuda, realmente foi só setar a variável *
*
set NLS_LANG=AMERICAN.UTF8
*
*
*e consegui acessar o banco sem problemas!!!!!!*

*
*Elvio Barbalho
Brasília, DF
Brasil

T + 55 61 21096814
C + 55 61 84223137
C + 55 61 81751213
elvio.barbalho em gmail.com




2009/4/1 Márcio Vitor <cromo.jml em gmail.com>

> Você também pode conectar sem a variáveis de ambiente:
>
> http://search.cpan.org/dist/DBD-Oracle/Oracle.pm#Connecting_without_environment_variables_or_tnsnames.ora_file
>
> Mas recomendo que o faça, dá uma lida na documentação do DBD::Oracle, é bem
> completa.
>
> Márcio Vitor
>
>
> 2009/4/1 Agnaldo Macedo <agnaldo em starweb-software.com.br>
>
>>
>> Vem provavel que ele esteja usando algum .ini ou as informações do
>> registro do windows.
>>
>> Sete as variaveis no painel de controle do windows
>>
>> Iniciar
>>   Painel de controle
>>     Sistema
>>       Avançado
>>          Variaveis de ambiente
>>             Variaveis do sistema
>>
>>
>>
>>
>>
>> ----- Original Message -----
>>  *From:* Elvio Barbalho <elvio.barbalho em gmail.com>
>>  *To:* Agnaldo Macedo <agnaldo em starweb-software.com.br> ; Cascavel Perl
>> Mongers <cascavel-pm em pm.org>
>> *Sent:* Wednesday, April 01, 2009 2:10 PM
>> *Subject:* Re: [Cascavel-pm] Erro ao tentar conectar no Oracle
>>
>> Agnaldo, fiz e as variáveis não estão presentes, se este é o problema como
>> consigo usar o sqlplus normalmente???
>> Elvio Barbalho
>> Brasília, DF
>> Brasil
>>
>> T + 55 61 21096814
>> C + 55 61 84223137
>> C + 55 61 81751213
>> elvio.barbalho em gmail.com
>>
>>
>>
>>
>> 2009/4/1 Agnaldo Macedo <agnaldo em starweb-software.com.br>
>>
>>>
>>> Abre uma janela do DOS.
>>> Digita
>>> set ou então set >saida.txt e olha o valor das variaveis, se é que elas
>>> estão lá.
>>>
>>>
>>>
>>>
>>>   ----- Original Message -----
>>>  *From:* Elvio Barbalho <elvio.barbalho em gmail.com>
>>> *To:* Cascavel Perl Mongers <cascavel-pm em pm.org>
>>> *Sent:* Wednesday, April 01, 2009 1:58 PM
>>> *Subject:* Re: [Cascavel-pm] Erro ao tentar conectar no Oracle
>>>
>>> Márcio conecto normalmente via sqlplus!!!
>>>
>>> Elvio Barbalho
>>> Brasília, DF
>>> Brasil
>>>
>>> T + 55 61 21096814
>>> C + 55 61 84223137
>>> C + 55 61 81751213
>>> elvio.barbalho em gmail.com
>>>
>>>
>>>
>>>
>>> 2009/4/1 Márcio Vitor <cromo.jml em gmail.com>
>>>
>>>> Olá Elvio,
>>>>
>>>> Me parece que é um problema na configuração nas variáveis de ambiente do
>>>> seu banco.
>>>> Você consegue se conectar normalmente via cliente?
>>>>
>>>> Dá uma olhada nisso:
>>>> http://ora-12705.ora-code.com/
>>>>
>>>> Márcio Vitor
>>>>
>>>> 2009/4/1 Elvio Barbalho <elvio.barbalho em gmail.com>
>>>>
>>>>>  Senhores boa tarde, estou com problemas ao tentar conectar no oracle
>>>>> 9
>>>>> Estou utilizando o ActivePerl 5.6, Windows XP. Instalei os modulos DBI
>>>>> e DBI:ORACLE atraves do PPM, tenho o oracle client instalado ok em minha
>>>>> maquina pois acesso o banco perfeitamente atraves do sqldeveloper.
>>>>>
>>>>>
>>>>> ao utilizar o exemplo abaixo
>>>>>
>>>>>
>>>>>  use DBI;
>>>>> use DBD::Oracle;
>>>>>
>>>>> my $usuario = "xxxx";
>>>>> my $senha = "xxxx";
>>>>> my $banco = "xxxxx";
>>>>>
>>>>> my $dbh = DBI->connect( "DBI:Oracle:$banco",$usuario,$senha )
>>>>> or die "Can't connect to Oracle database: $DBI::errstr\n";
>>>>> exit;
>>>>>
>>>>> apresenta o seguinte erro:
>>>>>
>>>>>  DBI connect('bilprd2','extract',...) failed: ORA-12705: Cannot access
>>>>> NLS data files or invalid environment specified (DBD ERROR: OCISessionBegin)
>>>>> at D:/Documents and
>>>>> Settings/elvio.barbalho/workspace/PRODUCAO/all_drivers.pl line 8
>>>>> Can't connect to Oracle database: ORA-12705: Cannot access NLS data
>>>>> files or invalid environment specified (DBD ERROR: OCISessionBegin)
>>>>>
>>>>>
>>>>> poderiam me dar uma ajuda no que esta acontecendo?????
>>>>>
>>>>>
>>>>>  Elvio Barbalho
>>>>> Brasília, DF
>>>>> Brasil
>>>>>
>>>>> T + 55 61 21096814
>>>>> C + 55 61 84223137
>>>>> C + 55 61 81751213
>>>>> elvio.barbalho em gmail.com
>>>>>
>>>>>
>>>>>
>>>>> _______________________________________________
>>>>> 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
>>>
>>>
>>> _______________________________________________
>>> 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
>
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: <http://mail.pm.org/pipermail/cascavel-pm/attachments/20090401/c5f1fcd0/attachment.html>

From stevenkoch em surfih.com  Wed Apr  1 11:20:50 2009
From: stevenkoch em surfih.com (Steven Koch)
Date: Wed, 1 Apr 2009 19:20:50 +0100
Subject: [Cascavel-pm] Adicionar header request do browser do cliente em LWP
Message-ID: <dfdf94ef0904011120x5260cfd1med8c419ce067222b@mail.gmail.com>

Viva Pessoal,
Existe alguma maneira de adicionar o header request do browser do cliente em
um pedido do LWP para simular e receber os dados(EX: COOKIES) que
normalmente viria se fosse o browser que requerisse?

Preciso fazer um serviço de single sign-on.


OFF topic but ON list: Farei o possivel para ir ao Meeting. Sério! : )

-- 
Com os melhores cumprimentos,
Steven Koch
Sistemas de Informação

E-mail: stevenkoch em surfih.com

Rua Augusto Machado 13A 3F
2825-307 Costa da Caparica - Portugal

Móvel: +351 917 169 615

http://www.surfih.com
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: <http://mail.pm.org/pipermail/cascavel-pm/attachments/20090401/3d2da471/attachment.html>

From daniel.oliveira.mantovani em gmail.com  Wed Apr  1 13:46:18 2009
From: daniel.oliveira.mantovani em gmail.com (Daniel de Oliveira Mantovani)
Date: Wed, 1 Apr 2009 17:46:18 -0300
Subject: [Cascavel-pm] Adicionar header request do browser do cliente em
	LWP
In-Reply-To: <dfdf94ef0904011120x5260cfd1med8c419ce067222b@mail.gmail.com>
References: <dfdf94ef0904011120x5260cfd1med8c419ce067222b@mail.gmail.com>
Message-ID: <214823ca0904011346s7b078159n4b4d08365f72aa16@mail.gmail.com>

No seu Computador:
<code>
#!/usr/bin/perl

use strict;
use warnings;
use LWP::UserAgent;
use HTTP::Request;

my $url      = 'http://localhost';
my $agent    = LWP::UserAgent->new( agent => 'Monk' );
my $request  = HTTP::Request->new( 'GET' => $url );
my $response = $agent->request($request);
my $content  = $response->content();
</code>

Computador do Cliente: nc -l -p80 -vv

Você deve usar WWW::Mechanize:
http://search.cpan.org/~petdance/WWW-Mechanize-1.54/lib/WWW/Mechanize.pm

Ou deve usar LWP::Curl:
http://search.cpan.org/~lorn/LWP-Curl-0.06/lib/LWP/Curl.pm

Existem vários módulos para isso, o Mechanize simula um navegador, e o
LWP::Curl é rápido.

2009/4/1 Steven Koch <stevenkoch em surfih.com>

> Viva Pessoal,
> Existe alguma maneira de adicionar o header request do browser do cliente
> em um pedido do LWP para simular e receber os dados(EX: COOKIES) que
> normalmente viria se fosse o browser que requerisse?
>
> Preciso fazer um serviço de single sign-on.
>
>
> OFF topic but ON list: Farei o possivel para ir ao Meeting. Sério! : )
>
> --
> Com os melhores cumprimentos,
> Steven Koch
> Sistemas de Informação
>
> E-mail: stevenkoch em surfih.com
>
> Rua Augusto Machado 13A 3F
> 2825-307 Costa da Caparica - Portugal
>
> Móvel: +351 917 169 615
>
> http://www.surfih.com
>
>
> _______________________________________________
> Cascavel-pm mailing list
> Cascavel-pm em pm.org
> http://mail.pm.org/mailman/listinfo/cascavel-pm
>



-- 
http://mantovanihouse.blogspot.com/
This is my poney:
-------(\_------------_/)-----------
-------)--(----------)--(-----------
------(----(---------)----)----------
-------)----(-------)----(-----------
-------(----(-------)----)-----------
--------\_-(\\.---.//)-_/------------
----------\)' -8--8- '(/--------------
-----------/------------\---------------
----------(--)--------(--)--------------
------------(_c__c_)----------------
----------------------------------------
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: <http://mail.pm.org/pipermail/cascavel-pm/attachments/20090401/9d5ce0f8/attachment.html>

From diogo86 em gmail.com  Wed Apr  1 14:52:56 2009
From: diogo86 em gmail.com (Diogo Galvao)
Date: Wed, 1 Apr 2009 18:52:56 -0300
Subject: [Cascavel-pm] Adicionar header request do browser do cliente em
	LWP
In-Reply-To: <dfdf94ef0904011120x5260cfd1med8c419ce067222b@mail.gmail.com>
References: <dfdf94ef0904011120x5260cfd1med8c419ce067222b@mail.gmail.com>
Message-ID: <18ae4b610904011452k4365f296jdd9969959c9a026f@mail.gmail.com>

Steven,

não sei se entendi bem, mas vale lembrar que os cookies que serão
repassados serão do seu servidor, e não do servidor de destino.

Por exemplo, se o cliente conecta em meudominio.com.br e você vai
conectar internamente em outro.com, você não tem acesso aos cookies
que o cliente tem do outro.com. Pra você, o acesso a outro.com é
independente.


2009/4/1 Steven Koch <stevenkoch em surfih.com>:
> Viva Pessoal,
> Existe alguma maneira de adicionar o header request do browser do cliente em
> um pedido do LWP para simular e receber os dados(EX: COOKIES) que
> normalmente viria se fosse o browser que requerisse?
> Preciso fazer um serviço de single sign-on.
>
> OFF topic but ON list: Farei o possivel para ir ao Meeting. Sério! : )
> --
> Com os melhores cumprimentos,
> Steven Koch
> Sistemas de Informação
>
> E-mail: stevenkoch em surfih.com
>
> Rua Augusto Machado 13A 3F
> 2825-307 Costa da Caparica - Portugal
>
> Móvel: +351 917 169 615
>
> http://www.surfih.com
>
>
> _______________________________________________
> Cascavel-pm mailing list
> Cascavel-pm em pm.org
> http://mail.pm.org/mailman/listinfo/cascavel-pm
>

From stevenkoch em surfih.com  Thu Apr  2 01:45:34 2009
From: stevenkoch em surfih.com (Steven Koch)
Date: Thu, 2 Apr 2009 09:45:34 +0100
Subject: [Cascavel-pm] Adicionar header request do browser do cliente em
	LWP
In-Reply-To: <18ae4b610904011452k4365f296jdd9969959c9a026f@mail.gmail.com>
References: <dfdf94ef0904011120x5260cfd1med8c419ce067222b@mail.gmail.com>
	<18ae4b610904011452k4365f296jdd9969959c9a026f@mail.gmail.com>
Message-ID: <dfdf94ef0904020145m34d0fc15t4f19f3da4bb7c2b5@mail.gmail.com>

Bom dia

A principio a ideia era verificar se o utilizador esta 'logado' em um outro
site nosso(domain1.com) para não precisar 'logar' novamente no site que está
visitando(domain2.com).
para isso precisaríamos ou de um identificador único do browser(não sei onde
ter este identificador) ou ter acesso as cookies que ele (browser do
cliente) guardou no dominio1

Como o apache identifica o browser? pelo MAC-Address da conexão?

tem como ter acesso a este identificador?

Obrigado!

2009/4/1 Diogo Galvao <diogo86 em gmail.com>

> Steven,
>
> não sei se entendi bem, mas vale lembrar que os cookies que serão
> repassados serão do seu servidor, e não do servidor de destino.
>
> Por exemplo, se o cliente conecta em meudominio.com.br e você vai
> conectar internamente em outro.com, você não tem acesso aos cookies
> que o cliente tem do outro.com. Pra você, o acesso a outro.com é
> independente.
>
>
> 2009/4/1 Steven Koch <stevenkoch em surfih.com>:
> > Viva Pessoal,
> > Existe alguma maneira de adicionar o header request do browser do cliente
> em
> > um pedido do LWP para simular e receber os dados(EX: COOKIES) que
> > normalmente viria se fosse o browser que requerisse?
> > Preciso fazer um serviço de single sign-on.
> >
> > OFF topic but ON list: Farei o possivel para ir ao Meeting. Sério! : )
> > --
> > Com os melhores cumprimentos,
> > Steven Koch
> > Sistemas de Informação
> >
> > E-mail: stevenkoch em surfih.com
> >
> > Rua Augusto Machado 13A 3F
> > 2825-307 Costa da Caparica - Portugal
> >
> > Móvel: +351 917 169 615
> >
> > http://www.surfih.com
> >
> >
> > _______________________________________________
> > 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
>



-- 
Com os melhores cumprimentos,
Steven Koch
Sistemas de Informação

E-mail: stevenkoch em surfih.com

Rua Augusto Machado 13A 3F
2825-307 Costa da Caparica - Portugal

Móvel: +351 917 169 615

http://www.surfih.com
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: <http://mail.pm.org/pipermail/cascavel-pm/attachments/20090402/c21f49f2/attachment.html>

From breno em rio.pm.org  Thu Apr  2 09:49:00 2009
From: breno em rio.pm.org (breno)
Date: Thu, 2 Apr 2009 13:49:00 -0300
Subject: [Cascavel-pm] Fwd: [pm_groups] Summer of Code Student Deadline
In-Reply-To: <200904020000.32660.scratchcomputing@gmail.com>
References: <200904020000.32660.scratchcomputing@gmail.com>
Message-ID: <bbea248f0904020949h2fcedd96t40975daedfadf4@mail.gmail.com>

Oi pessoal, desculpem novamente o cross-posting, mas acho que isso
interessa muita gente na comunidade Perl :)

O Josh McAdams fez um vídeo chamando todos os estudantes
universitários para participarem do GSoC'2009, de preferência num
projeto em Perl, claro:

 http://www.youtube.com/watch?v=-utZ2cA9r-E

Se você é um estudante interessado em Software Livre, agora é a hora
de agir e se envolver no programa Summer of Code do Goole.

 http://code.google.com/soc/

A cada ano, o Google oferece aos estudantes a oportunidade de passar
suas férias de verão (no hemisfério norte) escrevendo código em vez de
trabalhar em lanchonetes. Você propõe um projeto e, se selecionado,
será encaminhado para um mentor e será (muito bem) remunerado por
isso. É um programa competitivo, mas oferece uma enorme quantidade de
experiência prática e a possibilidade de se envolver seriamente em um
projeto de software livre de sua escolha.

A Perl Foundation possui uma grande variedade de projetos incluindo
Perl 5, Perl 6 e Parrot, com muitos mentores comprometidos a ajudá-los
- incluindo nosso caríssimo Daniel Ruoso :)

E o limite para se inscrever está próximo (é amanhã! 17:00 UTC => DUAS
DA TARDE na hora do Brasil)

 http://www.perlfoundation.org/perl5/index.cgi?gsoc

Participem!


[]s

-b

From fernandolouis em terra.com.br  Thu Apr  2 10:02:45 2009
From: fernandolouis em terra.com.br (Fernando)
Date: Thu, 2 Apr 2009 14:02:45 -0300
Subject: [Cascavel-pm]
	=?iso-8859-1?q?Projeto_de_tradu=E7=E3o_do_livro_=27?=
	=?iso-8859-1?q?Beginning_Perl=27_de_Simon_Cozens?=
References: <12d1f4ee0903301258i5175f43em5e9a2a79ec34d51b@mail.gmail.com>
Message-ID: <F179ACCA03694756B6A798408DAA3699@rede.local>

Qual a previsão da tradução na íntegra deste livro? Por favor informem aqui quando acabarem. Tenho bastante interesse em adquir.

[]s
  ----- Original Message ----- 
  From: Solli Honorio 
  To: Cascavel Perl Mongers 
  Sent: Monday, March 30, 2009 4:58 PM
  Subject: [Cascavel-pm] Projeto de tradução do livro 'Beginning Perl' de Simon Cozens


  Pessoal,

  Está em andamento o projeto de tradução do livro  'Beginning Perl' de Simon Cozens. Este é um bom livro e a algum tempo está disponível no http://www.perl.org/books/beginning-perl/. Recentemente entrei em contato com o Simon solicitando autorização para a tradução, e ele autorizou.

  Acredito que este é um projeto importante para colaborar na disponibilização de conteúdo em idioma português, e que poderá ser utilizado como base para outro projetos de qualificação no Perl.

  Com a ajuda do Pedro Melo (Lisboa.pm), a infra para a tradução está pronta e aguardando a colaboração de todos. E ficou da seguinte maneira:

    a.. Material está em LaTeX (não precisa ficar assustado, não é nada além do velho e ótimo texto com algumas tag);
    b.. Cada capítulo está armazenado em um arquivo no diretório 'en/';

    c.. Estamos utilizando git para controle de versão;
    d.. O "sistema de ticket" foi reduzido a um arquivo em texto, então o colaborador deverá copiar o arquivo de 'en/' para 'pt/' e alterar o status do arquivo no "nosso sistema" tickets localizado na raiz do diretório;
  Para ter acesso ao repositório, é necessário enviar um email para o Pedro Melo (melo{arroba}simplicidade{ponto}org) com a tua chave de ssh. Ele vai cadastrar no git e informar como você deve acessar.

  Agradeço a todos pela ajuda e caso tenha alguma dúvida pode me procurar,

  Abraços,

  Solli M. Honório

  -- 
  "o animal satisfeito dorme". - Guimarães Rosa



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


  _______________________________________________
  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/20090402/ab3e6675/attachment-0001.html>

From elvio.barbalho em gmail.com  Thu Apr  2 11:54:23 2009
From: elvio.barbalho em gmail.com (Elvio Barbalho)
Date: Thu, 2 Apr 2009 15:54:23 -0300
Subject: [Cascavel-pm] =?iso-8859-1?q?Executar_fun=E7=F5es_paralelamente?=
Message-ID: <8fb8eacb0904021154y749b85ddn4ff154c120a87c53@mail.gmail.com>

Senhores boa tarde, tenho duas funções gostaria de executar as duas funções
ao mesmo tempo, ou melhor chamar uma função e não esperar ela terminar para
chamar a outra função. No meu caso elas acessam dois bancos diferentes e
populam algumas tabelas. É um processo um pouco demorado para rodar
sequencialmente.
EX.
#!/usr/bin/perl -w

sub main()
{
primeira()
segunda()
}

sub primeira()
{
.........................
}

sub segunda()
{
.........................
}
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: <http://mail.pm.org/pipermail/cascavel-pm/attachments/20090402/dbc7cd96/attachment.html>

From glasswalk3r em yahoo.com.br  Thu Apr  2 12:01:53 2009
From: glasswalk3r em yahoo.com.br (Alceu R. de Freitas Jr.)
Date: Thu, 2 Apr 2009 12:01:53 -0700 (PDT)
Subject: [Cascavel-pm]
	=?iso-8859-1?q?Executar_fun=E7=F5es_paralelamente?=
Message-ID: <400064.28692.qm@web30803.mail.mud.yahoo.com>


Procure por fork, Threads e POE. Cada um tem suas vantagens e desvantagens, mas todos eles tem a capacidade de resolver esse problema que você apresentou.

[]'s

Alceu Rodrigues de Freitas Junior
--------------------------------------
glasswalk3r em yahoo.com.br
---
A well-used door needs no oil on its hinges.
A swift-flowing stream does not grow stagnant.
Neither sound nor thoughts can travel through a vacuum.
Software rots if not used.
These are great mysteries -- The Tao Of Programming, 5.1


--- Em qui, 2/4/09, Elvio Barbalho <elvio.barbalho em gmail.com> escreveu:

> De: Elvio Barbalho <elvio.barbalho em gmail.com>
> Assunto: [Cascavel-pm] Executar funções paralelamente
> Para: "Cascavel Perl Mongers" <cascavel-pm em pm.org>
> Data: Quinta-feira, 2 de Abril de 2009, 11:54
> Senhores boa tarde, tenho duas
> funções gostaria de executar as duas funções ao mesmo
> tempo, ou melhor chamar uma função e não esperar ela
> terminar para chamar a outra função. No meu caso elas
> acessam dois bancos diferentes e populam algumas tabelas. É
> um processo um pouco demorado para rodar
> sequencialmente.
> 
> EX.#!/usr/bin/perl -w
> sub
> main(){primeira()segunda()}
> sub
> primeira(){.........................
> }
> sub
> segunda(){.........................}
> 
> 



      Veja quais são os assuntos do momento no Yahoo! +Buscados
http://br.maisbuscados.yahoo.com

From acid06 em gmail.com  Thu Apr  2 12:42:40 2009
From: acid06 em gmail.com (Nilson Santos Figueiredo Jr.)
Date: Thu, 2 Apr 2009 16:42:40 -0300
Subject: [Cascavel-pm]
	=?iso-8859-1?q?Executar_fun=E7=F5es_paralelamente?=
In-Reply-To: <8fb8eacb0904021154y749b85ddn4ff154c120a87c53@mail.gmail.com>
References: <8fb8eacb0904021154y749b85ddn4ff154c120a87c53@mail.gmail.com>
Message-ID: <9a08c9b40904021242w7a834390v920057ee0cae2a4d@mail.gmail.com>

2009/4/2 Elvio Barbalho <elvio.barbalho em gmail.com>:
> Senhores boa tarde, tenho duas funções gostaria de executar as duas funções
> ao mesmo tempo, ou melhor chamar uma função e não esperar ela terminar para
> chamar a outra função. No meu caso elas acessam dois bancos diferentes e
> populam algumas tabelas. É um processo um pouco demorado para rodar
> sequencialmente.

Se você estiver rodando isso em um Perl compilado com threads e todo
seu processo for thread-safe (bibliotecas de banco de dados, seu
código e outras possíveis bibliotecas utilizadas) você pode usar o
módulo subs::parallel, desenvolvido por mim.

  use warnings;
  use strict;
  use subs::parallel;

  sub primeira : Parallel {
     ...
  }

  sub segunda : Parallel {
    ...
  }

  # bloqueia esperando ambas terminarem
  primeira() & segunda();

Apenas um comentário sobre seu código: não é considerado boa prática
declarar funções em Perl usando a sintaxe:

  sub function() {  }

Com parênteses após a declaração. Isso tem cara de código escrito por
pessoas familiares com outas linguagens de programação.

-Nilson Santos F. Jr.

From nferraz em gmail.com  Fri Apr  3 05:45:00 2009
From: nferraz em gmail.com (Nelson Ferraz)
Date: Fri, 3 Apr 2009 14:45:00 +0200
Subject: [Cascavel-pm] Perl Testing
Message-ID: <604cec170904030545x6496c72h58dd028510d77889@mail.gmail.com>

Acabei de ler esta boa notícia na lista Lisbon.pm:

O livro Perl Testing agora está disponivel no Google Books:

http://books.google.com/books?id=o9xWJtvhVZ4C&dq=perl+testing&printsec=frontcover&source=bn&hl=en&ei=yUHTSeTEF6GsjAf50P3jBg&sa=X&oi=book_result&resnum=4&ct=result#PPP1,M1

É um livro muito bom, vale a pena ler!

[]s

Nelson

From glasswalk3r em yahoo.com.br  Fri Apr  3 07:21:15 2009
From: glasswalk3r em yahoo.com.br (Alceu R. de Freitas Jr.)
Date: Fri, 3 Apr 2009 07:21:15 -0700 (PDT)
Subject: [Cascavel-pm] Perl Testing
Message-ID: <486438.86265.qm@web30807.mail.mud.yahoo.com>


--- Em sex, 3/4/09, Nelson Ferraz <nferraz em gmail.com> escreveu:

> De: Nelson Ferraz <nferraz em gmail.com>
> Assunto: [Cascavel-pm] Perl Testing
> Para: "Cascavel Perl Mongers" <cascavel-pm em pm.org>, saopaulo-pm em mail.pm.org
> Data: Sexta-feira, 3 de Abril de 2009, 5:45
> Acabei de ler esta boa notícia na
> lista Lisbon.pm:
> 
> O livro Perl Testing agora está disponivel no Google
> Books:
> 
> http://books.google.com/books?id=o9xWJtvhVZ4C&dq=perl+testing&printsec=frontcover&source=bn&hl=en&ei=yUHTSeTEF6GsjAf50P3jBg&sa=X&oi=book_result&resnum=4&ct=result#PPP1,M1
> 
> É um livro muito bom, vale a pena ler!
> 

É excelente pela parte conceitual, mas já está meio desatualizado... com o advento do TAP::* algumas coisas como o Test::Harness estão caindo em desuso e em breve devem ser deixados de lado.

Mas existe ainda compatibilidade retroativa então os códigos do livro ainda vão funcionar! E como o livro tem uma abordagem bem prática, você não vai ficar lendo um monte de blablabla matemático e já vai conseguir alguns resultados rapidamente depois de ler algumas páginas.

[]'s
Alceu


      Veja quais são os assuntos do momento no Yahoo! +Buscados
http://br.maisbuscados.yahoo.com

From agnaldo em starweb-software.com.br  Fri Apr  3 09:32:07 2009
From: agnaldo em starweb-software.com.br (Agnaldo Macedo)
Date: Fri, 3 Apr 2009 13:32:07 -0300
Subject: [Cascavel-pm] OT - Formato IPv6
References: <486438.86265.qm@web30807.mail.mud.yahoo.com>
Message-ID: <286CBB0C0331430FA8BA0B3B2FE1A314@swmobile>


O IPv4 pode ter uma mascara assim XXX . XXX . XXX . XXX
 
Qual seria um possivel formato para o IPv6 ?



From alexjfalcao em universia.com.br  Fri Apr  3 10:42:36 2009
From: alexjfalcao em universia.com.br (=?ISO-8859-1?Q?Alex_Falc=E3o?=)
Date: Fri, 3 Apr 2009 14:42:36 -0300
Subject: [Cascavel-pm] OT - Formato IPv6
In-Reply-To: <286CBB0C0331430FA8BA0B3B2FE1A314@swmobile>
References: <486438.86265.qm@web30807.mail.mud.yahoo.com>
	<286CBB0C0331430FA8BA0B3B2FE1A314@swmobile>
Message-ID: <d25a071d0904031042q79d6961dh61b147d1590e5022@mail.gmail.com>

O IPv6 tem 128bits e é represenatdo no formato hexadecimal
3ffe:6a88:85a3:0000:0000:0000:0000:7344, mas ele pode aparecer de
outras formas como:  3ffe:6a88:85a3::7344
2002:1/64

Ref:
http://pt.wikipedia.org/wiki/IPv6
http://www.ipv6.br/
http://search.cpan.org/~salva/Regexp-IPv6-0.02/lib/Regexp/IPv6.pm

abraço


Alex E. J. Falcão
Mestrando em Informática em Saúde (DIS/UNIFESP)
_______________________________________________
MSN: alexjfalcao em hotmail.com
Skype: alexjfalcao
Site Pessoal: http://alexjfalcao.pro.br
Curriculo Lates: http://lattes.cnpq.br/4899477570048086



2009/4/3 Agnaldo Macedo <agnaldo em starweb-software.com.br>:
>
> O IPv4 pode ter uma mascara assim XXX . XXX . XXX . XXX
>
> Qual seria um possivel formato para o IPv6 ?
>
>
> _______________________________________________
> Cascavel-pm mailing list
> Cascavel-pm em pm.org
> http://mail.pm.org/mailman/listinfo/cascavel-pm
>

From elvio.barbalho em gmail.com  Tue Apr  7 06:59:30 2009
From: elvio.barbalho em gmail.com (Elvio Barbalho)
Date: Tue, 7 Apr 2009 10:59:30 -0300
Subject: [Cascavel-pm] =?iso-8859-1?q?Erro_na_instala=E7=E3o_do_m=F3dulo_D?=
	=?iso-8859-1?q?BD=3A=3AOracle?=
Message-ID: <8fb8eacb0904070659n52f20497j4284e5e6414c643f@mail.gmail.com>

Senhores fui instalar o módulo DBD::Oracle e apresentou o seguinte erro.
cpan> install DBD::Oracle
Database was generated on Tue, 07 Apr 2009 13:37:17 GMT
Running install for module 'DBD::Oracle'
Running make for P/PY/PYTHIAN/DBD-Oracle-1.22.tar.gz
Checksum for
C:\strawberry\cpan\sources\authors\id\P\PY\PYTHIAN\DBD-Oracle-1.22.
tar.gz ok
Scanning cache C:\strawberry\cpan\build for sizes
............................................................................DONE


  CPAN.pm: Going to build P/PY/PYTHIAN/DBD-Oracle-1.22.tar.gz

Using DBI 1.607 (for perl 5.008008 on MSWin32-x86-multi-thread) installed in
C:/
strawberry/perl/site/lib/auto/DBI/

Configuring DBD::Oracle for perl 5.008008 on MSWin32
(MSWin32-x86-multi-thread)

Remember to actually *READ* the README file! Especially if you have any
problems
.

Installing on a MSWin32, Ver#5.1
Using Oracle in D:/oracle/ora92
DEFINE _SQLPLUS_RELEASE = "902000100" (CHAR)
Oracle version 9.2.0.1 (9.2)
OCI directory not found, please install OCI in D:/oracle/ora92 at
Makefile.PL li
ne 231.
Warning: No success on command[C:\strawberry\perl\bin\perl.exe Makefile.PL]
  PYTHIAN/DBD-Oracle-1.22.tar.gz
  C:\strawberry\perl\bin\perl.exe Makefile.PL -- NOT OK
Running make test
  Make had some problems, won't test
Running make install
  Make had some problems, won't install
Failed during this command:
 PYTHIAN/DBD-Oracle-1.22.tar.gz               : writemakefile NO
'C:\strawberry\
perl\bin\perl.exe Makefile.PL' returned status 512


cpan>


Elvio Barbalho
Brasília, DF
Brasil

T + 55 61 21096814
C + 55 61 84223137
C + 55 61 81751213
elvio.barbalho em gmail.com
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: <http://mail.pm.org/pipermail/cascavel-pm/attachments/20090407/b5e73606/attachment.html>

From breno em rio.pm.org  Tue Apr  7 07:24:57 2009
From: breno em rio.pm.org (breno)
Date: Tue, 7 Apr 2009 11:24:57 -0300
Subject: [Cascavel-pm]
	=?iso-8859-1?q?Erro_na_instala=E7=E3o_do_m=F3dulo_D?=
	=?iso-8859-1?q?BD=3A=3AOracle?=
In-Reply-To: <8fb8eacb0904070659n52f20497j4284e5e6414c643f@mail.gmail.com>
References: <8fb8eacb0904070659n52f20497j4284e5e6414c643f@mail.gmail.com>
Message-ID: <bbea248f0904070724k2a5695d0nd881918805e21088@mail.gmail.com>

Elvio,

nunca instalei o DBD::Oracle no Windows, mas a mensagem de erro que vc
enviou contém duas dicas importantes:

A primeira:

> Remember to actually *READ* the README file! Especially if you have any
> problems

E a segunda:

> OCI directory not found, please install OCI in D:/oracle/ora92

Pode enviar uma nova mensagem elaborando em cima do que vc fez a respeito disso?

[]s

-b

2009/4/7 Elvio Barbalho <elvio.barbalho em gmail.com>:
> Senhores fui instalar o módulo DBD::Oracle e apresentou o seguinte erro.
> cpan> install DBD::Oracle
> Database was generated on Tue, 07 Apr 2009 13:37:17 GMT
> Running install for module 'DBD::Oracle'
> Running make for P/PY/PYTHIAN/DBD-Oracle-1.22.tar.gz
> Checksum for
> C:\strawberry\cpan\sources\authors\id\P\PY\PYTHIAN\DBD-Oracle-1.22.
> tar.gz ok
> Scanning cache C:\strawberry\cpan\build for sizes
> ............................................................................DONE
>
>   CPAN.pm: Going to build P/PY/PYTHIAN/DBD-Oracle-1.22.tar.gz
> Using DBI 1.607 (for perl 5.008008 on MSWin32-x86-multi-thread) installed in
> C:/
> strawberry/perl/site/lib/auto/DBI/
> Configuring DBD::Oracle for perl 5.008008 on MSWin32
> (MSWin32-x86-multi-thread)
> Remember to actually *READ* the README file! Especially if you have any
> problems
> .
> Installing on a MSWin32, Ver#5.1
> Using Oracle in D:/oracle/ora92
> DEFINE _SQLPLUS_RELEASE = "902000100" (CHAR)
> Oracle version 9.2.0.1 (9.2)
> OCI directory not found, please install OCI in D:/oracle/ora92 at
> Makefile.PL li
> ne 231.
> Warning: No success on command[C:\strawberry\perl\bin\perl.exe Makefile.PL]
>   PYTHIAN/DBD-Oracle-1.22.tar.gz
>   C:\strawberry\perl\bin\perl.exe Makefile.PL -- NOT OK
> Running make test
>   Make had some problems, won't test
> Running make install
>   Make had some problems, won't install
> Failed during this command:
>  PYTHIAN/DBD-Oracle-1.22.tar.gz               : writemakefile NO
> 'C:\strawberry\
> perl\bin\perl.exe Makefile.PL' returned status 512
>
> cpan>
>
> Elvio Barbalho
> Brasília, DF
> Brasil
>
> T + 55 61 21096814
> C + 55 61 84223137
> C + 55 61 81751213
> elvio.barbalho em gmail.com
>
>
>
> _______________________________________________
> Cascavel-pm mailing list
> Cascavel-pm em pm.org
> http://mail.pm.org/mailman/listinfo/cascavel-pm
>

From pedrocesar em tecdom.com.br  Wed Apr  8 17:46:32 2009
From: pedrocesar em tecdom.com.br (=?ISO-8859-1?Q?Pedro_C=E9sar?=)
Date: Wed, 8 Apr 2009 21:46:32 -0300
Subject: [Cascavel-pm] Script Perl para ler arquivo PHP
Message-ID: <36b34d110904081746h5315caaahbd690513f1e3ea88@mail.gmail.com>

Pessoal, to iniciando em Perl e to tentando criar um script que leia um
arquivo PHP que tenho no servidor, segue o código:
-----------------------------------------------------------------------------
#!/usr/local/bin/perl
use strict;

$file = 'http://www.site.com/classes/arquivo.php';
open(INFILE, $file);
@lines = <INFILE>;
#close(INFILE);

print(@lines);
-----------------------------------------------------------------------------

Porem o codigo nao exibe o conteudo do arquivo PHP, gostaria de contar com a
ajuda dos mais experientes.

Grato





-- 
Pedro César
Analista de Suporte
Microsoft Certified Professional - MCP
Blog: www.tecdom.com.br/blog
Fone: 82-9317-8802
msn: pedrocesar em tecdom.com.br
Registered Linux User #282860


"Autoridades são alguns,
e só por algun tempo.
Enquanto cidadãos somos todos nós,
e durante toda a vida".
Prof. Hugo de Britto Machado
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: <http://mail.pm.org/pipermail/cascavel-pm/attachments/20090408/b4ba96eb/attachment.html>

From otaviof em gmail.com  Wed Apr  8 18:04:16 2009
From: otaviof em gmail.com (=?ISO-8859-1?Q?Ot=E1vio_Fernandes?=)
Date: Wed, 8 Apr 2009 22:04:16 -0300
Subject: [Cascavel-pm] Script Perl para ler arquivo PHP
In-Reply-To: <36b34d110904081746h5315caaahbd690513f1e3ea88@mail.gmail.com>
References: <36b34d110904081746h5315caaahbd690513f1e3ea88@mail.gmail.com>
Message-ID: <8e3843570904081804i64de573bk887e014f3b3c566f@mail.gmail.com>

Olá Pedro,

Estou vendo, realmente, que você está começando com Perl. Bom,
primeira coisa, você está passando uma URI para acessar o arquivo...
acredito que você está rodando o script no mesmo servidor onde este
arquivo se encontra, então, você tem que passar path para acessar
diretamente, exemplo: "my $file = q{/var/tmp/arquivo.php};". O script
ficaria assim (com algumas melhorias):

#!/usr/bin/env perl

use strict;
use warnings;

my $file = q{/var/tmp/arquivo.php};

open( my $FH, q{<}, $file ) or die $!;
while( <$FH> ) {
    print;
}
close( $FH );

__END__

Caso você queria acessar este arquivo remoto, via protocolo HTTP, você
pode usar o módulo LWP (por exemplo).

Dúvidas? Pergunta ai.

um abraço,

-- 
Otávio Fernandes <otaviof at gmail.com>
http://otaviof.blogspot.com/

From pedrocesar em tecdom.com.br  Wed Apr  8 18:12:32 2009
From: pedrocesar em tecdom.com.br (=?ISO-8859-1?Q?Pedro_C=E9sar?=)
Date: Wed, 8 Apr 2009 22:12:32 -0300
Subject: [Cascavel-pm] Script Perl para ler arquivo PHP
In-Reply-To: <8e3843570904081804i64de573bk887e014f3b3c566f@mail.gmail.com>
References: <36b34d110904081746h5315caaahbd690513f1e3ea88@mail.gmail.com>
	<8e3843570904081804i64de573bk887e014f3b3c566f@mail.gmail.com>
Message-ID: <36b34d110904081812w47935b1by71b7892ce4426e5d@mail.gmail.com>

Puxa, e eu tava achando massa meu código, rsrsrs, é um de meus primeiros.

Vê só, já que você me deu a "brecha" vou pedir duas coisas, a primeira é
comentar o código que você me fez, basicamente não entendi por exemplo o
"my" na frente do $file e o q{<} no open.

A segunda é que gostaria que me mostrasse como usar o modulo sugerido, pois
o acesso é remoto mesmo, se puder fazer o código e comentar, me ajuda muito.

Muitíssimo obrigado desde ja.

2009/4/8 Otávio Fernandes <otaviof em gmail.com>

> Olá Pedro,
>
> Estou vendo, realmente, que você está começando com Perl. Bom,
> primeira coisa, você está passando uma URI para acessar o arquivo...
> acredito que você está rodando o script no mesmo servidor onde este
> arquivo se encontra, então, você tem que passar path para acessar
> diretamente, exemplo: "my $file = q{/var/tmp/arquivo.php};". O script
> ficaria assim (com algumas melhorias):
>
> #!/usr/bin/env perl
>
> use strict;
> use warnings;
>
> my $file = q{/var/tmp/arquivo.php};
>
> open( my $FH, q{<}, $file ) or die $!;
> while( <$FH> ) {
>    print;
> }
> close( $FH );
>
> __END__
>
> Caso você queria acessar este arquivo remoto, via protocolo HTTP, você
> pode usar o módulo LWP (por exemplo).
>
> Dúvidas? Pergunta ai.
>
> um abraço,
>
> --
> Otávio Fernandes <otaviof at gmail.com>
> http://otaviof.blogspot.com/
> _______________________________________________
> Cascavel-pm mailing list
> Cascavel-pm em pm.org
> http://mail.pm.org/mailman/listinfo/cascavel-pm
>



-- 
Pedro César
Analista de Suporte
Microsoft Certified Professional - MCP
Blog: www.tecdom.com.br/blog
Fone: 82-9317-8802
msn: pedrocesar em tecdom.com.br
Registered Linux User #282860


"Autoridades são alguns,
e só por algun tempo.
Enquanto cidadãos somos todos nós,
e durante toda a vida".
Prof. Hugo de Britto Machado
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: <http://mail.pm.org/pipermail/cascavel-pm/attachments/20090408/e5900d48/attachment.html>

From daniel.oliveira.mantovani em gmail.com  Wed Apr  8 19:14:10 2009
From: daniel.oliveira.mantovani em gmail.com (Daniel de Oliveira Mantovani)
Date: Wed, 8 Apr 2009 23:14:10 -0300
Subject: [Cascavel-pm] Script Perl para ler arquivo PHP
In-Reply-To: <36b34d110904081812w47935b1by71b7892ce4426e5d@mail.gmail.com>
References: <36b34d110904081746h5315caaahbd690513f1e3ea88@mail.gmail.com>
	<8e3843570904081804i64de573bk887e014f3b3c566f@mail.gmail.com>
	<36b34d110904081812w47935b1by71b7892ce4426e5d@mail.gmail.com>
Message-ID: <214823ca0904081914j643989d6ib84de04489cb8e17@mail.gmail.com>

Pedro que tal aprender lendo coisas divertidas ?
Perl tem uma ótima documentação auto explicativa, alguns desses documentos
estão traduzidos,
você pode encontra-los aqui:
http://www.perl.org.br

Comece lendo a introdução:
http://www.perl.org.br/Perldoc/V500807/Perlintro

Depois de ler, se tiver dúvidas pergunta!

Ótimos estudos!

[]'s

2009/4/8 Pedro César <pedrocesar em tecdom.com.br>

> Puxa, e eu tava achando massa meu código, rsrsrs, é um de meus primeiros.
>
> Vê só, já que você me deu a "brecha" vou pedir duas coisas, a primeira é
> comentar o código que você me fez, basicamente não entendi por exemplo o
> "my" na frente do $file e o q{<} no open.
>
> A segunda é que gostaria que me mostrasse como usar o modulo sugerido, pois
> o acesso é remoto mesmo, se puder fazer o código e comentar, me ajuda muito.
>
> Muitíssimo obrigado desde ja.
>
> 2009/4/8 Otávio Fernandes <otaviof em gmail.com>
>
> Olá Pedro,
>>
>> Estou vendo, realmente, que você está começando com Perl. Bom,
>> primeira coisa, você está passando uma URI para acessar o arquivo...
>> acredito que você está rodando o script no mesmo servidor onde este
>> arquivo se encontra, então, você tem que passar path para acessar
>> diretamente, exemplo: "my $file = q{/var/tmp/arquivo.php};". O script
>> ficaria assim (com algumas melhorias):
>>
>> #!/usr/bin/env perl
>>
>> use strict;
>> use warnings;
>>
>> my $file = q{/var/tmp/arquivo.php};
>>
>> open( my $FH, q{<}, $file ) or die $!;
>> while( <$FH> ) {
>>    print;
>> }
>> close( $FH );
>>
>> __END__
>>
>> Caso você queria acessar este arquivo remoto, via protocolo HTTP, você
>> pode usar o módulo LWP (por exemplo).
>>
>> Dúvidas? Pergunta ai.
>>
>> um abraço,
>>
>> --
>> Otávio Fernandes <otaviof at gmail.com>
>> http://otaviof.blogspot.com/
>> _______________________________________________
>> Cascavel-pm mailing list
>> Cascavel-pm em pm.org
>> http://mail.pm.org/mailman/listinfo/cascavel-pm
>>
>
>
>
> --
> Pedro César
> Analista de Suporte
> Microsoft Certified Professional - MCP
> Blog: www.tecdom.com.br/blog
> Fone: 82-9317-8802
> msn: pedrocesar em tecdom.com.br
> Registered Linux User #282860
>
>
> "Autoridades são alguns,
> e só por algun tempo.
> Enquanto cidadãos somos todos nós,
> e durante toda a vida".
> Prof. Hugo de Britto Machado
>
>
>
> _______________________________________________
> Cascavel-pm mailing list
> Cascavel-pm em pm.org
> http://mail.pm.org/mailman/listinfo/cascavel-pm
>



-- 
http://mantovanihouse.blogspot.com/
This is my poney:
-------(\_------------_/)-----------
-------)--(----------)--(-----------
------(----(---------)----)----------
-------)----(-------)----(-----------
-------(----(-------)----)-----------
--------\_-(\\.---.//)-_/------------
----------\)' -8--8- '(/--------------
-----------/------------\---------------
----------(--)--------(--)--------------
------------(_c__c_)----------------
----------------------------------------
perl -MLWP::Simple -le 'grep{ print $1 if /href="(http.+?)"/}split($/,get("
http://www.perl.org.br"))'
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: <http://mail.pm.org/pipermail/cascavel-pm/attachments/20090408/64303e2f/attachment.html>

From pedrocesar em tecdom.com.br  Thu Apr  9 02:36:26 2009
From: pedrocesar em tecdom.com.br (=?ISO-8859-1?Q?Pedro_C=E9sar?=)
Date: Thu, 9 Apr 2009 06:36:26 -0300
Subject: [Cascavel-pm] Script Perl para ler arquivo PHP
In-Reply-To: <214823ca0904081914j643989d6ib84de04489cb8e17@mail.gmail.com>
References: <36b34d110904081746h5315caaahbd690513f1e3ea88@mail.gmail.com>
	<8e3843570904081804i64de573bk887e014f3b3c566f@mail.gmail.com>
	<36b34d110904081812w47935b1by71b7892ce4426e5d@mail.gmail.com>
	<214823ca0904081914j643989d6ib84de04489cb8e17@mail.gmail.com>
Message-ID: <36b34d110904090236u4054daebo8fab87fb9ccab869@mail.gmail.com>

Valeu Daniel, obrigado.



2009/4/8 Daniel de Oliveira Mantovani <daniel.oliveira.mantovani em gmail.com>

> Pedro que tal aprender lendo coisas divertidas ?
> Perl tem uma ótima documentação auto explicativa, alguns desses documentos
> estão traduzidos,
> você pode encontra-los aqui:
> http://www.perl.org.br
>
> Comece lendo a introdução:
> http://www.perl.org.br/Perldoc/V500807/Perlintro
>
> Depois de ler, se tiver dúvidas pergunta!
>
> Ótimos estudos!
>
> []'s
>
> 2009/4/8 Pedro César <pedrocesar em tecdom.com.br>
>
> Puxa, e eu tava achando massa meu código, rsrsrs, é um de meus primeiros.
>>
>> Vê só, já que você me deu a "brecha" vou pedir duas coisas, a primeira é
>> comentar o código que você me fez, basicamente não entendi por exemplo o
>> "my" na frente do $file e o q{<} no open.
>>
>> A segunda é que gostaria que me mostrasse como usar o modulo sugerido,
>> pois o acesso é remoto mesmo, se puder fazer o código e comentar, me ajuda
>> muito.
>>
>> Muitíssimo obrigado desde ja.
>>
>> 2009/4/8 Otávio Fernandes <otaviof em gmail.com>
>>
>> Olá Pedro,
>>>
>>> Estou vendo, realmente, que você está começando com Perl. Bom,
>>> primeira coisa, você está passando uma URI para acessar o arquivo...
>>> acredito que você está rodando o script no mesmo servidor onde este
>>> arquivo se encontra, então, você tem que passar path para acessar
>>> diretamente, exemplo: "my $file = q{/var/tmp/arquivo.php};". O script
>>> ficaria assim (com algumas melhorias):
>>>
>>> #!/usr/bin/env perl
>>>
>>> use strict;
>>> use warnings;
>>>
>>> my $file = q{/var/tmp/arquivo.php};
>>>
>>> open( my $FH, q{<}, $file ) or die $!;
>>> while( <$FH> ) {
>>>    print;
>>> }
>>> close( $FH );
>>>
>>> __END__
>>>
>>> Caso você queria acessar este arquivo remoto, via protocolo HTTP, você
>>> pode usar o módulo LWP (por exemplo).
>>>
>>> Dúvidas? Pergunta ai.
>>>
>>> um abraço,
>>>
>>> --
>>> Otávio Fernandes <otaviof at gmail.com>
>>> http://otaviof.blogspot.com/
>>> _______________________________________________
>>> Cascavel-pm mailing list
>>> Cascavel-pm em pm.org
>>> http://mail.pm.org/mailman/listinfo/cascavel-pm
>>>
>>
>>
>>
>> --
>> Pedro César
>> Analista de Suporte
>> Microsoft Certified Professional - MCP
>> Blog: www.tecdom.com.br/blog
>> Fone: 82-9317-8802
>> msn: pedrocesar em tecdom.com.br
>> Registered Linux User #282860
>>
>>
>> "Autoridades são alguns,
>> e só por algun tempo.
>> Enquanto cidadãos somos todos nós,
>> e durante toda a vida".
>> Prof. Hugo de Britto Machado
>>
>>
>>
>> _______________________________________________
>> Cascavel-pm mailing list
>> Cascavel-pm em pm.org
>> http://mail.pm.org/mailman/listinfo/cascavel-pm
>>
>
>
>
> --
> http://mantovanihouse.blogspot.com/
> This is my poney:
> -------(\_------------_/)-----------
> -------)--(----------)--(-----------
> ------(----(---------)----)----------
> -------)----(-------)----(-----------
> -------(----(-------)----)-----------
> --------\_-(\\.---.//)-_/------------
> ----------\)' -8--8- '(/--------------
> -----------/------------\---------------
> ----------(--)--------(--)--------------
> ------------(_c__c_)----------------
> ----------------------------------------
> perl -MLWP::Simple -le 'grep{ print $1 if /href="(http.+?)"/}split($/,get("
> http://www.perl.org.br"))'
>
> _______________________________________________
> Cascavel-pm mailing list
> Cascavel-pm em pm.org
> http://mail.pm.org/mailman/listinfo/cascavel-pm
>



-- 
Pedro César
Analista de Suporte
Microsoft Certified Professional - MCP
Blog: www.tecdom.com.br/blog
Fone: 82-9317-8802
msn: pedrocesar em tecdom.com.br
Registered Linux User #282860


"Autoridades são alguns,
e só por algun tempo.
Enquanto cidadãos somos todos nós,
e durante toda a vida".
Prof. Hugo de Britto Machado
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: <http://mail.pm.org/pipermail/cascavel-pm/attachments/20090409/94479d1a/attachment-0001.html>

From breno em rio.pm.org  Thu Apr  9 09:52:47 2009
From: breno em rio.pm.org (breno)
Date: Thu, 9 Apr 2009 13:52:47 -0300
Subject: [Cascavel-pm] Script Perl para ler arquivo PHP
In-Reply-To: <36b34d110904081812w47935b1by71b7892ce4426e5d@mail.gmail.com>
References: <36b34d110904081746h5315caaahbd690513f1e3ea88@mail.gmail.com>
	<8e3843570904081804i64de573bk887e014f3b3c566f@mail.gmail.com>
	<36b34d110904081812w47935b1by71b7892ce4426e5d@mail.gmail.com>
Message-ID: <bbea248f0904090952q80da855paeda29f4116e4016@mail.gmail.com>

Oi Pedro, bem vindo!

Recomendo vivamente que vc siga a recomendação do Daniel e aprenda um
pouco mais sobre o básico da linguagem com a excelente documentação do
Perl.

Sobre suas dúvidas, bom, como vc deve ter percebido pela resposta do
Otávio, em Perl existe sempre mais de uma maneira de se fazer as
coisas! A grande questão é que, enquanto uma ou outra forma são
simples diferenças de "sotaque", outras são realmente mais
recomendadas, por diversos motivos.

A primeira coisa que vc deveria se acostumar a fazer é formular
perguntas que nos ajudem a te ajudar. Por exemplo, vc disse:

"to tentando criar um script que leia um arquivo PHP que tenho no servidor"

, e isso levou o Otávio a crer que o arquivo era local, e não remoto.
Depois, vc disse:

"Porem o codigo nao exibe o conteudo do arquivo PHP"

, nesse ponto o melhor a fazer é dizer algo como:  "estava esperando X
e aconteceu Y". Dizer "não funcionou" não nos diz muita coisa =)

Por exemplo, se você ativa o pragma strict ("use strict"), então todas
as suas variáveis precisam ser pré-declaradas! Como? Colocando "my" na
frente delas antes de usá-las pela primeira vez (e lá se foi uma das
suas dúvidas, espero! :)

Aí seguem duas dicas importantes:

1) Seus programas devem *sempre* começar com:
use strict;
use warnings;

exatamente como o Otávio respondeu. (alguns desenvolvedores gostam de
tirar o "warnings" qdo o sistema entra em produção, mas não faça isso
:-)

2) Pra vc que está começando, o Perl oferece um outro pragma muito
interessante, e recomendo que use:
use diagnostics;

coloque esse pragma logo abaixo do "use warnings", e o Perl te dará
dicas sobre o que ele acha que está acontecendo e como solucionar o
problema. Por exemplo, rodando o seu programa com esses três pragmas
ativos, obtemos a saida:

-----------------------------8<-----------------------------
Global symbol "$file" requires explicit package name at pedro.pl line 6.
Global symbol "$file" requires explicit package name at pedro.pl line 7.
Global symbol "@lines" requires explicit package name pedro ex.pl line 8.
Global symbol "@lines" requires explicit package name at pedro.pl line 11.
Execution of pedro.pl aborted due to compilation errors (#1)
    (F) You've said "use strict" or "use strict vars", which indicates
    that all variables must either be lexically scoped (using "my" or "state"),
    declared beforehand using "our", or explicitly qualified to say
    which package the global variable is in (using "::").

Uncaught exception from user code:
	Global symbol "$file" requires explicit package name at pedro.pl line 6.
Global symbol "$file" requires explicit package name at pedro.pl line 7.
Global symbol "@lines" requires explicit package name at pedro.pl line 8.
Global symbol "@lines" requires explicit package name at pedro.pl line 11.
Execution of pedro.pl aborted due to compilation errors.
 at ex.pl line 11
----------------------------->8-----------------------------

Viu a dica ali no meio? Pois é :-)


Outra coisa que você reparou foi que o Otávio usou o comando "open"
com 3 argumentos, em vez de dois. Essa é a forma recomendada de usar o
open, pois nela vc diz explicitamente qual o modo de abertura
(leitura, escrita, etc), e evita código potencialmente inseguro. Isso
porque, usando o open com dois argumentos apenas, você não consegue
forçar o modo desejado. Afinal, o open aceita nessa forma que você
especifique o modo DENTRO da variável, como $file =
'>meu_arquivo.txt'. Se alguém conseguir editar o conteúdo da variável,
pode causar muitos problemas!

Mas ele fez mais do que isso... se vc reparar, ele usou como handle de
arquivo uma variável, e não uma palavra em maiúsculas (bareword). Esse
é o procedimento recomendado também, especialmente pq barewords são
globais do pacote (em vez de léxicas, como as variáveis declaradas com
"my") e podem causar muitos problemas inesperados (especialmente se vc
acidentalmente usar a mesma bareword para abrir diferentes arquivos).

Para mais informações:  perldoc -f open

Outra coisa que ele fez foi usar operadores "quote-like" em vez dos
quotes em si. Em Perl, você pode especificar um bloco entre aspas
simples como q{}, entre aspas duplas como qq{}. Isso é particularmente
útil para evitar precisar escapar caracteres especiais. Por exemplo,
suponha que vc queira armazenar em $var o conteúdo:

     %_@'''0283',z''''''..'.'

Você teria que fazer algo como:

my $var = '%_@\'\'\'0283\',z\'\'\'\'\'\'..\'.\'';

o que é no mínimo confuso. Que tal assim:

my $var = q{%_@'''0283',z''''''..'.'};

Bem mais fácil, né? O perl faz o que vc quer e não deixa os "pliques"
internos interferirem no seu comando :-)

Usar q{} e qq{} é especialmente útil ao fazer one-liners, evitando que
os quotes sejam interpolados pela shell. Dentro do código, a menos que
você tenha um bom motivo como o acima, é só uma questão de preferência
mesmo - então fazer '>' ou q{>} não importa. Existe um outro operador,
o qw(), que separa elementos de listas, de modo que em vez de vc
escrever assim:

   my @herculoids = ( 'igoo', 'tundro', 'zok', 'gloop', 'gleep' );

pode escrever assim:

   my @herculoids = qw( igoo tundro zok gloop gleep );

que costuma ser muito mais fácil de escrever, e de ler.

Outra coisa que ele fez diferente foi ler o arquivo uma linha por vez,
que é mais eficiente do que ler tudo de uma vez pra dentro de um
array, e é o procedimento recomendado - especialmente para arquivos
grandes. Ele usou a variável de contexto $_, mas vamos deixar isso pra
depois que você tiver se acostumado com o Perl :-)

Finalmente, como nota pessoal, em Perl a maioria dos parêntesis são
opcionais e devem ser usados apenas para evitar ambiguidade. Assim, em
vez de fazer:

   open (my $FH, '<', $filename) or die $!;
   ...
   print ($linha);
   ...
   close($FH);

você pode fazer:

   open my $FH, '<', $filename or die $!;
   ...
   print $linha;
   ...
   close $FH;

No caso do open, muita gente (inclusive eu) gosta de colocar o "or" na
linha de baixo, com uma leve identação. Assim:

   open my $FH, '<', $filename
       or die "erro abrindo arquivo: $!\n";

Ou você pode usar o pragma "autodie", mas isso também é outra história :-)


Enfim, já me alonguei muito. A moral da história é:

Experimente as coisas do jeito que o Otávio disse  (otavio++)

Leia a documentação indicada pelo Daniel  (mantovani++)


E qq coisa, é só perguntar!

[]s

-b

2009/4/8 Pedro César <pedrocesar em tecdom.com.br>:
> Puxa, e eu tava achando massa meu código, rsrsrs, é um de meus primeiros.
>
> Vê só, já que você me deu a "brecha" vou pedir duas coisas, a primeira é
> comentar o código que você me fez, basicamente não entendi por exemplo o
> "my" na frente do $file e o q{<} no open.
>
> A segunda é que gostaria que me mostrasse como usar o modulo sugerido, pois
> o acesso é remoto mesmo, se puder fazer o código e comentar, me ajuda muito.
>
> Muitíssimo obrigado desde ja.
>
> 2009/4/8 Otávio Fernandes <otaviof em gmail.com>
>>
>> Olá Pedro,
>>
>> Estou vendo, realmente, que você está começando com Perl. Bom,
>> primeira coisa, você está passando uma URI para acessar o arquivo...
>> acredito que você está rodando o script no mesmo servidor onde este
>> arquivo se encontra, então, você tem que passar path para acessar
>> diretamente, exemplo: "my $file = q{/var/tmp/arquivo.php};". O script
>> ficaria assim (com algumas melhorias):
>>
>> #!/usr/bin/env perl
>>
>> use strict;
>> use warnings;
>>
>> my $file = q{/var/tmp/arquivo.php};
>>
>> open( my $FH, q{<}, $file ) or die $!;
>> while( <$FH> ) {
>>    print;
>> }
>> close( $FH );
>>
>> __END__
>>
>> Caso você queria acessar este arquivo remoto, via protocolo HTTP, você
>> pode usar o módulo LWP (por exemplo).
>>
>> Dúvidas? Pergunta ai.
>>
>> um abraço,
>>
>> --
>> Otávio Fernandes <otaviof at gmail.com>
>> http://otaviof.blogspot.com/
>> _______________________________________________
>> Cascavel-pm mailing list
>> Cascavel-pm em pm.org
>> http://mail.pm.org/mailman/listinfo/cascavel-pm
>
>
>
> --
> Pedro César
> Analista de Suporte
> Microsoft Certified Professional - MCP
> Blog: www.tecdom.com.br/blog
> Fone: 82-9317-8802
> msn: pedrocesar em tecdom.com.br
> Registered Linux User #282860
>
>
> "Autoridades são alguns,
> e só por algun tempo.
> Enquanto cidadãos somos todos nós,
> e durante toda a vida".
> Prof. Hugo de Britto Machado
>
>
>
> _______________________________________________
> Cascavel-pm mailing list
> Cascavel-pm em pm.org
> http://mail.pm.org/mailman/listinfo/cascavel-pm
>

From fernandocorrea em gmail.com  Thu Apr  9 10:23:18 2009
From: fernandocorrea em gmail.com (Fernando)
Date: Thu, 9 Apr 2009 14:23:18 -0300
Subject: [Cascavel-pm] Script Perl para ler arquivo PHP
In-Reply-To: <bbea248f0904090952q80da855paeda29f4116e4016@mail.gmail.com>
References: <36b34d110904081746h5315caaahbd690513f1e3ea88@mail.gmail.com>
	<8e3843570904081804i64de573bk887e014f3b3c566f@mail.gmail.com>
	<36b34d110904081812w47935b1by71b7892ce4426e5d@mail.gmail.com>
	<bbea248f0904090952q80da855paeda29f4116e4016@mail.gmail.com>
Message-ID: <89E01225-8958-4882-9161-D7B8208CCD70@gmail.com>

Muito bom email... Principalmente a parte dos herculoides!!!

Just another perl hacker

Em 09/04/2009, às 13:52, breno <breno em rio.pm.org> escreveu:
!#x000a
> Oi Pedro, bem vindo!
>
> Recomendo vivamente que vc siga a recomendação do Daniel e aprenda  
> um
> pouco mais sobre o básico da linguagem com a excelente  
> documentação do
> Perl.
>
> Sobre suas dúvidas, bom, como vc deve ter percebido pela resposta do
> Otávio, em Perl existe sempre mais de uma maneira de se fazer as
> coisas! A grande questão é que, enquanto uma ou outra forma são
> simples diferenças de "sotaque", outras são realmente mais
> recomendadas, por diversos motivos.
>
> A primeira coisa que vc deveria se acostumar a fazer é formular
> perguntas que nos ajudem a te ajudar. Por exemplo, vc disse:
>
> "to tentando criar um script que leia um arquivo PHP que tenho no  
> servidor"
>
> , e isso levou o Otávio a crer que o arquivo era local, e não remot 
> o.
> Depois, vc disse:
>
> "Porem o codigo nao exibe o conteudo do arquivo PHP"
>
> , nesse ponto o melhor a fazer é dizer algo como:  "estava esperando 
>  X
> e aconteceu Y". Dizer "não funcionou" não nos diz muita coisa =)
>
> Por exemplo, se você ativa o pragma strict ("use strict"), então tod 
> as
> as suas variáveis precisam ser pré-declaradas! Como? Colocando "my"  
> na
> frente delas antes de usá-las pela primeira vez (e lá se foi uma das
> suas dúvidas, espero! :)
>
> Aí seguem duas dicas importantes:
>
> 1) Seus programas devem *sempre* começar com:
> use strict;
> use warnings;
>
> exatamente como o Otávio respondeu. (alguns desenvolvedores gostam de
> tirar o "warnings" qdo o sistema entra em produção, mas não faça  
> isso
> :-)
>
> 2) Pra vc que está começando, o Perl oferece um outro pragma muito
> interessante, e recomendo que use:
> use diagnostics;
>
> coloque esse pragma logo abaixo do "use warnings", e o Perl te dará
> dicas sobre o que ele acha que está acontecendo e como solucionar o
> problema. Por exemplo, rodando o seu programa com esses três pragmas
> ativos, obtemos a saida:
>
> -----------------------------8<-----------------------------
> Global symbol "$file" requires explicit package name at pedro.pl  
> line 6.
> Global symbol "$file" requires explicit package name at pedro.pl  
> line 7.
> Global symbol "@lines" requires explicit package name pedro ex.pl  
> line 8.
> Global symbol "@lines" requires explicit package name at pedro.pl  
> line 11.
> Execution of pedro.pl aborted due to compilation errors (#1)
>    (F) You've said "use strict" or "use strict vars", which indicates
>    that all variables must either be lexically scoped (using "my" or  
> "state"),
>    declared beforehand using "our", or explicitly qualified to say
>    which package the global variable is in (using "::").
>
> Uncaught exception from user code:
>    Global symbol "$file" requires explicit package name at pedro.pl  
> line 6.
> Global symbol "$file" requires explicit package name at pedro.pl  
> line 7.
> Global symbol "@lines" requires explicit package name at pedro.pl  
> line 8.
> Global symbol "@lines" requires explicit package name at pedro.pl  
> line 11.
> Execution of pedro.pl aborted due to compilation errors.
> at ex.pl line 11
> ----------------------------->8-----------------------------
>
> Viu a dica ali no meio? Pois é :-)
>
>
> Outra coisa que você reparou foi que o Otávio usou o comando "open"
> com 3 argumentos, em vez de dois. Essa é a forma recomendada de usar 
>  o
> open, pois nela vc diz explicitamente qual o modo de abertura
> (leitura, escrita, etc), e evita código potencialmente inseguro. Isso
> porque, usando o open com dois argumentos apenas, você não consegue
> forçar o modo desejado. Afinal, o open aceita nessa forma que você
> especifique o modo DENTRO da variável, como $file =
> '>meu_arquivo.txt'. Se alguém conseguir editar o conteúdo da  
> variável,
> pode causar muitos problemas!
>
> Mas ele fez mais do que isso... se vc reparar, ele usou como handle de
> arquivo uma variável, e não uma palavra em maiúsculas (bareword).  
> Esse
> é o procedimento recomendado também, especialmente pq barewords são
> globais do pacote (em vez de léxicas, como as variáveis declaradas c 
> om
> "my") e podem causar muitos problemas inesperados (especialmente se vc
> acidentalmente usar a mesma bareword para abrir diferentes arquivos).
>
> Para mais informações:  perldoc -f open
>
> Outra coisa que ele fez foi usar operadores "quote-like" em vez dos
> quotes em si. Em Perl, você pode especificar um bloco entre aspas
> simples como q{}, entre aspas duplas como qq{}. Isso é particularmen 
> te
> útil para evitar precisar escapar caracteres especiais. Por exemplo,
> suponha que vc queira armazenar em $var o conteúdo:
>
>     %_@'''0283',z''''''..'.'
>
> Você teria que fazer algo como:
>
> my $var = '%_@\'\'\'0283\',z\'\'\'\'\'\'..\'.\'';
>
> o que é no mínimo confuso. Que tal assim:
>
> my $var = q{%_@'''0283',z''''''..'.'};
>
> Bem mais fácil, né? O perl faz o que vc quer e não deixa os "plique 
> s"
> internos interferirem no seu comando :-)
>
> Usar q{} e qq{} é especialmente útil ao fazer one-liners, evitando q 
> ue
> os quotes sejam interpolados pela shell. Dentro do código, a menos q 
> ue
> você tenha um bom motivo como o acima, é só uma questão de  
> preferência
> mesmo - então fazer '>' ou q{>} não importa. Existe um outro operado 
> r,
> o qw(), que separa elementos de listas, de modo que em vez de vc
> escrever assim:
>
>   my @herculoids = ( 'igoo', 'tundro', 'zok', 'gloop', 'gleep' );
>
> pode escrever assim:
>
>   my @herculoids = qw( igoo tundro zok gloop gleep );
>
> que costuma ser muito mais fácil de escrever, e de ler.
>
> Outra coisa que ele fez diferente foi ler o arquivo uma linha por vez,
> que é mais eficiente do que ler tudo de uma vez pra dentro de um
> array, e é o procedimento recomendado - especialmente para arquivos
> grandes. Ele usou a variável de contexto $_, mas vamos deixar isso p 
> ra
> depois que você tiver se acostumado com o Perl :-)
>
> Finalmente, como nota pessoal, em Perl a maioria dos parêntesis são
> opcionais e devem ser usados apenas para evitar ambiguidade. Assim, em
> vez de fazer:
>
>   open (my $FH, '<', $filename) or die $!;
>   ...
>   print ($linha);
>   ...
>   close($FH);
>
> você pode fazer:
>
>   open my $FH, '<', $filename or die $!;
>   ...
>   print $linha;
>   ...
>   close $FH;
>
> No caso do open, muita gente (inclusive eu) gosta de colocar o "or" na
> linha de baixo, com uma leve identação. Assim:
>
>   open my $FH, '<', $filename
>       or die "erro abrindo arquivo: $!\n";
>
> Ou você pode usar o pragma "autodie", mas isso também é outra  
> história :-)
>
>
> Enfim, já me alonguei muito. A moral da história é:
>
> Experimente as coisas do jeito que o Otávio disse  (otavio++)
>
> Leia a documentação indicada pelo Daniel  (mantovani++)
>
>
> E qq coisa, é só perguntar!
>
> []s
>
> -b
>
> 2009/4/8 Pedro César <pedrocesar em tecdom.com.br>:
>> Puxa, e eu tava achando massa meu código, rsrsrs, é um de meus pri 
>> meiros.
>>
>> Vê só, já que você me deu a "brecha" vou pedir duas coisas, a  
>> primeira é
>> comentar o código que você me fez, basicamente não entendi por exe 
>> mplo o
>> "my" na frente do $file e o q{<} no open.
>>
>> A segunda é que gostaria que me mostrasse como usar o modulo suger 
>> ido, pois
>> o acesso é remoto mesmo, se puder fazer o código e comentar, me aj 
>> uda muito.
>>
>> Muitíssimo obrigado desde ja.
>>
>> 2009/4/8 Otávio Fernandes <otaviof em gmail.com>
>>>
>>> Olá Pedro,
>>>
>>> Estou vendo, realmente, que você está começando com Perl. Bom,
>>> primeira coisa, você está passando uma URI para acessar o arquiv 
>>> o...
>>> acredito que você está rodando o script no mesmo servidor onde  
>>> este
>>> arquivo se encontra, então, você tem que passar path para acessar
>>> diretamente, exemplo: "my $file = q{/var/tmp/arquivo.php};". O  
>>> script
>>> ficaria assim (com algumas melhorias):
>>>
>>> #!/usr/bin/env perl
>>>
>>> use strict;
>>> use warnings;
>>>
>>> my $file = q{/var/tmp/arquivo.php};
>>>
>>> open( my $FH, q{<}, $file ) or die $!;
>>> while( <$FH> ) {
>>>    print;
>>> }
>>> close( $FH );
>>>
>>> __END__
>>>
>>> Caso você queria acessar este arquivo remoto, via protocolo HTTP 
>>> , você
>>> pode usar o módulo LWP (por exemplo).
>>>
>>> Dúvidas? Pergunta ai.
>>>
>>> um abraço,
>>>
>>> --
>>> Otávio Fernandes <otaviof at gmail.com>
>>> http://otaviof.blogspot.com/
>>> _______________________________________________
>>> Cascavel-pm mailing list
>>> Cascavel-pm em pm.org
>>> http://mail.pm.org/mailman/listinfo/cascavel-pm
>>
>>
>>
>> --
>> Pedro César
>> Analista de Suporte
>> Microsoft Certified Professional - MCP
>> Blog: www.tecdom.com.br/blog
>> Fone: 82-9317-8802
>> msn: pedrocesar em tecdom.com.br
>> Registered Linux User #282860
>>
>>
>> "Autoridades são alguns,
>> e só por algun tempo.
>> Enquanto cidadãos somos todos nós,
>> e durante toda a vida".
>> Prof. Hugo de Britto Machado
>>
>>
>>
>> _______________________________________________
>> 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 fernandolouis em terra.com.br  Thu Apr  9 10:45:07 2009
From: fernandolouis em terra.com.br (Fernando)
Date: Thu, 9 Apr 2009 14:45:07 -0300
Subject: [Cascavel-pm] Perl Testing
References: <604cec170904030545x6496c72h58dd028510d77889@mail.gmail.com>
Message-ID: <9921A86115B04996B8B8195FD50FC668@rede.local>

Não há nenhum livro sobre Perl em português no Google Books?

----- Original Message ----- 
From: "Nelson Ferraz" <nferraz em gmail.com>
To: "Cascavel Perl Mongers" <cascavel-pm em pm.org>; <saopaulo-pm em mail.pm.org>
Sent: Friday, April 03, 2009 9:45 AM
Subject: [Cascavel-pm] Perl Testing


Acabei de ler esta boa notícia na lista Lisbon.pm:

O livro Perl Testing agora está disponivel no Google Books:

http://books.google.com/books?id=o9xWJtvhVZ4C&dq=perl+testing&printsec=frontcover&source=bn&hl=en&ei=yUHTSeTEF6GsjAf50P3jBg&sa=X&oi=book_result&resnum=4&ct=result#PPP1,M1

É um livro muito bom, vale a pena ler!

[]s

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


From pedrocesar em tecdom.com.br  Thu Apr  9 11:32:30 2009
From: pedrocesar em tecdom.com.br (=?ISO-8859-1?Q?Pedro_C=E9sar?=)
Date: Thu, 9 Apr 2009 15:32:30 -0300
Subject: [Cascavel-pm] Script Perl para ler arquivo PHP
In-Reply-To: <bbea248f0904090952q80da855paeda29f4116e4016@mail.gmail.com>
References: <36b34d110904081746h5315caaahbd690513f1e3ea88@mail.gmail.com>
	<8e3843570904081804i64de573bk887e014f3b3c566f@mail.gmail.com>
	<36b34d110904081812w47935b1by71b7892ce4426e5d@mail.gmail.com>
	<bbea248f0904090952q80da855paeda29f4116e4016@mail.gmail.com>
Message-ID: <36b34d110904091132u4935c0f6g896e5d5f89fa02b8@mail.gmail.com>

Breno muito obrigado pela resposta, é que como já programo em PHP, achei que
podia pular alguns materiais basicos, ;-), Mas to vendo que Perl tem algumas
particularidades.

Só para deixar claro, não sou programador, sou administrador de redes, uso
liguagens só para criar scipts e alguns sistemas simples. Nada profissional.

Mas vou reler essa sua mensagem com calma, e vou reler o material
introdutorio.

Quanto mais a gente estuda mais a gente tem duvidas, entao me aguardem,
rsrsrs

Abraço


Em 09/04/09, breno <breno em rio.pm.org> escreveu:
>
> Oi Pedro, bem vindo!
>
> Recomendo vivamente que vc siga a recomendação do Daniel e aprenda um
> pouco mais sobre o básico da linguagem com a excelente documentação do
> Perl.
>
> Sobre suas dúvidas, bom, como vc deve ter percebido pela resposta do
> Otávio, em Perl existe sempre mais de uma maneira de se fazer as
> coisas! A grande questão é que, enquanto uma ou outra forma são
> simples diferenças de "sotaque", outras são realmente mais
> recomendadas, por diversos motivos.
>
> A primeira coisa que vc deveria se acostumar a fazer é formular
> perguntas que nos ajudem a te ajudar. Por exemplo, vc disse:
>
> "to tentando criar um script que leia um arquivo PHP que tenho no servidor"
>
> , e isso levou o Otávio a crer que o arquivo era local, e não remoto.
> Depois, vc disse:
>
> "Porem o codigo nao exibe o conteudo do arquivo PHP"
>
> , nesse ponto o melhor a fazer é dizer algo como:  "estava esperando X
> e aconteceu Y". Dizer "não funcionou" não nos diz muita coisa =)
>
> Por exemplo, se você ativa o pragma strict ("use strict"), então todas
> as suas variáveis precisam ser pré-declaradas! Como? Colocando "my" na
> frente delas antes de usá-las pela primeira vez (e lá se foi uma das
> suas dúvidas, espero! :)
>
> Aí seguem duas dicas importantes:
>
> 1) Seus programas devem *sempre* começar com:
> use strict;
> use warnings;
>
> exatamente como o Otávio respondeu. (alguns desenvolvedores gostam de
> tirar o "warnings" qdo o sistema entra em produção, mas não faça isso
> :-)
>
> 2) Pra vc que está começando, o Perl oferece um outro pragma muito
> interessante, e recomendo que use:
> use diagnostics;
>
> coloque esse pragma logo abaixo do "use warnings", e o Perl te dará
> dicas sobre o que ele acha que está acontecendo e como solucionar o
> problema. Por exemplo, rodando o seu programa com esses três pragmas
> ativos, obtemos a saida:
>
> -----------------------------8<-----------------------------
> Global symbol "$file" requires explicit package name at pedro.pl line 6.
> Global symbol "$file" requires explicit package name at pedro.pl line 7.
> Global symbol "@lines" requires explicit package name pedro ex.pl line 8.
> Global symbol "@lines" requires explicit package name at pedro.pl line 11.
> Execution of pedro.pl aborted due to compilation errors (#1)
>    (F) You've said "use strict" or "use strict vars", which indicates
>    that all variables must either be lexically scoped (using "my" or
> "state"),
>    declared beforehand using "our", or explicitly qualified to say
>    which package the global variable is in (using "::").
>
> Uncaught exception from user code:
>        Global symbol "$file" requires explicit package name at pedro.pl
> line 6.
> Global symbol "$file" requires explicit package name at pedro.pl line 7.
> Global symbol "@lines" requires explicit package name at pedro.pl line 8.
> Global symbol "@lines" requires explicit package name at pedro.pl line 11.
> Execution of pedro.pl aborted due to compilation errors.
> at ex.pl line 11
> ----------------------------->8-----------------------------
>
> Viu a dica ali no meio? Pois é :-)
>
>
> Outra coisa que você reparou foi que o Otávio usou o comando "open"
> com 3 argumentos, em vez de dois. Essa é a forma recomendada de usar o
> open, pois nela vc diz explicitamente qual o modo de abertura
> (leitura, escrita, etc), e evita código potencialmente inseguro. Isso
> porque, usando o open com dois argumentos apenas, você não consegue
> forçar o modo desejado. Afinal, o open aceita nessa forma que você
> especifique o modo DENTRO da variável, como $file =
> '>meu_arquivo.txt'. Se alguém conseguir editar o conteúdo da variável,
> pode causar muitos problemas!
>
> Mas ele fez mais do que isso... se vc reparar, ele usou como handle de
> arquivo uma variável, e não uma palavra em maiúsculas (bareword). Esse
> é o procedimento recomendado também, especialmente pq barewords são
> globais do pacote (em vez de léxicas, como as variáveis declaradas com
> "my") e podem causar muitos problemas inesperados (especialmente se vc
> acidentalmente usar a mesma bareword para abrir diferentes arquivos).
>
> Para mais informações:  perldoc -f open
>
> Outra coisa que ele fez foi usar operadores "quote-like" em vez dos
> quotes em si. Em Perl, você pode especificar um bloco entre aspas
> simples como q{}, entre aspas duplas como qq{}. Isso é particularmente
> útil para evitar precisar escapar caracteres especiais. Por exemplo,
> suponha que vc queira armazenar em $var o conteúdo:
>
>     %_@'''0283',z''''''..'.'
>
> Você teria que fazer algo como:
>
> my $var = '%_@\'\'\'0283\',z\'\'\'\'\'\'..\'.\'';
>
> o que é no mínimo confuso. Que tal assim:
>
> my $var = q{%_@'''0283',z''''''..'.'};
>
> Bem mais fácil, né? O perl faz o que vc quer e não deixa os "pliques"
> internos interferirem no seu comando :-)
>
> Usar q{} e qq{} é especialmente útil ao fazer one-liners, evitando que
> os quotes sejam interpolados pela shell. Dentro do código, a menos que
> você tenha um bom motivo como o acima, é só uma questão de preferência
> mesmo - então fazer '>' ou q{>} não importa. Existe um outro operador,
> o qw(), que separa elementos de listas, de modo que em vez de vc
> escrever assim:
>
>   my @herculoids = ( 'igoo', 'tundro', 'zok', 'gloop', 'gleep' );
>
> pode escrever assim:
>
>   my @herculoids = qw( igoo tundro zok gloop gleep );
>
> que costuma ser muito mais fácil de escrever, e de ler.
>
> Outra coisa que ele fez diferente foi ler o arquivo uma linha por vez,
> que é mais eficiente do que ler tudo de uma vez pra dentro de um
> array, e é o procedimento recomendado - especialmente para arquivos
> grandes. Ele usou a variável de contexto $_, mas vamos deixar isso pra
> depois que você tiver se acostumado com o Perl :-)
>
> Finalmente, como nota pessoal, em Perl a maioria dos parêntesis são
> opcionais e devem ser usados apenas para evitar ambiguidade. Assim, em
> vez de fazer:
>
>   open (my $FH, '<', $filename) or die $!;
>   ...
>   print ($linha);
>   ...
>   close($FH);
>
> você pode fazer:
>
>   open my $FH, '<', $filename or die $!;
>   ...
>   print $linha;
>   ...
>   close $FH;
>
> No caso do open, muita gente (inclusive eu) gosta de colocar o "or" na
> linha de baixo, com uma leve identação. Assim:
>
>   open my $FH, '<', $filename
>       or die "erro abrindo arquivo: $!\n";
>
> Ou você pode usar o pragma "autodie", mas isso também é outra história :-)
>
>
> Enfim, já me alonguei muito. A moral da história é:
>
> Experimente as coisas do jeito que o Otávio disse  (otavio++)
>
> Leia a documentação indicada pelo Daniel  (mantovani++)
>
>
> E qq coisa, é só perguntar!
>
> []s
>
> -b
>
> 2009/4/8 Pedro César <pedrocesar em tecdom.com.br>:
> > Puxa, e eu tava achando massa meu código, rsrsrs, é um de meus primeiros.
> >
> > Vê só, já que você me deu a "brecha" vou pedir duas coisas, a primeira é
> > comentar o código que você me fez, basicamente não entendi por exemplo o
> > "my" na frente do $file e o q{<} no open.
> >
> > A segunda é que gostaria que me mostrasse como usar o modulo sugerido,
> pois
> > o acesso é remoto mesmo, se puder fazer o código e comentar, me ajuda
> muito.
> >
> > Muitíssimo obrigado desde ja.
> >
> > 2009/4/8 Otávio Fernandes <otaviof em gmail.com>
> >>
> >> Olá Pedro,
> >>
> >> Estou vendo, realmente, que você está começando com Perl. Bom,
> >> primeira coisa, você está passando uma URI para acessar o arquivo...
> >> acredito que você está rodando o script no mesmo servidor onde este
> >> arquivo se encontra, então, você tem que passar path para acessar
> >> diretamente, exemplo: "my $file = q{/var/tmp/arquivo.php};". O script
> >> ficaria assim (com algumas melhorias):
> >>
> >> #!/usr/bin/env perl
> >>
> >> use strict;
> >> use warnings;
> >>
> >> my $file = q{/var/tmp/arquivo.php};
> >>
> >> open( my $FH, q{<}, $file ) or die $!;
> >> while( <$FH> ) {
> >>    print;
> >> }
> >> close( $FH );
> >>
> >> __END__
> >>
> >> Caso você queria acessar este arquivo remoto, via protocolo HTTP, você
> >> pode usar o módulo LWP (por exemplo).
> >>
> >> Dúvidas? Pergunta ai.
> >>
> >> um abraço,
> >>
> >> --
> >> Otávio Fernandes <otaviof at gmail.com>
> >> http://otaviof.blogspot.com/
> >> _______________________________________________
> >> Cascavel-pm mailing list
> >> Cascavel-pm em pm.org
> >> http://mail.pm.org/mailman/listinfo/cascavel-pm
> >
> >
> >
> > --
> > Pedro César
> > Analista de Suporte
> > Microsoft Certified Professional - MCP
> > Blog: www.tecdom.com.br/blog
> > Fone: 82-9317-8802
> > msn: pedrocesar em tecdom.com.br
> > Registered Linux User #282860
> >
> >
> > "Autoridades são alguns,
> > e só por algun tempo.
> > Enquanto cidadãos somos todos nós,
> > e durante toda a vida".
> > Prof. Hugo de Britto Machado
> >
> >
> >
> > _______________________________________________
> > 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
>



-- 
Pedro César
Analista de Suporte
Microsoft Certified Professional - MCP
Blog: www.tecdom.com.br/blog
Fone: 82-9317-8802
msn: pedrocesar em tecdom.com.br
Registered Linux User #282860


"Autoridades são alguns,
e só por algun tempo.
Enquanto cidadãos somos todos nós,
e durante toda a vida".
Prof. Hugo de Britto Machado
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: <http://mail.pm.org/pipermail/cascavel-pm/attachments/20090409/561f4800/attachment-0001.html>

From pedrocesar em tecdom.com.br  Thu Apr  9 12:08:07 2009
From: pedrocesar em tecdom.com.br (=?ISO-8859-1?Q?Pedro_C=E9sar?=)
Date: Thu, 9 Apr 2009 16:08:07 -0300
Subject: [Cascavel-pm] =?iso-8859-1?q?=C9_poss=EDvel_saber_se_um_arquivo_e?=
	=?iso-8859-1?q?st=E1_sendo_executado_no_servidor=3F?=
Message-ID: <36b34d110904091208t5cf74697u9610955427969f5b@mail.gmail.com>

Pessoal, como ja falei em outro email, sou administrador de rede e pretendo
aprender perl para criar scripts e assim facilitar meu trabalho a
automatizar algumas rotinas.

Tenho a seguinte situacao: um cliente que roda um sistema em clipper, que ja
demonstrou ser um bom sistema (aos olhos dele) porem como agora os micros
estao em rede, se alguem ja estiver usando e outra estacao abrir, geralmente
corrompe alguma coisa, entao eu gostaria de fazer um script que fosse
chamado sempre que alguem fosse rodar esse programa.

O script deveria descobrir se esse arquivo esta sendo usado por alguem na
rede. Tipo o comando openfiles do windows, que informa se tem alguem na rede
usando determinado alrquivo. Com isso eu impediria que outra instancia do
arquivo fosse aberta.

Ao detectar que o executavel ja esta sendo usado poderia emitir um alerta,
ou redirecionar a linha de comando, enfim, gostaria de saber se perl tem
essa capacidade (descobrir que o arquivo está sendo usado).

 Não precisam se dar ao trabalho de dizer como nem fazer o código para mim,
so quero saber se é possível e que se possivel me dêem uma orientacao minima
para eu conseguir encontrar a solucao..

Grato

-- 
Pedro César
Analista de Suporte
Microsoft Certified Professional - MCP
Blog: www.tecdom.com.br/blog
Fone: 82-9317-8802
msn: pedrocesar em tecdom.com.br
Registered Linux User #282860


"Autoridades são alguns,
e só por algun tempo.
Enquanto cidadãos somos todos nós,
e durante toda a vida".
Prof. Hugo de Britto Machado
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: <http://mail.pm.org/pipermail/cascavel-pm/attachments/20090409/ed357d46/attachment.html>

From daniel.oliveira.mantovani em gmail.com  Thu Apr  9 12:17:44 2009
From: daniel.oliveira.mantovani em gmail.com (Daniel de Oliveira Mantovani)
Date: Thu, 9 Apr 2009 16:17:44 -0300
Subject: [Cascavel-pm]
	=?iso-8859-1?q?=C9_poss=EDvel_saber_se_um_arquivo_e?=
	=?iso-8859-1?q?st=E1_sendo_executado_no_servidor=3F?=
In-Reply-To: <36b34d110904091208t5cf74697u9610955427969f5b@mail.gmail.com>
References: <36b34d110904091208t5cf74697u9610955427969f5b@mail.gmail.com>
Message-ID: <214823ca0904091217pb3ab925jb4ec6c5e0a90055c@mail.gmail.com>

Sim, Perl tem essa capacidade, você leu o que o Breno disse na thread
anterior ?

Se você especificar os detalhes vai ser mais fácil te ajudar, como por
exemplo qual o S.O ?

2009/4/9 Pedro César <pedrocesar em tecdom.com.br>

> Pessoal, como ja falei em outro email, sou administrador de rede e pretendo
> aprender perl para criar scripts e assim facilitar meu trabalho a
> automatizar algumas rotinas.
>
> Tenho a seguinte situacao: um cliente que roda um sistema em clipper, que
> ja demonstrou ser um bom sistema (aos olhos dele) porem como agora os micros
> estao em rede, se alguem ja estiver usando e outra estacao abrir, geralmente
> corrompe alguma coisa, entao eu gostaria de fazer um script que fosse
> chamado sempre que alguem fosse rodar esse programa.
>
> O script deveria descobrir se esse arquivo esta sendo usado por alguem na
> rede. Tipo o comando openfiles do windows, que informa se tem alguem na rede
> usando determinado alrquivo. Com isso eu impediria que outra instancia do
> arquivo fosse aberta.
>
> Ao detectar que o executavel ja esta sendo usado poderia emitir um alerta,
> ou redirecionar a linha de comando, enfim, gostaria de saber se perl tem
> essa capacidade (descobrir que o arquivo está sendo usado).
>
>  Não precisam se dar ao trabalho de dizer como nem fazer o código para
> mim, so quero saber se é possível e que se possivel me dêem uma orientacao
> minima para eu conseguir encontrar a solucao..
>
> Grato
>
> --
> Pedro César
> Analista de Suporte
> Microsoft Certified Professional - MCP
> Blog: www.tecdom.com.br/blog
> Fone: 82-9317-8802
> msn: pedrocesar em tecdom.com.br
> Registered Linux User #282860
>
>
> "Autoridades são alguns,
> e só por algun tempo.
> Enquanto cidadãos somos todos nós,
> e durante toda a vida".
> Prof. Hugo de Britto Machado
>
>
>
> _______________________________________________
> Cascavel-pm mailing list
> Cascavel-pm em pm.org
> http://mail.pm.org/mailman/listinfo/cascavel-pm
>



-- 
http://mantovanihouse.blogspot.com/
This is my poney:
-------(\_------------_/)-----------
-------)--(----------)--(-----------
------(----(---------)----)----------
-------)----(-------)----(-----------
-------(----(-------)----)-----------
--------\_-(\\.---.//)-_/------------
----------\)' -8--8- '(/--------------
-----------/------------\---------------
----------(--)--------(--)--------------
------------(_c__c_)----------------
----------------------------------------
perl -MLWP::Simple -le 'grep{ print $1 if /href="(http.+?)"/}split($/,get("
http://www.perl.org.br"))'
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: <http://mail.pm.org/pipermail/cascavel-pm/attachments/20090409/465f2210/attachment.html>

From otaviof em gmail.com  Thu Apr  9 13:34:54 2009
From: otaviof em gmail.com (=?ISO-8859-1?Q?Ot=E1vio_Fernandes?=)
Date: Thu, 9 Apr 2009 17:34:54 -0300
Subject: [Cascavel-pm]
	=?iso-8859-1?q?=C9_poss=EDvel_saber_se_um_arquivo_e?=
	=?iso-8859-1?q?st=E1_sendo_executado_no_servidor=3F?=
In-Reply-To: <36b34d110904091208t5cf74697u9610955427969f5b@mail.gmail.com>
References: <36b34d110904091208t5cf74697u9610955427969f5b@mail.gmail.com>
Message-ID: <8e3843570904091334y2bcedfc8l3630701c8bf33bd1@mail.gmail.com>

Fala Pedro,

Pelo jeito você está fazendo as coisas sobre Linux. Acredito que o
comando "lsof" ($ man lsof) resolve o seu problema.

Atenciosamente,

-- 
Otávio Fernandes <otaviof at gmail.com>
http://otaviof.blogspot.com/

From pedrocesar em tecdom.com.br  Thu Apr  9 19:09:36 2009
From: pedrocesar em tecdom.com.br (=?ISO-8859-1?Q?Pedro_C=E9sar?=)
Date: Thu, 9 Apr 2009 23:09:36 -0300
Subject: [Cascavel-pm]
	=?iso-8859-1?q?=C9_poss=EDvel_saber_se_um_arquivo_e?=
	=?iso-8859-1?q?st=E1_sendo_executado_no_servidor=3F?=
In-Reply-To: <8e3843570904091334y2bcedfc8l3630701c8bf33bd1@mail.gmail.com>
References: <36b34d110904091208t5cf74697u9610955427969f5b@mail.gmail.com>
	<8e3843570904091334y2bcedfc8l3630701c8bf33bd1@mail.gmail.com>
Message-ID: <36b34d110904091909y955e353g411b9320232d5471@mail.gmail.com>

Opa Otávio,

Acho que falhei mais uma vez na forma de perguntar, :D, uso linux em meu
notebook, mas nesse caso, especificamente é para uma rede windows server
2003 com AD, o executavel que quero verificar está no servidor, mas pode ser
acessado por qualquer estacao.

Grato pela atenção

2009/4/9 Otávio Fernandes <otaviof em gmail.com>

> Fala Pedro,
>
> Pelo jeito você está fazendo as coisas sobre Linux. Acredito que o
> comando "lsof" ($ man lsof) resolve o seu problema.
>
> Atenciosamente,
>
> --
> Otávio Fernandes <otaviof at gmail.com>
> http://otaviof.blogspot.com/
> _______________________________________________
> Cascavel-pm mailing list
> Cascavel-pm em pm.org
> http://mail.pm.org/mailman/listinfo/cascavel-pm
>



-- 
Pedro César
Analista de Suporte
Microsoft Certified Professional - MCP
Blog: www.tecdom.com.br/blog
Fone: 82-9317-8802
msn: pedrocesar em tecdom.com.br
Registered Linux User #282860


"Autoridades são alguns,
e só por algun tempo.
Enquanto cidadãos somos todos nós,
e durante toda a vida".
Prof. Hugo de Britto Machado
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: <http://mail.pm.org/pipermail/cascavel-pm/attachments/20090409/42062792/attachment.html>

From nferraz em gmail.com  Fri Apr 10 00:38:11 2009
From: nferraz em gmail.com (Nelson Ferraz)
Date: Fri, 10 Apr 2009 09:38:11 +0200
Subject: [Cascavel-pm] Perl Testing
In-Reply-To: <9921A86115B04996B8B8195FD50FC668@rede.local>
References: <604cec170904030545x6496c72h58dd028510d77889@mail.gmail.com>
	<9921A86115B04996B8B8195FD50FC668@rede.local>
Message-ID: <604cec170904100038q577ba683r4328fd86fa2b2bd8@mail.gmail.com>

2009/4/9 Fernando <fernandolouis em terra.com.br>:
> Não há nenhum livro sobre Perl em português no Google Books?

Só procurando pra saber...

De qualquer forma, o Solli está liderando um projeto de tradução de um
livro. Quem sabe, se este projeto der certo, não possamos tentar
traduzir mais outro.

Aliás, como anda a tradução, Solli?

[]s

Nelson

From nferraz em gmail.com  Fri Apr 10 01:00:45 2009
From: nferraz em gmail.com (Nelson Ferraz)
Date: Fri, 10 Apr 2009 10:00:45 +0200
Subject: [Cascavel-pm]
	=?iso-8859-1?q?=C9_poss=EDvel_saber_se_um_arquivo_e?=
	=?iso-8859-1?q?st=E1_sendo_executado_no_servidor=3F?=
In-Reply-To: <36b34d110904091909y955e353g411b9320232d5471@mail.gmail.com>
References: <36b34d110904091208t5cf74697u9610955427969f5b@mail.gmail.com>
	<8e3843570904091334y2bcedfc8l3630701c8bf33bd1@mail.gmail.com>
	<36b34d110904091909y955e353g411b9320232d5471@mail.gmail.com>
Message-ID: <604cec170904100100w3f63175by9c47664ffcca952d@mail.gmail.com>

> Acho que falhei mais uma vez na forma de perguntar, :D, uso linux em meu
> notebook, mas nesse caso, especificamente é para uma rede windows server
> 2003 com AD, o executavel que quero verificar está no servidor, mas pode ser
> acessado por qualquer estacao.

É possível modificar o sistema original, em clipper? Se for, basta que
o sistema escreva um arquivo numa localização pré-determinada, para
sinalizar que está sendo executado, e remova-o antes de terminar. Se o
arquivo já existir, o programa deve se recusar a iniciar.

Idealmente este arquivo deve conter o número de identificação do
processo (pid), de tal forma que seja possível verificar se o processo
está mesmo rodando. Se não estiver, o arquivo pode ser sobreescrito.

From nferraz em gmail.com  Fri Apr 10 02:04:39 2009
From: nferraz em gmail.com (Nelson Ferraz)
Date: Fri, 10 Apr 2009 11:04:39 +0200
Subject: [Cascavel-pm] Script Perl para ler arquivo PHP
In-Reply-To: <bbea248f0904090952q80da855paeda29f4116e4016@mail.gmail.com>
References: <36b34d110904081746h5315caaahbd690513f1e3ea88@mail.gmail.com>
	<8e3843570904081804i64de573bk887e014f3b3c566f@mail.gmail.com>
	<36b34d110904081812w47935b1by71b7892ce4426e5d@mail.gmail.com>
	<bbea248f0904090952q80da855paeda29f4116e4016@mail.gmail.com>
Message-ID: <604cec170904100204l2495f224g484bd2a8cc92a75a@mail.gmail.com>

Breno,

Muito boa a sua resposta! Que tal transformá-la em um artigo para o wiki?

Pedro, você também pode ajudar... afinal, ninguém melhor do que alguém
que está comecando para saber quais dicas são mais interessantes!

[]s

Nelson

From pedrocesar em tecdom.com.br  Fri Apr 10 04:25:07 2009
From: pedrocesar em tecdom.com.br (=?ISO-8859-1?Q?Pedro_C=E9sar?=)
Date: Fri, 10 Apr 2009 08:25:07 -0300
Subject: [Cascavel-pm] Script Perl para ler arquivo PHP
In-Reply-To: <604cec170904100204l2495f224g484bd2a8cc92a75a@mail.gmail.com>
References: <36b34d110904081746h5315caaahbd690513f1e3ea88@mail.gmail.com>
	<8e3843570904081804i64de573bk887e014f3b3c566f@mail.gmail.com>
	<36b34d110904081812w47935b1by71b7892ce4426e5d@mail.gmail.com>
	<bbea248f0904090952q80da855paeda29f4116e4016@mail.gmail.com>
	<604cec170904100204l2495f224g484bd2a8cc92a75a@mail.gmail.com>
Message-ID: <36b34d110904100425m4f6f4857ldd52721f55087ac1@mail.gmail.com>

Concordo plenamente com o Nelson, realmente a resposta foi muito ampla e
esclarecedora, merece virar um post. E já peço permissão para publicá-la em
meu blog: www.tecdom.com.br/blog , com as devidas referêcncias à fonte,
claro.



2009/4/10 Nelson Ferraz <nferraz em gmail.com>

> Breno,
>
> Muito boa a sua resposta! Que tal transformá-la em um artigo para o wiki?
>
> Pedro, você também pode ajudar... afinal, ninguém melhor do que alguém
> que está comecando para saber quais dicas são mais interessantes!
>
> []s
>
> Nelson
> _______________________________________________
> Cascavel-pm mailing list
> Cascavel-pm em pm.org
> http://mail.pm.org/mailman/listinfo/cascavel-pm
>



-- 
Pedro César
Analista de Suporte
Microsoft Certified Professional - MCP
Blog: www.tecdom.com.br/blog
Fone: 82-9317-8802
msn: pedrocesar em tecdom.com.br
Registered Linux User #282860


"Autoridades são alguns,
e só por algun tempo.
Enquanto cidadãos somos todos nós,
e durante toda a vida".
Prof. Hugo de Britto Machado
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: <http://mail.pm.org/pipermail/cascavel-pm/attachments/20090410/95b91838/attachment.html>

From pedrocesar em tecdom.com.br  Fri Apr 10 04:27:44 2009
From: pedrocesar em tecdom.com.br (=?ISO-8859-1?Q?Pedro_C=E9sar?=)
Date: Fri, 10 Apr 2009 08:27:44 -0300
Subject: [Cascavel-pm]
	=?iso-8859-1?q?=C9_poss=EDvel_saber_se_um_arquivo_e?=
	=?iso-8859-1?q?st=E1_sendo_executado_no_servidor=3F?=
In-Reply-To: <604cec170904100100w3f63175by9c47664ffcca952d@mail.gmail.com>
References: <36b34d110904091208t5cf74697u9610955427969f5b@mail.gmail.com>
	<8e3843570904091334y2bcedfc8l3630701c8bf33bd1@mail.gmail.com>
	<36b34d110904091909y955e353g411b9320232d5471@mail.gmail.com>
	<604cec170904100100w3f63175by9c47664ffcca952d@mail.gmail.com>
Message-ID: <36b34d110904100427q16550674ma530fe31f14aff21@mail.gmail.com>

Infelizmente não é possível modificá-lo. Queria ver se há alguma forma de
detectar que ele está sendo executado. Creio que o windows guarda essa
informação, tendo em vista que ele fornece essa informação através do
comando openfiles.

Obrigado pela atenção

2009/4/10 Nelson Ferraz <nferraz em gmail.com>

> > Acho que falhei mais uma vez na forma de perguntar, :D, uso linux em meu
> > notebook, mas nesse caso, especificamente é para uma rede windows server
> > 2003 com AD, o executavel que quero verificar está no servidor, mas pode
> ser
> > acessado por qualquer estacao.
>
> É possível modificar o sistema original, em clipper? Se for, basta que
> o sistema escreva um arquivo numa localização pré-determinada, para
> sinalizar que está sendo executado, e remova-o antes de terminar. Se o
> arquivo já existir, o programa deve se recusar a iniciar.
>
> Idealmente este arquivo deve conter o número de identificação do
> processo (pid), de tal forma que seja possível verificar se o processo
> está mesmo rodando. Se não estiver, o arquivo pode ser sobreescrito.
> _______________________________________________
> Cascavel-pm mailing list
> Cascavel-pm em pm.org
> http://mail.pm.org/mailman/listinfo/cascavel-pm
>



-- 
Pedro César
Analista de Suporte
Microsoft Certified Professional - MCP
Blog: www.tecdom.com.br/blog
Fone: 82-9317-8802
msn: pedrocesar em tecdom.com.br
Registered Linux User #282860


"Autoridades são alguns,
e só por algun tempo.
Enquanto cidadãos somos todos nós,
e durante toda a vida".
Prof. Hugo de Britto Machado
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: <http://mail.pm.org/pipermail/cascavel-pm/attachments/20090410/4409afc7/attachment.html>

From agnaldo em starweb-software.com.br  Fri Apr 10 04:52:15 2009
From: agnaldo em starweb-software.com.br (Agnaldo Macedo)
Date: Fri, 10 Apr 2009 08:52:15 -0300
Subject: [Cascavel-pm]
	=?iso-8859-1?q?=C9_poss=EDvel_saber_se_um_arquivo_e?=
	=?iso-8859-1?q?st=E1_sendo_executado_no_servidor=3F?=
References: <36b34d110904091208t5cf74697u9610955427969f5b@mail.gmail.com><8e3843570904091334y2bcedfc8l3630701c8bf33bd1@mail.gmail.com><36b34d110904091909y955e353g411b9320232d5471@mail.gmail.com><604cec170904100100w3f63175by9c47664ffcca952d@mail.gmail.com>
	<36b34d110904100427q16550674ma530fe31f14aff21@mail.gmail.com>
Message-ID: <81511AFF79C646159FA1555C11C74A2F@swmobile>


Que tipo de informações ou, melhor ainda, para que é usado esse arquivo?



  ----- Original Message ----- 
  From: Pedro César 
  To: Cascavel Perl Mongers 
  Sent: Friday, April 10, 2009 8:27 AM
  Subject: Re: [Cascavel-pm]É possível saber se um arquivo está sendo executado no servidor?


  Infelizmente não é possível modificá-lo. Queria ver se há alguma forma de detectar que ele está sendo executado. Creio que o windows guarda essa informação, tendo em vista que ele fornece essa informação através do comando openfiles.

  Obrigado pela atenção


  2009/4/10 Nelson Ferraz <nferraz em gmail.com>

    > Acho que falhei mais uma vez na forma de perguntar, :D, uso linux em meu
    > notebook, mas nesse caso, especificamente é para uma rede windows server
    > 2003 com AD, o executavel que quero verificar está no servidor, mas pode ser
    > acessado por qualquer estacao.


    É possível modificar o sistema original, em clipper? Se for, basta que
    o sistema escreva um arquivo numa localização pré-determinada, para
    sinalizar que está sendo executado, e remova-o antes de terminar. Se o
    arquivo já existir, o programa deve se recusar a iniciar.

    Idealmente este arquivo deve conter o número de identificação do
    processo (pid), de tal forma que seja possível verificar se o processo
    está mesmo rodando. Se não estiver, o arquivo pode ser sobreescrito.

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




  -- 
  Pedro César
  Analista de Suporte
  Microsoft Certified Professional - MCP
  Blog: www.tecdom.com.br/blog
  Fone: 82-9317-8802
  msn: pedrocesar em tecdom.com.br 
  Registered Linux User #282860


  "Autoridades são alguns, 
  e só por algun tempo.
  Enquanto cidadãos somos todos nós,
  e durante toda a vida".
  Prof. Hugo de Britto Machado





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


  _______________________________________________
  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/20090410/be78a247/attachment.html>

From nferraz em gmail.com  Fri Apr 10 05:22:27 2009
From: nferraz em gmail.com (Nelson Ferraz)
Date: Fri, 10 Apr 2009 14:22:27 +0200
Subject: [Cascavel-pm] Script Perl para ler arquivo PHP
In-Reply-To: <36b34d110904100425m4f6f4857ldd52721f55087ac1@mail.gmail.com>
References: <36b34d110904081746h5315caaahbd690513f1e3ea88@mail.gmail.com>
	<8e3843570904081804i64de573bk887e014f3b3c566f@mail.gmail.com>
	<36b34d110904081812w47935b1by71b7892ce4426e5d@mail.gmail.com>
	<bbea248f0904090952q80da855paeda29f4116e4016@mail.gmail.com>
	<604cec170904100204l2495f224g484bd2a8cc92a75a@mail.gmail.com>
	<36b34d110904100425m4f6f4857ldd52721f55087ac1@mail.gmail.com>
Message-ID: <604cec170904100522n54ca8e9fgc173f2d514f718cd@mail.gmail.com>

2009/4/10 Pedro César <pedrocesar em tecdom.com.br>:
> Concordo plenamente com o Nelson, realmente a resposta foi muito ampla e
> esclarecedora, merece virar um post. E já peço permissão para publicá-la em
> meu blog: www.tecdom.com.br/blog , com as devidas referêcncias à fonte,
> claro.

Que tal tornar-se um contribuidor de nosso wiki?

www.perl.org.br

;-)

From pedrocesar em tecdom.com.br  Fri Apr 10 05:29:27 2009
From: pedrocesar em tecdom.com.br (=?ISO-8859-1?Q?Pedro_C=E9sar?=)
Date: Fri, 10 Apr 2009 09:29:27 -0300
Subject: [Cascavel-pm] Script Perl para ler arquivo PHP
In-Reply-To: <604cec170904100522n54ca8e9fgc173f2d514f718cd@mail.gmail.com>
References: <36b34d110904081746h5315caaahbd690513f1e3ea88@mail.gmail.com>
	<8e3843570904081804i64de573bk887e014f3b3c566f@mail.gmail.com>
	<36b34d110904081812w47935b1by71b7892ce4426e5d@mail.gmail.com>
	<bbea248f0904090952q80da855paeda29f4116e4016@mail.gmail.com>
	<604cec170904100204l2495f224g484bd2a8cc92a75a@mail.gmail.com>
	<36b34d110904100425m4f6f4857ldd52721f55087ac1@mail.gmail.com>
	<604cec170904100522n54ca8e9fgc173f2d514f718cd@mail.gmail.com>
Message-ID: <36b34d110904100529w66c1dc66v3717df00433f593b@mail.gmail.com>

Gostaria muito, mas sinceramente não vejo como, tendo em vista ser um wiki
de perl, matéria cujo meu entendimento está apenas no início.

Como eu poderia contribuir????

2009/4/10 Nelson Ferraz <nferraz em gmail.com>

> 2009/4/10 Pedro César <pedrocesar em tecdom.com.br>:
> > Concordo plenamente com o Nelson, realmente a resposta foi muito ampla e
> > esclarecedora, merece virar um post. E já peço permissão para publicá-la
> em
> > meu blog: www.tecdom.com.br/blog , com as devidas referêcncias à fonte,
> > claro.
>
> Que tal tornar-se um contribuidor de nosso wiki?
>
> www.perl.org.br
>
> ;-)
> _______________________________________________
> Cascavel-pm mailing list
> Cascavel-pm em pm.org
> http://mail.pm.org/mailman/listinfo/cascavel-pm
>



-- 
Pedro César
Analista de Suporte
Microsoft Certified Professional - MCP
Blog: www.tecdom.com.br/blog
Fone: 82-9317-8802
msn: pedrocesar em tecdom.com.br
Registered Linux User #282860


"Autoridades são alguns,
e só por algun tempo.
Enquanto cidadãos somos todos nós,
e durante toda a vida".
Prof. Hugo de Britto Machado
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: <http://mail.pm.org/pipermail/cascavel-pm/attachments/20090410/1c999d11/attachment-0001.html>

From pedrocesar em tecdom.com.br  Fri Apr 10 05:37:27 2009
From: pedrocesar em tecdom.com.br (=?ISO-8859-1?Q?Pedro_C=E9sar?=)
Date: Fri, 10 Apr 2009 09:37:27 -0300
Subject: [Cascavel-pm]
	=?iso-8859-1?q?=C9_poss=EDvel_saber_se_um_arquivo_e?=
	=?iso-8859-1?q?st=E1_sendo_executado_no_servidor=3F?=
In-Reply-To: <81511AFF79C646159FA1555C11C74A2F@swmobile>
References: <36b34d110904091208t5cf74697u9610955427969f5b@mail.gmail.com>
	<8e3843570904091334y2bcedfc8l3630701c8bf33bd1@mail.gmail.com>
	<36b34d110904091909y955e353g411b9320232d5471@mail.gmail.com>
	<604cec170904100100w3f63175by9c47664ffcca952d@mail.gmail.com>
	<36b34d110904100427q16550674ma530fe31f14aff21@mail.gmail.com>
	<81511AFF79C646159FA1555C11C74A2F@swmobile>
Message-ID: <36b34d110904100537mad7e686t46fcaaf4bf0caad2@mail.gmail.com>

É um sistema de controle de estoque, acontece que o gerente quer poder usar
esse sistema de qualquer micro da rede, no entanto, hoje toda vez que ele
vai usar o sistema, liga para o ramal de sua secretaria para saber se ela
está usando, para nao correr o risco de chamar o mesmo executavel duas vezes
em maquinas diferentes e criar algum problema, como já tivemos antes
(inconsistencia nos dados).

2009/4/10 Agnaldo Macedo <agnaldo em starweb-software.com.br>

>
> Que tipo de informações ou, melhor ainda, para que é usado esse arquivo?
>
>
>
>
> ----- Original Message -----
> *From:* Pedro César <pedrocesar em tecdom.com.br>
> *To:* Cascavel Perl Mongers <cascavel-pm em pm.org>
> *Sent:* Friday, April 10, 2009 8:27 AM
> *Subject:* Re: [Cascavel-pm]É possível saber se um arquivo está sendo
> executado no servidor?
>
> Infelizmente não é possível modificá-lo. Queria ver se há alguma forma de
> detectar que ele está sendo executado. Creio que o windows guarda essa
> informação, tendo em vista que ele fornece essa informação através do
> comando openfiles.
>
> Obrigado pela atenção
>
> 2009/4/10 Nelson Ferraz <nferraz em gmail.com>
>
>> > Acho que falhei mais uma vez na forma de perguntar, :D, uso linux em meu
>> > notebook, mas nesse caso, especificamente é para uma rede windows server
>> > 2003 com AD, o executavel que quero verificar está no servidor, mas pode
>> ser
>> > acessado por qualquer estacao.
>>
>> É possível modificar o sistema original, em clipper? Se for, basta que
>> o sistema escreva um arquivo numa localização pré-determinada, para
>> sinalizar que está sendo executado, e remova-o antes de terminar. Se o
>> arquivo já existir, o programa deve se recusar a iniciar.
>>
>> Idealmente este arquivo deve conter o número de identificação do
>> processo (pid), de tal forma que seja possível verificar se o processo
>> está mesmo rodando. Se não estiver, o arquivo pode ser sobreescrito.
>>  _______________________________________________
>> Cascavel-pm mailing list
>> Cascavel-pm em pm.org
>> http://mail.pm.org/mailman/listinfo/cascavel-pm
>>
>
>
>
> --
> Pedro César
> Analista de Suporte
> Microsoft Certified Professional - MCP
> Blog: www.tecdom.com.br/blog
> Fone: 82-9317-8802
> msn: pedrocesar em tecdom.com.br
> Registered Linux User #282860
>
>
> "Autoridades são alguns,
> e só por algun tempo.
> Enquanto cidadãos somos todos nós,
> e durante toda a vida".
> Prof. Hugo de Britto Machado
>
>
>  ------------------------------
>
> _______________________________________________
> 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
>



-- 
Pedro César
Analista de Suporte
Microsoft Certified Professional - MCP
Blog: www.tecdom.com.br/blog
Fone: 82-9317-8802
msn: pedrocesar em tecdom.com.br
Registered Linux User #282860


"Autoridades são alguns,
e só por algun tempo.
Enquanto cidadãos somos todos nós,
e durante toda a vida".
Prof. Hugo de Britto Machado
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: <http://mail.pm.org/pipermail/cascavel-pm/attachments/20090410/80e488f5/attachment.html>

From agnaldo em starweb-software.com.br  Fri Apr 10 05:59:32 2009
From: agnaldo em starweb-software.com.br (Agnaldo Macedo)
Date: Fri, 10 Apr 2009 09:59:32 -0300
Subject: [Cascavel-pm]
	=?iso-8859-1?q?=C9_poss=EDvel_saber_se_um_arquivo_e?=
	=?iso-8859-1?q?st=E1_sendo_executado_no_servidor=3F?=
References: <36b34d110904091208t5cf74697u9610955427969f5b@mail.gmail.com>
	<8e3843570904091334y2bcedfc8l3630701c8bf33bd1@mail.gmail.com>
	<36b34d110904091909y955e353g411b9320232d5471@mail.gmail.com>
	<604cec170904100100w3f63175by9c47664ffcca952d@mail.gmail.com>
	<36b34d110904100427q16550674ma530fe31f14aff21@mail.gmail.com>
	<81511AFF79C646159FA1555C11C74A2F@swmobile>
	<36b34d110904100537mad7e686t46fcaaf4bf0caad2@mail.gmail.com>
Message-ID: <DFB4AB4F812E425F8F057DC228A607EF@swmobile>


É estranho, pois sistemas Clipper são multi-usuário, normalmente.
Caso o pessoal que desenvolveu a aplicação não possa ser acionado (que seria  o ideal), um paleativo mais simples é voce deixar o aplicativo num disco da rede.
E um .bat da vida também.

Ao invés de chamar diretamente o .exe, chama o.bat.

Aí fica facil né.
O .bat quando é chamadao cria um arquivo de controle indicando que esta em uso.

Quando o .bat é chamado, ele procura por esse arquivo de controle, se existir, informa que o aplicativo já esta em uso.
Senão, seta esse arquivo de controle indicando que vai usar a aplicação e carrega ela.

Mas, a melhor solução é realmente conversar com o pessoal que fez a aplicação e solicitar uma alteração para sanar isso.
A menos que quem fez tenha morrido ou os fontes tenham sidos perdidos.
Caso contrário, é mais "barato" para a empresa solicitar uma customização.





  ----- Original Message ----- 
  From: Pedro César 
  To: Agnaldo Macedo ; Cascavel Perl Mongers 
  Sent: Friday, April 10, 2009 9:37 AM
  Subject: Re: [Cascavel-pm] É possível saber se um arquivo está sendo executado no servidor?


  É um sistema de controle de estoque, acontece que o gerente quer poder usar esse sistema de qualquer micro da rede, no entanto, hoje toda vez que ele vai usar o sistema, liga para o ramal de sua secretaria para saber se ela está usando, para nao correr o risco de chamar o mesmo executavel duas vezes em maquinas diferentes e criar algum problema, como já tivemos antes (inconsistencia nos dados).


  2009/4/10 Agnaldo Macedo <agnaldo em starweb-software.com.br>


    Que tipo de informações ou, melhor ainda, para que é usado esse arquivo?



      ----- Original Message ----- 
      From: Pedro César 
      To: Cascavel Perl Mongers 
      Sent: Friday, April 10, 2009 8:27 AM
      Subject: Re: [Cascavel-pm]É possível saber se um arquivo está sendo executado no servidor?


      Infelizmente não é possível modificá-lo. Queria ver se há alguma forma de detectar que ele está sendo executado. Creio que o windows guarda essa informação, tendo em vista que ele fornece essa informação através do comando openfiles.

      Obrigado pela atenção


      2009/4/10 Nelson Ferraz <nferraz em gmail.com>

        > Acho que falhei mais uma vez na forma de perguntar, :D, uso linux em meu
        > notebook, mas nesse caso, especificamente é para uma rede windows server
        > 2003 com AD, o executavel que quero verificar está no servidor, mas pode ser
        > acessado por qualquer estacao.


        É possível modificar o sistema original, em clipper? Se for, basta que
        o sistema escreva um arquivo numa localização pré-determinada, para
        sinalizar que está sendo executado, e remova-o antes de terminar. Se o
        arquivo já existir, o programa deve se recusar a iniciar.

        Idealmente este arquivo deve conter o número de identificação do
        processo (pid), de tal forma que seja possível verificar se o processo
        está mesmo rodando. Se não estiver, o arquivo pode ser sobreescrito.

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




      -- 
      Pedro César
      Analista de Suporte
      Microsoft Certified Professional - MCP
      Blog: www.tecdom.com.br/blog
      Fone: 82-9317-8802
      msn: pedrocesar em tecdom.com.br 
      Registered Linux User #282860


      "Autoridades são alguns, 
      e só por algun tempo.
      Enquanto cidadãos somos todos nós,
      e durante toda a vida".
      Prof. Hugo de Britto Machado





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


      _______________________________________________
      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




  -- 
  Pedro César
  Analista de Suporte
  Microsoft Certified Professional - MCP
  Blog: www.tecdom.com.br/blog
  Fone: 82-9317-8802
  msn: pedrocesar em tecdom.com.br 
  Registered Linux User #282860


  "Autoridades são alguns, 
  e só por algun tempo.
  Enquanto cidadãos somos todos nós,
  e durante toda a vida".
  Prof. Hugo de Britto Machado


-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: <http://mail.pm.org/pipermail/cascavel-pm/attachments/20090410/124ac236/attachment.html>

From agnaldo em starweb-software.com.br  Fri Apr 10 06:49:43 2009
From: agnaldo em starweb-software.com.br (Agnaldo Macedo)
Date: Fri, 10 Apr 2009 10:49:43 -0300
Subject: [Cascavel-pm]
	=?iso-8859-1?q?=C9_poss=EDvel_saber_se_um_arquivo_e?=
	=?iso-8859-1?q?st=E1_sendo_executado_no_servidor=3F?=
References: <36b34d110904091208t5cf74697u9610955427969f5b@mail.gmail.com><8e3843570904091334y2bcedfc8l3630701c8bf33bd1@mail.gmail.com><36b34d110904091909y955e353g411b9320232d5471@mail.gmail.com><604cec170904100100w3f63175by9c47664ffcca952d@mail.gmail.com><36b34d110904100427q16550674ma530fe31f14aff21@mail.gmail.com><81511AFF79C646159FA1555C11C74A2F@swmobile><36b34d110904100537mad7e686t46fcaaf4bf0caad2@mail.gmail.com>
	<DFB4AB4F812E425F8F057DC228A607EF@swmobile>
Message-ID: <5AB92A23834E411796BE4EC36961E4AF@swmobile>

É claro, não é a solução ideal.
Mas apaga incendio por enquanto.

Um exemplo bem simples.



@echo off 

if exist c:\temp\controle.txt goto EMUSO
   :CARREGA

:CARREGA
   echo teste > c:\temp\controle.txt
   c:\proramas\estoque.exe
   del c:\temp\controle.txt
   goto END

:EMUSO
   echo Aplicação em uso por outo usuário  
   goto END

:END



-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: <http://mail.pm.org/pipermail/cascavel-pm/attachments/20090410/4d4706de/attachment-0001.html>

From breno em rio.pm.org  Fri Apr 10 13:36:00 2009
From: breno em rio.pm.org (breno)
Date: Fri, 10 Apr 2009 17:36:00 -0300
Subject: [Cascavel-pm] Script Perl para ler arquivo PHP
In-Reply-To: <36b34d110904100425m4f6f4857ldd52721f55087ac1@mail.gmail.com>
References: <36b34d110904081746h5315caaahbd690513f1e3ea88@mail.gmail.com>
	<8e3843570904081804i64de573bk887e014f3b3c566f@mail.gmail.com>
	<36b34d110904081812w47935b1by71b7892ce4426e5d@mail.gmail.com>
	<bbea248f0904090952q80da855paeda29f4116e4016@mail.gmail.com>
	<604cec170904100204l2495f224g484bd2a8cc92a75a@mail.gmail.com>
	<36b34d110904100425m4f6f4857ldd52721f55087ac1@mail.gmail.com>
Message-ID: <bbea248f0904101336o341efc55q2979bc1d11ac3c4f@mail.gmail.com>

Não me candidato a transformar em artigo dessa vez pois foi uma
resposta meio que direcionada - não acho que será tão simples passar
para um texto genérico (talvez um FAQ de Iniciantes?). Mas fiquem à
vontade para usar como acharem melhor, seja em blog, wiki, ou onde
quiserem :-)


[]s

-b

2009/4/10 Pedro César <pedrocesar em tecdom.com.br>:
> Concordo plenamente com o Nelson, realmente a resposta foi muito ampla e
> esclarecedora, merece virar um post. E já peço permissão para publicá-la em
> meu blog: www.tecdom.com.br/blog , com as devidas referêcncias à fonte,
> claro.
>
>
>
> 2009/4/10 Nelson Ferraz <nferraz em gmail.com>
>>
>> Breno,
>>
>> Muito boa a sua resposta! Que tal transformá-la em um artigo para o wiki?
>>
>> Pedro, você também pode ajudar... afinal, ninguém melhor do que alguém
>> que está comecando para saber quais dicas são mais interessantes!
>>
>> []s
>>
>> Nelson
>> _______________________________________________
>> Cascavel-pm mailing list
>> Cascavel-pm em pm.org
>> http://mail.pm.org/mailman/listinfo/cascavel-pm
>
>
>
> --
> Pedro César
> Analista de Suporte
> Microsoft Certified Professional - MCP
> Blog: www.tecdom.com.br/blog
> Fone: 82-9317-8802
> msn: pedrocesar em tecdom.com.br
> Registered Linux User #282860
>
>
> "Autoridades são alguns,
> e só por algun tempo.
> Enquanto cidadãos somos todos nós,
> e durante toda a vida".
> Prof. Hugo de Britto Machado
>
>
>
> _______________________________________________
> Cascavel-pm mailing list
> Cascavel-pm em pm.org
> http://mail.pm.org/mailman/listinfo/cascavel-pm
>

From pedrocesar em tecdom.com.br  Fri Apr 10 14:26:37 2009
From: pedrocesar em tecdom.com.br (=?ISO-8859-1?Q?Pedro_C=E9sar?=)
Date: Fri, 10 Apr 2009 18:26:37 -0300
Subject: [Cascavel-pm] Script Perl para ler arquivo PHP
In-Reply-To: <bbea248f0904101336o341efc55q2979bc1d11ac3c4f@mail.gmail.com>
References: <36b34d110904081746h5315caaahbd690513f1e3ea88@mail.gmail.com>
	<8e3843570904081804i64de573bk887e014f3b3c566f@mail.gmail.com>
	<36b34d110904081812w47935b1by71b7892ce4426e5d@mail.gmail.com>
	<bbea248f0904090952q80da855paeda29f4116e4016@mail.gmail.com>
	<604cec170904100204l2495f224g484bd2a8cc92a75a@mail.gmail.com>
	<36b34d110904100425m4f6f4857ldd52721f55087ac1@mail.gmail.com>
	<bbea248f0904101336o341efc55q2979bc1d11ac3c4f@mail.gmail.com>
Message-ID: <36b34d110904101426l21b24fc2tf539b811d593a2d@mail.gmail.com>

Vou dar uma mexida e publicar no blog, aviso aqui quando colocar.



2009/4/10 breno <breno em rio.pm.org>

> Não me candidato a transformar em artigo dessa vez pois foi uma
> resposta meio que direcionada - não acho que será tão simples passar
> para um texto genérico (talvez um FAQ de Iniciantes?). Mas fiquem à
> vontade para usar como acharem melhor, seja em blog, wiki, ou onde
> quiserem :-)
>
>
> []s
>
> -b
>
> 2009/4/10 Pedro César <pedrocesar em tecdom.com.br>:
> > Concordo plenamente com o Nelson, realmente a resposta foi muito ampla e
> > esclarecedora, merece virar um post. E já peço permissão para publicá-la
> em
> > meu blog: www.tecdom.com.br/blog , com as devidas referêcncias à fonte,
> > claro.
> >
> >
> >
> > 2009/4/10 Nelson Ferraz <nferraz em gmail.com>
> >>
> >> Breno,
> >>
> >> Muito boa a sua resposta! Que tal transformá-la em um artigo para o
> wiki?
> >>
> >> Pedro, você também pode ajudar... afinal, ninguém melhor do que alguém
> >> que está comecando para saber quais dicas são mais interessantes!
> >>
> >> []s
> >>
> >> Nelson
> >> _______________________________________________
> >> Cascavel-pm mailing list
> >> Cascavel-pm em pm.org
> >> http://mail.pm.org/mailman/listinfo/cascavel-pm
> >
> >
> >
> > --
> > Pedro César
> > Analista de Suporte
> > Microsoft Certified Professional - MCP
> > Blog: www.tecdom.com.br/blog
> > Fone: 82-9317-8802
> > msn: pedrocesar em tecdom.com.br
> > Registered Linux User #282860
> >
> >
> > "Autoridades são alguns,
> > e só por algun tempo.
> > Enquanto cidadãos somos todos nós,
> > e durante toda a vida".
> > Prof. Hugo de Britto Machado
> >
> >
> >
> > _______________________________________________
> > 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
>



-- 
Pedro César
Analista de Suporte
Microsoft Certified Professional - MCP
Blog: www.tecdom.com.br/blog
Fone: 82-9317-8802
msn: pedrocesar em tecdom.com.br
Registered Linux User #282860


"Autoridades são alguns,
e só por algun tempo.
Enquanto cidadãos somos todos nós,
e durante toda a vida".
Prof. Hugo de Britto Machado
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: <http://mail.pm.org/pipermail/cascavel-pm/attachments/20090410/738a7e44/attachment.html>

From vandersons em gmail.com  Sat Apr 11 19:40:03 2009
From: vandersons em gmail.com (Vanderson Sampaio)
Date: Sat, 11 Apr 2009 22:40:03 -0400
Subject: [Cascavel-pm]
	=?iso-8859-1?q?=C9_poss=EDvel_saber_se_um_arquivo_e?=
	=?iso-8859-1?q?st=E1_sendo_executado_no_servidor=3F?=
In-Reply-To: <5AB92A23834E411796BE4EC36961E4AF@swmobile>
References: <36b34d110904091208t5cf74697u9610955427969f5b@mail.gmail.com>
	<8e3843570904091334y2bcedfc8l3630701c8bf33bd1@mail.gmail.com>
	<36b34d110904091909y955e353g411b9320232d5471@mail.gmail.com>
	<604cec170904100100w3f63175by9c47664ffcca952d@mail.gmail.com>
	<36b34d110904100427q16550674ma530fe31f14aff21@mail.gmail.com>
	<81511AFF79C646159FA1555C11C74A2F@swmobile>
	<36b34d110904100537mad7e686t46fcaaf4bf0caad2@mail.gmail.com>
	<DFB4AB4F812E425F8F057DC228A607EF@swmobile>
	<5AB92A23834E411796BE4EC36961E4AF@swmobile>
Message-ID: <792d03600904111940m82d5d13hd76b1984c825bc97@mail.gmail.com>

Já que a opção de acionar o pessoal que desenvolveu o sistema não é
cogitada, VNC ou algo parecido resolvia! Soluções "sujas" as vezes animam
essa galera que não manja muito (o gerente).
Abraços,

2009/4/10 Agnaldo Macedo <agnaldo em starweb-software.com.br>

>  É claro, não é a solução ideal.
> Mas apaga incendio por enquanto.
>
> Um exemplo bem simples.
>
>
>
> @echo off
>
> if exist c:\temp\controle.txt goto EMUSO
>    :CARREGA
>
> :CARREGA
>    echo teste > c:\temp\controle.txt
>    c:\proramas\estoque.exe
>    del c:\temp\controle.txt
>    goto END
>
> :EMUSO
>    echo Aplicação em uso por outo usuário
>    goto END
>
> :END
>
>
>
>
> _______________________________________________
> Cascavel-pm mailing list
> Cascavel-pm em pm.org
> http://mail.pm.org/mailman/listinfo/cascavel-pm
>



-- 
Vanderson Sampaio
Biólogo - Especialista em Bioinformática
Mestre em Genética e Biol. Molecular
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: <http://mail.pm.org/pipermail/cascavel-pm/attachments/20090411/cbd50c95/attachment.html>

From agnaldo em starweb-software.com.br  Sun Apr 12 05:22:43 2009
From: agnaldo em starweb-software.com.br (Agnaldo Macedo)
Date: Sun, 12 Apr 2009 09:22:43 -0300
Subject: [Cascavel-pm]
	=?iso-8859-1?q?=C9_poss=EDvel_saber_se_um_arquivo_e?=
	=?iso-8859-1?q?st=E1_sendo_executado_no_servidor=3F?=
References: <36b34d110904091208t5cf74697u9610955427969f5b@mail.gmail.com>
	<8e3843570904091334y2bcedfc8l3630701c8bf33bd1@mail.gmail.com>
	<36b34d110904091909y955e353g411b9320232d5471@mail.gmail.com>
	<604cec170904100100w3f63175by9c47664ffcca952d@mail.gmail.com>
	<36b34d110904100427q16550674ma530fe31f14aff21@mail.gmail.com>
	<81511AFF79C646159FA1555C11C74A2F@swmobile>
	<36b34d110904100537mad7e686t46fcaaf4bf0caad2@mail.gmail.com>
	<DFB4AB4F812E425F8F057DC228A607EF@swmobile>
	<5AB92A23834E411796BE4EC36961E4AF@swmobile>
	<792d03600904111940m82d5d13hd76b1984c825bc97@mail.gmail.com>
Message-ID: <73371A0DD2CC40B4B8C1B666B6A83A78@swmobile>

Com certeza Vanderson.

Se você saiu de viagem, e não fez a revisão do carro, e ele quebra na estrada, vais ter que "sujar" as mãos para poder continuar a viagem.
Aí sim, carro andando, se tiveres bom senso, vais parar assim que possível e fazer uma revisão.
Mas, pelo menos, não ficaste parado na serra.

E uma coisa muito importante.
Não esqueça que é o "pessoal que não manja (gerente)" que paga o sálario no final do mês.
Sálario esse que a empresa, provavelmente te paga, para resolver os problemas usando a menor quantidade de recursos possíveis.



  ----- Original Message ----- 
  From: Vanderson Sampaio 
  To: Agnaldo Macedo ; Cascavel Perl Mongers 
  Sent: Saturday, April 11, 2009 11:40 PM
  Subject: Re: [Cascavel-pm] É possível saber se um arquivo está sendo executado no servidor?


  Já que a opção de acionar o pessoal que desenvolveu o sistema não é cogitada, VNC ou algo parecido resolvia! Soluções "sujas" as vezes animam essa galera que não manja muito (o gerente).
  Abraços,


  2009/4/10 Agnaldo Macedo <agnaldo em starweb-software.com.br>

    É claro, não é a solução ideal.
    Mas apaga incendio por enquanto.

    Um exemplo bem simples.



    @echo off 

    if exist c:\temp\controle.txt goto EMUSO
       :CARREGA

    :CARREGA
       echo teste > c:\temp\controle.txt
       c:\proramas\estoque.exe
       del c:\temp\controle.txt
       goto END

    :EMUSO
       echo Aplicação em uso por outo usuário  
       goto END

    :END





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




  -- 
  Vanderson Sampaio
  Biólogo - Especialista em Bioinformática
  Mestre em Genética e Biol. Molecular
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: <http://mail.pm.org/pipermail/cascavel-pm/attachments/20090412/36d106de/attachment.html>

From agnaldo em starweb-software.com.br  Sun Apr 12 10:45:05 2009
From: agnaldo em starweb-software.com.br (Agnaldo Macedo)
Date: Sun, 12 Apr 2009 14:45:05 -0300
Subject: [Cascavel-pm]
	=?iso-8859-1?q?=C9_poss=EDvel_saber_se_um_arquivo_e?=
	=?iso-8859-1?q?st=E1_sendo_executado_no_servidor=3F?=
References: <36b34d110904091208t5cf74697u9610955427969f5b@mail.gmail.com>
	<36b34d110904091909y955e353g411b9320232d5471@mail.gmail.com>
	<604cec170904100100w3f63175by9c47664ffcca952d@mail.gmail.com>
	<36b34d110904100427q16550674ma530fe31f14aff21@mail.gmail.com>
	<81511AFF79C646159FA1555C11C74A2F@swmobile>
	<36b34d110904100537mad7e686t46fcaaf4bf0caad2@mail.gmail.com>
	<DFB4AB4F812E425F8F057DC228A607EF@swmobile>
	<5AB92A23834E411796BE4EC36961E4AF@swmobile>
	<792d03600904111940m82d5d13hd76b1984c825bc97@mail.gmail.com>
	<73371A0DD2CC40B4B8C1B666B6A83A78@swmobile>
	<792d03600904120931v2061c6daq95e73a5f5551324a@mail.gmail.com>
Message-ID: <A16B7D02A7A1495982508A11F976BE68@swmobile>


"VNC ou algo parecido resolvia"
Mas note, o uso do VNC seria "mais" uma coisa para ser administrada.
E não foi dito que não presta. Muito pelo contrário. VNC é usado aos montes por aí.

"Já que a opção de acionar o pessoal que desenvolveu o sistema não é cogitada"
Foi altamente recomendado que ele cogita-se isso.
Vide email
"É estranho, pois sistemas Clipper são multi-usuário, normalmente." 
"Caso o pessoal que desenvolveu a aplicação não possa ser acionado (que seria  o ideal),"

"Abraços provocativos!"
Dispenso teus abraços, pois você é mais um daqueles que acha que o problema deve ser resolvido trocando SO, trocando leitor de email, trocando browser, etc.










  ----- Original Message ----- 
  From: Vanderson Sampaio 
  To: Agnaldo Macedo 
  Sent: Sunday, April 12, 2009 1:31 PM
  Subject: Re: [Cascavel-pm] É possível saber se um arquivo está sendo executado no servidor?


  Máxima parcimônia companheiro... A melhor explicação é sempre a que envolve menor número de passos.
  Ainda em tempo, quem te disse que VNC não presta e que necessariamente "deixa na mão"? 
  Aproveitando a deixa da metáfora "mal talhada", quem te disse que revisão é garantia de viagem tranquila?
  E só pra arrematar, o "pessoal que não manja (gerente)", que paga sim o salário, na grande maioria das vezes, não quer saber do encanamento, quer saber de esgotar os resíduos.

  Abraços provocativos!


  2009/4/12 Agnaldo Macedo <agnaldo em starweb-software.com.br>

    Com certeza Vanderson.

    Se você saiu de viagem, e não fez a revisão do carro, e ele quebra na estrada, vais ter que "sujar" as mãos para poder continuar a viagem.
    Aí sim, carro andando, se tiveres bom senso, vais parar assim que possível e fazer uma revisão.
    Mas, pelo menos, não ficaste parado na serra.

    E uma coisa muito importante.
    Não esqueça que é o "pessoal que não manja (gerente)" que paga o sálario no final do mês.
    Sálario esse que a empresa, provavelmente te paga, para resolver os problemas usando a menor quantidade de recursos possíveis.



      ----- Original Message ----- 
      From: Vanderson Sampaio 
      To: Agnaldo Macedo ; Cascavel Perl Mongers 
      Sent: Saturday, April 11, 2009 11:40 PM
      Subject: Re: [Cascavel-pm] É possível saber se um arquivo está sendo executado no servidor?


      Já que a opção de acionar o pessoal que desenvolveu o sistema não é cogitada, VNC ou algo parecido resolvia! Soluções "sujas" as vezes animam essa galera que não manja muito (o gerente).
      Abraços,


      2009/4/10 Agnaldo Macedo <agnaldo em starweb-software.com.br>

        É claro, não é a solução ideal.
        Mas apaga incendio por enquanto.

        Um exemplo bem simples.



        @echo off 

        if exist c:\temp\controle.txt goto EMUSO
           :CARREGA

        :CARREGA
           echo teste > c:\temp\controle.txt
           c:\proramas\estoque.exe
           del c:\temp\controle.txt
           goto END

        :EMUSO
           echo Aplicação em uso por outo usuário  
           goto END

        :END





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




      -- 
      Vanderson Sampaio
      Biólogo - Especialista em Bioinformática
      Mestre em Genética e Biol. Molecular




  -- 
  Vanderson Sampaio
  Biólogo - Especialista em Bioinformática
  Mestre em Genética e Biol. Molecular
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: <http://mail.pm.org/pipermail/cascavel-pm/attachments/20090412/6a6d61b8/attachment-0001.html>

From ricardostock em bol.com.br  Mon Apr 13 13:39:39 2009
From: ricardostock em bol.com.br (Ricardo Stock)
Date: Mon, 13 Apr 2009 17:39:39 -0300
Subject: [Cascavel-pm] =?iso-8859-1?q?gera=E7=E3o_de_arquivos_pdf?=
Message-ID: <AB92F14ED7A1444B95AEFA935656509D@PCRicardo>

    Boa tarde a todos da lista... novamente peço sua ajuda.

    Estou tendo que publicar relatorios (  salvar se necessário e imprimir) mas este em pdf... sem problema... estou usando o modulo PDF::API2; mas não entendi direito a parte de formatação do arquivo.

    Veja, tenho uma variavel '$conteudo' que pode ser (por exemplo) o retorno de uma consulta no banco mysql. 

    Quando gero o arquivo, o mesmo é construido... mas as lihnas não cabem na pagina... não sei como acertar o conteudo da vaiavel de forma a caber corretamente na folha, ou seja as quebras de paginas e tudo mais.

    Queria saber o que faz estas duas linhas
    $pdf->mediabox(595,842);
    $txt->translate(100,800); (sei que aqui é o posicionamento do texto.... mas nao consegui acertar na página)



#######################################
#TRECHO DO CODIGO QUE GERA O PDF
#######################################

my $pdf  = PDF::API2->new(-file => "Relatorio.pdf");
$pdf->mediabox(595,842);
my $page = $pdf->page;
my $fnt = $pdf->corefont('Verdana',-encoding => 'latin1');
my $txt = $page->text;
$txt->textstart;
$txt->font($fnt, 20);
$txt->translate(100,800);
$txt->text($conteudo);
$txt->textend;
$pdf->save;
$pdf->end( );


fiz o codigo seguindo o exemplo do modulo que instalei... se alguem tiver outro caminho para as pedras eu agradeço. o que acho que pode ser melhor.
lembrando que rodo activeperl 5.8

A todos obrigado


Ricardo Stock
ricardostock em bol.com.br
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: <http://mail.pm.org/pipermail/cascavel-pm/attachments/20090413/409a6b5c/attachment.html>

From zanottors em gmail.com  Wed Apr 15 13:23:17 2009
From: zanottors em gmail.com (Ricardo Zanotto Zaniol)
Date: Wed, 15 Apr 2009 17:23:17 -0300
Subject: [Cascavel-pm] Criando Metodos perl + windows
In-Reply-To: <797fce390904141535w6ae67075y63022289be2dd4f7@mail.gmail.com>
References: <797fce390904141535w6ae67075y63022289be2dd4f7@mail.gmail.com>
Message-ID: <797fce390904151323q4a9987eah186f5877d86c38d9@mail.gmail.com>

Olá pessoal, estou com um problema na criação de métodos no Perl, a minha
estrutura atual é a seguinte:

C:\perl\lib\Teste\Controller

Na pasta controller (business manager) tenho o arquivo cliente.pm

package Teste::Controller::Cliente;

sub Consulta {

    use Teste::Model::Cliente;

    my ($res, $conn) = Teste::Model::Cliente::Consulta();

    return($res, $conn);

}

=========================================================================

C:\perl\lib\Teste\Model

Na pasta Model (Banco de Dados) tenho dois arquivos o cliente.pm

package Teste::Model::Cliente;

sub Consulta {

    use Teste::Model::MySql;

    my $db = Teste::Model::MySql::Conecta();

    if ($db ne "")

    {

        my $conn = Teste::Model::MySql::Query($db, "SELECT id_cliente, nome
FROM cliente");

        my (@fields) = ("id_cliente", "nome");

        my %results;

        @results{@fields} = ();

        $conn->bind_columns(map { \$results{$_} } @fields);

        return (\%results, sub { $conn->fetch() });

    }

    else

    {

        return ("false", "false");

    }

}



E o outro arquivo MySql.pm

  package Teste::Model::MySql;

 use DBI;

sub Conecta

{

   my $driver   = "mysqlPP";

   my $server   = "localhost";

   my $database = "banco";

   my $user     = "usuario";

   my $password = "senha";



   my $url = "DBI:$driver:$database:$server";

   my $dbh = DBI->connect( $url, $user, $password,

                               { PrintError => 0 });;

   return($dbh);

}

sub Query

{

   my($conn, $consulta) = @_;

   my $sql = qq{ $consulta };

   my $sth = $conn->prepare( $sql );

   $sth->execute() ;

   return($sth);
}
========================================================

pasta onde estaria o site web

C:\inetpub\wwwroot\ListaCliente.pl



use Teste::Controller::Cliente;

print "Content-type: text/html\n\n";
print "<html>\n";
print "<head>\n";
print "  <title>Lista Clientes</title>\n";
print "</head>\n";
print "<body>\n\n";

my ($res, $conn) = Teste::Controller::Cliente::Consulta();

if ($res ne "false")
{
    while ($conn->()) {
        print "$res->{id_cliente} - \n";
        print "$res->{nome} \n";
        print "<br>";
    }
}


print "</body>\n";
print "</html>\n";
==========================================================
Essa estrutura até funciona mas quando eu manipulo os registros na camada
controller (Cliente.pm) eu nao consigo listar novamente os registros na
camada de visualização(ListaCliente.pl)
Gostaria de saber se alguem tem um exemplo melhor de como dividir a
aplicação em camadas, e como eu poderia modificar essa estrutura de uma
forma mais simplificada.
Estou usando esta estrutura em uma maquina com windows2003 + IIS + MySql.
Obrigado...
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: <http://mail.pm.org/pipermail/cascavel-pm/attachments/20090415/03bf766c/attachment.html>

From zanottors em gmail.com  Wed Apr 15 13:29:06 2009
From: zanottors em gmail.com (Ricardo Zanotto Zaniol)
Date: Wed, 15 Apr 2009 17:29:06 -0300
Subject: [Cascavel-pm] Criando Metodos perl + windows
Message-ID: <797fce390904151329w4f5c8762wef2f15aafd9d947a@mail.gmail.com>

Olá pessoal, estou com um problema na criação de métodos no Perl, a minha
estrutura atual é a seguinte:

C:\perl\lib\Teste\Controller

Na pasta controller (business manager) tenho o arquivo cliente.pm

package Teste::Controller::Cliente;
sub Consulta {
    use Teste::Model::Cliente;
    my ($res, $conn) = Teste::Model::Cliente::Consulta();
    return($res, $conn);
}
=========================================================================

C:\perl\lib\Teste\Model

Na pasta Model (Banco de Dados) tenho dois arquivos o cliente.pm

package Teste::Model::Cliente;
sub Consulta {
    use Teste::Model::MySql;
    my $db = Teste::Model::MySql::Conecta();
    if ($db ne "")
    {
        my $conn = Teste::Model::MySql::Query($db, "SELECT id_cliente, nome
FROM cliente");
        my (@fields) = ("id_cliente", "nome");
        my %results;
        @results{@fields} = ();
        $conn->bind_columns(map { \$results{$_} } @fields);
        return (\%results, sub { $conn->fetch() });
    }
    else
    {
        return ("false", "false");
    }
}
====================================================

E o outro arquivo MySql.pm

package Teste::Model::MySql;
use DBI;

my $driver   = "mysqlPP";
my $server   = "localhost";
my $database = "banco";
my $user     = "usuario";
my $password = "senha";

sub Conecta
{
   my $url = "DBI:$driver:$database:$server";
   my $dbh = DBI->connect( $url, $user, $password,
                               { PrintError => 0 });;
   return($dbh);
}
sub Query
{
   my($conn, $consulta) = @_;
   my $sql = qq{ $consulta };
   my $sth = $conn->prepare( $sql );
   $sth->execute() ;
   return($sth);
}
========================================================

pasta onde estaria o site web

C:\inetpub\wwwroot\ListaCliente.pl

use Teste::Controller::Cliente;
print "Content-type: text/html\n\n";
print "<html>\n";
print "<head>\n";
print "  <title>Lista Clientes</title>\n";
print "</head>\n";
print "<body>\n\n";
my ($res, $conn) = Teste::Controller::Cliente::Consulta();
if ($res ne "false")
{
    while ($conn->()) {
        print "$res->{id_cliente} - \n";
        print "$res->{nome} \n";
        print "<br>";
    }
}

print "</body>\n";
print "</html>\n";
==========================================================

Essa estrutura até funciona mas quando eu manipulo os registros na camada
controller (Cliente.pm) eu nao consigo listar novamente os registros na
camada de visualização(ListaCliente.pl)

Gostaria de saber se alguem tem um exemplo melhor de como dividir a
aplicação em camadas, e como eu poderia modificar essa estrutura de uma
forma mais simplificada.

Estou usando esta estrutura em uma maquina com windows2003 + IIS + MySql.

Obrigado...
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: <http://mail.pm.org/pipermail/cascavel-pm/attachments/20090415/bf2cac8f/attachment.html>

From nferraz em gmail.com  Wed Apr 15 14:00:53 2009
From: nferraz em gmail.com (Nelson Ferraz)
Date: Wed, 15 Apr 2009 23:00:53 +0200
Subject: [Cascavel-pm] Criando Metodos perl + windows
In-Reply-To: <797fce390904151323q4a9987eah186f5877d86c38d9@mail.gmail.com>
References: <797fce390904141535w6ae67075y63022289be2dd4f7@mail.gmail.com>
	<797fce390904151323q4a9987eah186f5877d86c38d9@mail.gmail.com>
Message-ID: <604cec170904151400y3630f39aub3f2041c81279c3a@mail.gmail.com>

> Essa estrutura até funciona mas quando eu manipulo os registros na camada
> controller (Cliente.pm) eu nao consigo listar novamente os registros na
> camada de visualização(ListaCliente.pl)
> Gostaria de saber se alguem tem um exemplo melhor de como dividir a
> aplicação em camadas, e como eu poderia modificar essa estrutura de uma
> forma mais simplificada.

Instale o Catalyst (cpan Task::Catalyst). Mesmo que você não decida
usá-lo como framework, ele pode gerar um monte de classes
automaticamente, que depois você poderá usar em seu projeto.

# Este comando criará todo o esqueleto da sua aplicação:
catalyst.pl Cadastro

# Este comando criará seus objetos de acesso à base de dados:
./script/cadastro_create model Model DBIC::Schema Cadastro::Schema
create=static \
   dbi:mysqlPP:database=banco;host=localhost usuario senha

# Este comando criará um view baseado em Template Toolkit:
./script/cadastro_create.pl view TT TT

# Este comando criará um controller:
./script/cadastro_create.pl controller Cliente

From daniel.oliveira.mantovani em gmail.com  Wed Apr 15 14:05:59 2009
From: daniel.oliveira.mantovani em gmail.com (Daniel de Oliveira Mantovani)
Date: Wed, 15 Apr 2009 18:05:59 -0300
Subject: [Cascavel-pm] Criando Metodos perl + windows
In-Reply-To: <797fce390904151329w4f5c8762wef2f15aafd9d947a@mail.gmail.com>
References: <797fce390904151329w4f5c8762wef2f15aafd9d947a@mail.gmail.com>
Message-ID: <214823ca0904151405j8f76414g4a1945f4d106e353@mail.gmail.com>

<codigo>

sub Consulta {

    use Teste::Model::MySql;

    my $db = Teste::Model::MySql::Conecta();

    if ($db) {

        my $conn = Teste::Model::MySql::Query($db, "SELECT id_cliente, nome
FROM cliente");

        my $ref_fields = $conn->fetchall_arrayref;

        return $ref_fields;

    } else {

        return 0;

      }

}

</codigo>

Agora você tem um AoA:
perldoc perldsc: http://www.perl.org.br/Perldoc/V500807/Perldsc
perldoc perlref

Para pegar o id_cliente e o nome é só fazer agora:
<code>
foreach my $item (@{ $ref_fields }) {

print "id_cliente" . $item->[0] . "\n";
print "nome" . $item->[1] . "\n";
}
</code>

Não precisa de toda aquela volta, entendeu ?


<seu_codigo>

package Teste::Model::Cliente;
sub Consulta {
    use Teste::Model::MySql;
    my $db = Teste::Model::MySql::Conecta();
    if ($db ne "") #Não precisa disso, apenas $if($db) é o suficiente.
    {
        my $conn = Teste::Model::MySql::Query($db, "SELECT id_cliente, nome
FROM cliente");
        my (@fields) = ("id_cliente", "nome");
        my %results;
        @results{@fields} = ();
        $conn->bind_columns(map { \$results{$_} } @fields);
        return (\%results, sub { $conn->fetch() });
    }
    else
    {
        return ("false", "false"); #Não é bom usar isso, retorne undef.
    }
}

</seu_codigo>

<seu_codigo>
    use Teste::Controller::Cliente;

# - Não jogue HTML desse jeito, use CGI ou Template Toolkit.
# http://search.cpan.org/~lds/CGI.pm-3.43/CGI.pm
# http://search.cpan.org/~abw/Template-Toolkit-2.20/lib/Template/Toolkit.pod

    print "Content-type: text/html\n\n";
    print "<html>\n";
    print "<head>\n";
    print "  <title>Lista Clientes</title>\n";
    print "</head>\n";
    print "<body>\n\n";
    my ($res, $conn) = Teste::Controller::Cliente::Consulta();
    if ($res ne "false")  #Agora que você colocou undef no lugar de "false"
você pode fazer: $if ($ref), muito mais elegante.
    {
        while ($conn->()) {
            print "$res->{id_cliente} - \n";
            print "$res->{nome} \n";
            print "<br>";
        }
    }

    print "</body>\n";
    print "</html>\n";

</seu_codigo>

Você já leu o perldoc perlbot?
http://www.perl.org.br/Perldoc/V500807/Perlbot

Não use DBI use DBIx::Class
http://search.cpan.org/~ash/DBIx-Class-0.08013/lib/DBIx/Class.pm

Fazer isso usando Catalyst é muito mais simples, é um framework MVC no
próprio manual existem alguns exemplos simples.
O Thiago, fez um tutorial muito bom:
http://www.maluco.com.br/perl/catalyst.html

[]s

2009/4/15 Ricardo Zanotto Zaniol <zanottors em gmail.com>

> Olá pessoal, estou com um problema na criação de métodos no Perl, a minha
> estrutura atual é a seguinte:
>
> C:\perl\lib\Teste\Controller
>
> Na pasta controller (business manager) tenho o arquivo cliente.pm
>
> package Teste::Controller::Cliente;
> sub Consulta {
>     use Teste::Model::Cliente;
>     my ($res, $conn) = Teste::Model::Cliente::Consulta();
>     return($res, $conn);
> }
> =========================================================================
>
> C:\perl\lib\Teste\Model
>
> Na pasta Model (Banco de Dados) tenho dois arquivos o cliente.pm
>
> package Teste::Model::Cliente;
> sub Consulta {
>     use Teste::Model::MySql;
>     my $db = Teste::Model::MySql::Conecta();
>     if ($db ne "")
>     {
>         my $conn = Teste::Model::MySql::Query($db, "SELECT id_cliente, nome
> FROM cliente");
>         my (@fields) = ("id_cliente", "nome");
>         my %results;
>         @results{@fields} = ();
>         $conn->bind_columns(map { \$results{$_} } @fields);
>         return (\%results, sub { $conn->fetch() });
>     }
>     else
>     {
>         return ("false", "false");
>     }
> }
> ====================================================
>
> E o outro arquivo MySql.pm
>
> package Teste::Model::MySql;
> use DBI;
>
> my $driver   = "mysqlPP";
>
> my $server   = "localhost";
> my $database = "banco";
> my $user     = "usuario";
> my $password = "senha";
>
> sub Conecta
>
> {
>    my $url = "DBI:$driver:$database:$server";
>    my $dbh = DBI->connect( $url, $user, $password,
>                                { PrintError => 0 });;
>    return($dbh);
> }
> sub Query
> {
>    my($conn, $consulta) = @_;
>    my $sql = qq{ $consulta };
>    my $sth = $conn->prepare( $sql );
>    $sth->execute() ;
>    return($sth);
> }
> ========================================================
>
> pasta onde estaria o site web
>
> C:\inetpub\wwwroot\ListaCliente.pl
>
> use Teste::Controller::Cliente;
> print "Content-type: text/html\n\n";
> print "<html>\n";
> print "<head>\n";
> print "  <title>Lista Clientes</title>\n";
> print "</head>\n";
> print "<body>\n\n";
> my ($res, $conn) = Teste::Controller::Cliente::Consulta();
> if ($res ne "false")
> {
>     while ($conn->()) {
>         print "$res->{id_cliente} - \n";
>         print "$res->{nome} \n";
>         print "<br>";
>     }
> }
>
> print "</body>\n";
> print "</html>\n";
> ==========================================================
>
> Essa estrutura até funciona mas quando eu manipulo os registros na camada
> controller (Cliente.pm) eu nao consigo listar novamente os registros na
> camada de visualização(ListaCliente.pl)
>
> Gostaria de saber se alguem tem um exemplo melhor de como dividir a
> aplicação em camadas, e como eu poderia modificar essa estrutura de uma
> forma mais simplificada.
>
> Estou usando esta estrutura em uma maquina com windows2003 + IIS + MySql.
>
> Obrigado...
>
> _______________________________________________
> Cascavel-pm mailing list
> Cascavel-pm em pm.org
> http://mail.pm.org/mailman/listinfo/cascavel-pm
>



-- 
http://mantovanihouse.blogspot.com/
This is my poney:
-------(\_------------_/)-----------
-------)--(----------)--(-----------
------(----(---------)----)----------
-------)----(-------)----(-----------
-------(----(-------)----)-----------
--------\_-(\\.---.//)-_/------------
----------\)' -8--8- '(/--------------
-----------/------------\---------------
----------(--)--------(--)--------------
------------(_c__c_)----------------
----------------------------------------
perl -MLWP::Simple -le 'grep{ print $1 if /href="(http.+?)"/}split($/,get("
http://www.perl.org.br"))'
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: <http://mail.pm.org/pipermail/cascavel-pm/attachments/20090415/99dcc2ff/attachment.html>

From zanottors em gmail.com  Wed Apr 15 16:02:48 2009
From: zanottors em gmail.com (Ricardo Zanotto Zaniol)
Date: Wed, 15 Apr 2009 20:02:48 -0300
Subject: [Cascavel-pm] Criando Metodos perl + windows
In-Reply-To: <604cec170904151400y3630f39aub3f2041c81279c3a@mail.gmail.com>
References: <797fce390904141535w6ae67075y63022289be2dd4f7@mail.gmail.com>
	<797fce390904151323q4a9987eah186f5877d86c38d9@mail.gmail.com>
	<604cec170904151400y3630f39aub3f2041c81279c3a@mail.gmail.com>
Message-ID: <797fce390904151602h5199e15brf1409b258140819d@mail.gmail.com>

Existe uma versao do catalyst para windows ?

2009/4/15 Nelson Ferraz <nferraz em gmail.com>

> > Essa estrutura até funciona mas quando eu manipulo os registros na camada
> > controller (Cliente.pm) eu nao consigo listar novamente os registros na
> > camada de visualização(ListaCliente.pl)
> > Gostaria de saber se alguem tem um exemplo melhor de como dividir a
> > aplicação em camadas, e como eu poderia modificar essa estrutura de uma
> > forma mais simplificada.
>
> Instale o Catalyst (cpan Task::Catalyst). Mesmo que você não decida
> usá-lo como framework, ele pode gerar um monte de classes
> automaticamente, que depois você poderá usar em seu projeto.
>
> # Este comando criará todo o esqueleto da sua aplicação:
> catalyst.pl Cadastro
>
> # Este comando criará seus objetos de acesso à base de dados:
> ./script/cadastro_create model Model DBIC::Schema Cadastro::Schema
> create=static \
>   dbi:mysqlPP:database=banco;host=localhost usuario senha
>
> # Este comando criará um view baseado em Template Toolkit:
> ./script/cadastro_create.pl view TT TT
>
> # Este comando criará um controller:
> ./script/cadastro_create.pl controller Cliente
> _______________________________________________
> 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/20090415/50c73dc5/attachment.html>

From acid06 em gmail.com  Wed Apr 15 16:10:57 2009
From: acid06 em gmail.com (Nilson Santos Figueiredo Jr.)
Date: Wed, 15 Apr 2009 20:10:57 -0300
Subject: [Cascavel-pm] Criando Metodos perl + windows
In-Reply-To: <797fce390904151602h5199e15brf1409b258140819d@mail.gmail.com>
References: <797fce390904141535w6ae67075y63022289be2dd4f7@mail.gmail.com>
	<797fce390904151323q4a9987eah186f5877d86c38d9@mail.gmail.com>
	<604cec170904151400y3630f39aub3f2041c81279c3a@mail.gmail.com>
	<797fce390904151602h5199e15brf1409b258140819d@mail.gmail.com>
Message-ID: <9a08c9b40904151610u61507076q881cf36040d2b532@mail.gmail.com>

2009/4/15 Ricardo Zanotto Zaniol <zanottors em gmail.com>:
> Existe uma versao do catalyst para windows ?

O Catalyst, assim como a grande maioria das coisas em Perl, rodam em
Windows ou em qualquer outra plataforma suportada.

-Nilson Santos F. Jr.

From zanottors em gmail.com  Wed Apr 15 16:16:14 2009
From: zanottors em gmail.com (Ricardo Zanotto Zaniol)
Date: Wed, 15 Apr 2009 20:16:14 -0300
Subject: [Cascavel-pm] Criando Metodos perl + windows
In-Reply-To: <9a08c9b40904151610u61507076q881cf36040d2b532@mail.gmail.com>
References: <797fce390904141535w6ae67075y63022289be2dd4f7@mail.gmail.com>
	<797fce390904151323q4a9987eah186f5877d86c38d9@mail.gmail.com>
	<604cec170904151400y3630f39aub3f2041c81279c3a@mail.gmail.com>
	<797fce390904151602h5199e15brf1409b258140819d@mail.gmail.com>
	<9a08c9b40904151610u61507076q881cf36040d2b532@mail.gmail.com>
Message-ID: <797fce390904151616r6627b9fdj7009ed6a8e1e2baa@mail.gmail.com>

Olá pessoal!
Agradeço a todos por responderem minha duvida. Eu confesso que não conhecia
o comando ?cpan ?i <modulo>? eu sempre usei o PPM.
Bom, já instalei o catalyst e vou começar a utilizar.

Obrigado pela força


2009/4/15 Nilson Santos Figueiredo Jr. <acid06 em gmail.com>

> 2009/4/15 Ricardo Zanotto Zaniol <zanottors em gmail.com>:
> > Existe uma versao do catalyst para windows ?
>
> O Catalyst, assim como a grande maioria das coisas em Perl, rodam em
> Windows ou em qualquer outra plataforma suportada.
>
> -Nilson Santos F. Jr.
>  _______________________________________________
> 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/20090415/0fc2b423/attachment-0001.html>

From breno em rio.pm.org  Wed Apr 15 18:20:44 2009
From: breno em rio.pm.org (breno)
Date: Wed, 15 Apr 2009 22:20:44 -0300
Subject: [Cascavel-pm] Catalyst + Windows + IDE (Re: Criando Metodos perl +
	windows)
Message-ID: <bbea248f0904151820g76503702vc807a570f5f18ee6@mail.gmail.com>

Apenas aproveitando para fazer um pouco de propaganda explícita e sem
vergonha, se está começando no mundo Perl e gosta de IDEs, pode
experimentar o Padre (http://padre.perlide.org). Ele roda em Windows,
vem com tradução para português brasileiro e tem um plugin de Catalyst
que integra todos os helpers de criação + referências de documentação
do Catalyst.

O Padre está em desenvolvimento e ainda tem alguns problemas, mas já é
bastante usável (fora que, quanto mais usuários, mais relatórios de
bugs/feedback/sugestões, melhor ele fica) :-P

Para instalar, use o Strawberry Perl (tem uma versão beeeem antiga em
ppm mas o Strawberry é muito bom e vale a pena):

http://www.strawberryperl.com/

depois, chame a shell do cpan e digite "install Padre" (sem aspas)

aproveite e instale o plugin do Catalyst:

cpan>  install Padre::Plugin::Catalyst

Inicie o Padre entrando em Iniciar->Executar e digitando: "padre"  (sem aspas)

E carregue o plugin do Catalyst em Plugins->Gerenciador de Plugins. O
menu "Catalyst" aparecerá dentro do menu Plugins.

Eu fiz um artigo sobre o plugin aqui (em inglês):
http://onionstand.blogspot.com/2009/04/padre-catalyst.html


Qualquer dúvida, tamos aí!

[]s

-b

2009/4/15 Ricardo Zanotto Zaniol <zanottors em gmail.com>:
> Olá pessoal!
> Agradeço a todos por responderem minha duvida. Eu confesso que não conhecia
> o comando ?cpan ?i <modulo>? eu sempre usei o PPM.
> Bom, já instalei o catalyst e vou começar a utilizar.
>
> Obrigado pela força
>
> 2009/4/15 Nilson Santos Figueiredo Jr. <acid06 em gmail.com>
>>
>> 2009/4/15 Ricardo Zanotto Zaniol <zanottors em gmail.com>:
>> > Existe uma versao do catalyst para windows ?
>>
>> O Catalyst, assim como a grande maioria das coisas em Perl, rodam em
>> Windows ou em qualquer outra plataforma suportada.
>>
>> -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
>

From nelio.nunes em sapo.pt  Thu Apr 16 06:51:52 2009
From: nelio.nunes em sapo.pt (=?ISO-8859-1?Q?N=E9lio_Nunes?=)
Date: Thu, 16 Apr 2009 14:51:52 +0100
Subject: [Cascavel-pm] =?iso-8859-1?q?DBIx=3A=3AClass_Inser=E7=E3o_em_tabe?=
	=?iso-8859-1?q?las_relacionadas?=
Message-ID: <121583B6-05E9-47B4-B76D-97331A671E94@sapo.pt>

Caros,

Ando aqui com um problema bicudo em que os ninjas do DBIx::Class  
poderão me ajudar, espero:

Tenho 2 tabelas, uma principal, outra secundaria, com uma relação one  
to many de uma para a outra.

a tabela principal é qq coisa deste género: (output do show create)

CREATE TABLE `Servicos` (
   `id` int(11) NOT NULL,
   `semaforo` varchar(255) NOT NULL,
    (...)
   PRIMARY KEY  (`id`)
) ENGINE=InnoDB DEFAULT CHARSET=utf8

a tabela secundária é isto:

CREATE TABLE `Links_relacionados` (
   `id` int(11) NOT NULL,
   `nome` varchar(255) NOT NULL,
   `url` varchar(255) NOT NULL,
   `id_servico` int(11) NOT NULL,
   PRIMARY KEY  (`id`),
   KEY `id_servico` (`id_servico`),
   CONSTRAINT `servicos_fk` FOREIGN KEY (`id_servico`) REFERENCES  
`Servicos` (`id`) ON DELETE CASCADE ON UPDATE CASCADE
) ENGINE=InnoDB DEFAULT CHARSET=utf8


nas classes DBIx relativas ás duas tabelas, tenho o seguinte:

package SAPO::Servicos;
(...)
__PACKAGE__->set_primary_key("id");
__PACKAGE__->has_many(
   "links_relacionado",
   "SAPO::LinksRelacionados",
   { "foreign.id_servico" => "self.id" },
);


package SAPO::LinksRelacionados;
(...)
__PACKAGE__->set_primary_key("id");
__PACKAGE__->belongs_to("id_servico", "SAPO::Servicos", { id =>  
"id_servico" });

Agora, quando é que isto estoura:

Quando se tenta fazer um create_or_update com a seguinte estrutura:

my $servicox = {
     id                  => "6969",
     semaforo            => "zemaria",
     logotipo_servico    => "logotipo.gif",
     link_servico        => "http://um_link_qq",
     url_feed_rss        => "http://um_rss_qq",
     title               => "da-lhe duro",
     semaforo_destacado  => 1,
     destacar_no_servico => 1,
     links_relacionado   => [
         { id => '293874', nome => "ola maria", url => "http:// 
um_url_qq" },
         { id => '293875', nome => "ola maria", url => "http:// 
um_url_qq" }
     ],

};

$schema->resultset('Servicos')->update_or_create($servicox, {id =>  
"6969"});

Na primeira inserção, tudo corre bem, quando se tenta alterar alguma  
coisa e executar novamente, dá um erro de DBI:

DBIx::Class::ResultSet::update_or_create(): DBI Exception:  
DBD::mysql::st execute failed: Duplicate entry '293874' for key 1 [for  
Statement "INSERT INTO Links_relacionados ( id, id_servico, nome, url)  
VALUES ( ?, ?, ?, ? )" with ParamValues: 0='293874', 1='6969', 2='ola  
maria', 3='http://um_url_qq']

O comportamento do update_or_create não se deveria estar a propagar  
pelas tabelas relacionadas?

Alguém tem ideia do que é que pode estar a acontecer aqui?


[]'s

Nélio

From cromo.jml em gmail.com  Thu Apr 16 07:03:36 2009
From: cromo.jml em gmail.com (=?ISO-8859-1?Q?M=E1rcio_Vitor?=)
Date: Thu, 16 Apr 2009 11:03:36 -0300
Subject: [Cascavel-pm]
	=?iso-8859-1?q?DBIx=3A=3AClass_Inser=E7=E3o_em_tabe?=
	=?iso-8859-1?q?las_relacionadas?=
In-Reply-To: <121583B6-05E9-47B4-B76D-97331A671E94@sapo.pt>
References: <121583B6-05E9-47B4-B76D-97331A671E94@sapo.pt>
Message-ID: <3530b8ce0904160703s3906d046i1290d60ce374a5f2@mail.gmail.com>

Nélio,

As tabelas estão criadas no banco com o Cascade?

Não sei como o Dbix Class lida com isto, mas de repente o mysql já inseriu e
o dbix-class tá tentando inserir novamente.

Márcio Vitor

2009/4/16 Nélio Nunes <nelio.nunes em sapo.pt>

> Caros,
>
> Ando aqui com um problema bicudo em que os ninjas do DBIx::Class poderão me
> ajudar, espero:
>
> Tenho 2 tabelas, uma principal, outra secundaria, com uma relação one to
> many de uma para a outra.
>
> a tabela principal é qq coisa deste género: (output do show create)
>
> CREATE TABLE `Servicos` (
>  `id` int(11) NOT NULL,
>  `semaforo` varchar(255) NOT NULL,
>   (...)
>  PRIMARY KEY  (`id`)
> ) ENGINE=InnoDB DEFAULT CHARSET=utf8
>
> a tabela secundária é isto:
>
> CREATE TABLE `Links_relacionados` (
>  `id` int(11) NOT NULL,
>  `nome` varchar(255) NOT NULL,
>  `url` varchar(255) NOT NULL,
>  `id_servico` int(11) NOT NULL,
>  PRIMARY KEY  (`id`),
>  KEY `id_servico` (`id_servico`),
>  CONSTRAINT `servicos_fk` FOREIGN KEY (`id_servico`) REFERENCES `Servicos`
> (`id`) ON DELETE CASCADE ON UPDATE CASCADE
> ) ENGINE=InnoDB DEFAULT CHARSET=utf8
>
>
> nas classes DBIx relativas ás duas tabelas, tenho o seguinte:
>
> package SAPO::Servicos;
> (...)
> __PACKAGE__->set_primary_key("id");
> __PACKAGE__->has_many(
>  "links_relacionado",
>  "SAPO::LinksRelacionados",
>  { "foreign.id_servico" => "self.id" },
> );
>
>
> package SAPO::LinksRelacionados;
> (...)
> __PACKAGE__->set_primary_key("id");
> __PACKAGE__->belongs_to("id_servico", "SAPO::Servicos", { id =>
> "id_servico" });
>
> Agora, quando é que isto estoura:
>
> Quando se tenta fazer um create_or_update com a seguinte estrutura:
>
> my $servicox = {
>    id                  => "6969",
>    semaforo            => "zemaria",
>    logotipo_servico    => "logotipo.gif",
>    link_servico        => "http://um_link_qq",
>    url_feed_rss        => "http://um_rss_qq",
>    title               => "da-lhe duro",
>    semaforo_destacado  => 1,
>    destacar_no_servico => 1,
>    links_relacionado   => [
>        { id => '293874', nome => "ola maria", url => "http://um_url_qq" },
>        { id => '293875', nome => "ola maria", url => "http://um_url_qq" }
>    ],
>
> };
>
> $schema->resultset('Servicos')->update_or_create($servicox, {id =>
> "6969"});
>
> Na primeira inserção, tudo corre bem, quando se tenta alterar alguma coisa
> e executar novamente, dá um erro de DBI:
>
> DBIx::Class::ResultSet::update_or_create(): DBI Exception: DBD::mysql::st
> execute failed: Duplicate entry '293874' for key 1 [for Statement "INSERT
> INTO Links_relacionados ( id, id_servico, nome, url) VALUES ( ?, ?, ?, ? )"
> with ParamValues: 0='293874', 1='6969', 2='ola maria', 3='http://um_url_qq
> ']
>
> O comportamento do update_or_create não se deveria estar a propagar pelas
> tabelas relacionadas?
>
> Alguém tem ideia do que é que pode estar a acontecer aqui?
>
>
> []'s
>
> Nélio
> _______________________________________________
> 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/20090416/862d6bc4/attachment.html>

From reis.wallace em gmail.com  Thu Apr 16 07:16:03 2009
From: reis.wallace em gmail.com (wreis)
Date: Thu, 16 Apr 2009 11:16:03 -0300
Subject: [Cascavel-pm]
	=?utf-8?b?REJJeDo6Q2xhc3MgSW5zZXLDp8OjbyBlbSB0YWJl?=
	=?utf-8?q?las_relacionadas?=
In-Reply-To: <121583B6-05E9-47B4-B76D-97331A671E94@sapo.pt>
References: <121583B6-05E9-47B4-B76D-97331A671E94@sapo.pt>
Message-ID: <912e34190904160716m7a0c61b5i68e78e991dc5f363@mail.gmail.com>

2009/4/16 Nélio Nunes <nelio.nunes em sapo.pt>:
> Caros,
>
> $schema->resultset('Servicos')->update_or_create($servicox, {id => "6969"});

Por que você está passando este segundo hashref ({id => "6969"})?
Veja:
http://search.cpan.org/~ribasushi/DBIx-Class-0.08099_08/lib/DBIx/Class/ResultSet.pm#update_or_create

Se você não passar nenhum hashref no segundo arg, o dbic vai usar
todos os unique-constraints definidos na resultclass, inclusive a PK.

> Alguém tem ideia do que é que pode estar a acontecer aqui?

Qual a versão do dbic que você está usando?
Se não for uma versão anterior a de dev release (0.08099_08) ou
repo/trunk, tente usar uma destas últimas.

-- 
wallace reis/wreis
Shadowcat Systems Limited
http://www.shadowcat.co.uk
http://www.linkedin.com/in/wallacereis

From reis.wallace em gmail.com  Thu Apr 16 07:17:29 2009
From: reis.wallace em gmail.com (wreis)
Date: Thu, 16 Apr 2009 11:17:29 -0300
Subject: [Cascavel-pm]
	=?utf-8?b?REJJeDo6Q2xhc3MgSW5zZXLDp8OjbyBlbSB0YWJl?=
	=?utf-8?q?las_relacionadas?=
In-Reply-To: <912e34190904160716m7a0c61b5i68e78e991dc5f363@mail.gmail.com>
References: <121583B6-05E9-47B4-B76D-97331A671E94@sapo.pt>
	<912e34190904160716m7a0c61b5i68e78e991dc5f363@mail.gmail.com>
Message-ID: <912e34190904160717i65543eb2le49335425a186d00@mail.gmail.com>

2009/4/16 wreis <reis.wallace em gmail.com>:
> Qual a versão do dbic que você está usando?
> Se não for uma versão anterior a de dev release (0.08099_08) ou
> repo/trunk, tente usar uma destas últimas.

s/Se não/Se/

-- 
wallace reis/wreis
Shadowcat Systems Limited
http://www.shadowcat.co.uk
http://www.linkedin.com/in/wallacereis

From nelio.nunes em sapo.pt  Thu Apr 16 07:35:45 2009
From: nelio.nunes em sapo.pt (=?ISO-8859-1?Q?N=E9lio_Nunes?=)
Date: Thu, 16 Apr 2009 15:35:45 +0100
Subject: [Cascavel-pm]
 =?iso-8859-1?q?DBIx=3A=3AClass_Inser=E7=E3o_em_tabe?=
 =?iso-8859-1?q?las_relacionadas?=
In-Reply-To: <912e34190904160716m7a0c61b5i68e78e991dc5f363@mail.gmail.com>
References: <121583B6-05E9-47B4-B76D-97331A671E94@sapo.pt>
	<912e34190904160716m7a0c61b5i68e78e991dc5f363@mail.gmail.com>
Message-ID: <9250DDD9-3E40-43B9-AB78-3B1D6DEE2427@sapo.pt>


On 2009/04/16, at 15:16, wreis wrote:

> 2009/4/16 Nélio Nunes <nelio.nunes em sapo.pt>:
>> Caros,
>>
>> $schema->resultset('Servicos')->update_or_create($servicox, {id =>  
>> "6969"});
>
> Por que você está passando este segundo hashref ({id => "6969"})?
> Veja:
> http://search.cpan.org/~ribasushi/DBIx-Class-0.08099_08/lib/DBIx/Class/ResultSet.pm#update_or_create
>
> Se você não passar nenhum hashref no segundo arg, o dbic vai usar
> todos os unique-constraints definidos na resultclass, inclusive a PK.
>

Estou a passar o segundo hashref por sugestão do pessoal do #sp-pm  
ontem só pra teste. Não tem diferença ter esse hashref ou não ter.


>> Alguém tem ideia do que é que pode estar a acontecer aqui?
>
> Qual a versão do dbic que você está usando?
> Se não for uma versão anterior a de dev release (0.08099_08) ou
> repo/trunk, tente usar uma destas últimas.
>

a versão do DBIx::Class que estou a usar é a 0.08013. É a ultima que  
está no CPAN, posso tentar ver se instalo essa de dev a ver se funciona.

> -- 
> wallace reis/wreis
> Shadowcat Systems Limited
> http://www.shadowcat.co.uk
> http://www.linkedin.com/in/wallacereis
> _______________________________________________
> Cascavel-pm mailing list
> Cascavel-pm em pm.org
> http://mail.pm.org/mailman/listinfo/cascavel-pm


From reis.wallace em gmail.com  Thu Apr 16 07:46:06 2009
From: reis.wallace em gmail.com (wreis)
Date: Thu, 16 Apr 2009 11:46:06 -0300
Subject: [Cascavel-pm]
	=?utf-8?b?REJJeDo6Q2xhc3MgSW5zZXLDp8OjbyBlbSB0YWJl?=
	=?utf-8?q?las_relacionadas?=
In-Reply-To: <9250DDD9-3E40-43B9-AB78-3B1D6DEE2427@sapo.pt>
References: <121583B6-05E9-47B4-B76D-97331A671E94@sapo.pt>
	<912e34190904160716m7a0c61b5i68e78e991dc5f363@mail.gmail.com>
	<9250DDD9-3E40-43B9-AB78-3B1D6DEE2427@sapo.pt>
Message-ID: <912e34190904160746x4eb3c56ds56f963b5127388dd@mail.gmail.com>

2009/4/16 Nélio Nunes <nelio.nunes em sapo.pt>:
> Estou a passar o segundo hashref por sugestão do pessoal do #sp-pm ontem só
> pra teste. Não tem diferença ter esse hashref ou não ter.

Tem diferença se você usá-lo corretamente. ;)

-- 
wallace reis/wreis
Shadowcat Systems Limited
http://www.shadowcat.co.uk
http://www.linkedin.com/in/wallacereis

From nelio.nunes em sapo.pt  Thu Apr 16 07:55:27 2009
From: nelio.nunes em sapo.pt (=?ISO-8859-1?Q?N=E9lio_Nunes?=)
Date: Thu, 16 Apr 2009 15:55:27 +0100
Subject: [Cascavel-pm]
 =?iso-8859-1?q?DBIx=3A=3AClass_Inser=E7=E3o_em_tabe?=
 =?iso-8859-1?q?las_relacionadas?=
In-Reply-To: <912e34190904160746x4eb3c56ds56f963b5127388dd@mail.gmail.com>
References: <121583B6-05E9-47B4-B76D-97331A671E94@sapo.pt>	<912e34190904160716m7a0c61b5i68e78e991dc5f363@mail.gmail.com>	<9250DDD9-3E40-43B9-AB78-3B1D6DEE2427@sapo.pt>
	<912e34190904160746x4eb3c56ds56f963b5127388dd@mail.gmail.com>
Message-ID: <BCD149A4-C4F1-4792-A78C-ED0B8A1AC4F8@sapo.pt>

wreis wrote:
> 2009/4/16 Nélio Nunes <nelio.nunes em sapo.pt>:
>
>> Estou a passar o segundo hashref por sugestão do pessoal do #sp-pm  
>> ontem só
>> pra teste. Não tem diferença ter esse hashref ou não ter.
>>
>
> Tem diferença se você usá-lo corretamente. ;)
>
>
Ahahhaha, indeed!

Só agora topei a asneira, vou tentar!


From zanottors em gmail.com  Fri Apr 17 19:55:00 2009
From: zanottors em gmail.com (Ricardo Zanotto Zaniol)
Date: Fri, 17 Apr 2009 23:55:00 -0300
Subject: [Cascavel-pm] SELECT + WHERE com numero = erro
Message-ID: <797fce390904171955h1b88d55es1c0a18119dda1d1d@mail.gmail.com>

Olá pessoal

Estou utilizando a versão 5.10 do PERL.

Meu problema é o seguinte, no script abaixo não funciona o WHERE com campo
número, (não mostra nenhum erro, simplesmente "trava") se eu modificar o
select filtrando por um campo string exemplo WHERE nome = 'nome' ai
funciona, alguém sabe como resolver isso ?

use DBI;

    $dsn = "dbi:mysqlPP:database=$database;host=$hostname";
    $dbh = DBI->connect($dsn, $user, $password);

    $sth = $dbh->prepare(qq{SELECT * FROM <tabela> WHERE id = 1) ;
    $sth->execute() ;
    while (my $ref = $sth->fetchrow_arrayref()) {
       print $ref->[0];
    }
    $sth->finish;


Obrigado
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: <http://mail.pm.org/pipermail/cascavel-pm/attachments/20090417/a4ebc901/attachment.html>

From nferraz em gmail.com  Sat Apr 18 02:02:27 2009
From: nferraz em gmail.com (Nelson Ferraz)
Date: Sat, 18 Apr 2009 11:02:27 +0200
Subject: [Cascavel-pm] SELECT + WHERE com numero = erro
In-Reply-To: <797fce390904171955h1b88d55es1c0a18119dda1d1d@mail.gmail.com>
References: <797fce390904171955h1b88d55es1c0a18119dda1d1d@mail.gmail.com>
Message-ID: <604cec170904180202g639e66f3qae7c75c25c94fb93@mail.gmail.com>

2009/4/18 Ricardo Zanotto Zaniol <zanottors em gmail.com>:
> Olá pessoal
>
> Estou utilizando a versão 5.10 do PERL.
>
> Meu problema é o seguinte, no script abaixo não funciona o WHERE com campo
> número, (não mostra nenhum erro, simplesmente "trava") se eu modificar o
> select filtrando por um campo string exemplo WHERE nome = 'nome' ai
> funciona, alguém sabe como resolver isso ?
>
> use DBI;
>
>     $dsn = "dbi:mysqlPP:database=$database;host=$hostname";
>     $dbh = DBI->connect($dsn, $user, $password);
>
>     $sth = $dbh->prepare(qq{SELECT * FROM <tabela> WHERE id = 1) ;
>     $sth->execute() ;
>     while (my $ref = $sth->fetchrow_arrayref()) {
>        print $ref->[0];
>     }
>     $sth->finish;

Ricardo,

Antes de pedir ajuda à lista, comece por ajudar a si mesmo.

No exemplo acima, existe um erro óbvio na linha:

     $sth = $dbh->prepare(qq{SELECT * FROM <tabela> WHERE id = 1) ;

Você esqueceu de fechar o "qq{".

Por favor, coloque "use strict" e "use warnings" no seu programa, e
faça um teste antes de mandar pra lista.

[]s

Nelson

From zanottors em gmail.com  Sat Apr 18 11:10:24 2009
From: zanottors em gmail.com (Ricardo Zanotto Zaniol)
Date: Sat, 18 Apr 2009 15:10:24 -0300
Subject: [Cascavel-pm] SELECT + WHERE com numero = erro
In-Reply-To: <604cec170904180202g639e66f3qae7c75c25c94fb93@mail.gmail.com>
References: <797fce390904171955h1b88d55es1c0a18119dda1d1d@mail.gmail.com>
	<604cec170904180202g639e66f3qae7c75c25c94fb93@mail.gmail.com>
Message-ID: <797fce390904181110g5dccc3d8wfe4d9e3d0aef260f@mail.gmail.com>

Ola Nelson Ferraz

Seguinte, se você não quer ajudar pelo menos não atrapalha (não precisa
responder), o exemplo que mandei pra lista, foi uma adaptação, para que,
quem leia possa entender o problema (que não foi o seu caso), que o problema
não esta na construção do comando e sim da forma como ele é passado para a
funcao. "SELECT * FROM <tabela> WHERE <atributo INT> = 1". Realmente a linha
está errada mas se colocar da maneira certa o problema persiste, já procurei
pela net mas os exemplos são com um ponto de interrogação "?". Portanto eu
peço a quem já passou por essa situação ou quem realmente esteja interessado
em ajudar que traga uma solução para o problema.

Obrigado a todos e desculpem se fui mal entendido.

2009/4/18 Nelson Ferraz <nferraz em gmail.com>

> 2009/4/18 Ricardo Zanotto Zaniol <zanottors em gmail.com>:
>  > Olá pessoal
> >
> > Estou utilizando a versão 5.10 do PERL.
> >
> > Meu problema é o seguinte, no script abaixo não funciona o WHERE com
> campo
> > número, (não mostra nenhum erro, simplesmente "trava") se eu modificar o
> > select filtrando por um campo string exemplo WHERE nome = 'nome' ai
> > funciona, alguém sabe como resolver isso ?
> >
> > use DBI;
> >
> >     $dsn = "dbi:mysqlPP:database=$database;host=$hostname";
> >     $dbh = DBI->connect($dsn, $user, $password);
> >
> >     $sth = $dbh->prepare(qq{SELECT * FROM <tabela> WHERE id = 1) ;
> >     $sth->execute() ;
> >     while (my $ref = $sth->fetchrow_arrayref()) {
> >        print $ref->[0];
> >     }
> >     $sth->finish;
>
> Ricardo,
>
> Antes de pedir ajuda à lista, comece por ajudar a si mesmo.
>
> No exemplo acima, existe um erro óbvio na linha:
>
>     $sth = $dbh->prepare(qq{SELECT * FROM <tabela> WHERE id = 1) ;
>
> Você esqueceu de fechar o "qq{".
>
> Por favor, coloque "use strict" e "use warnings" no seu programa, e
> faça um teste antes de mandar pra lista.
>
> []s
>
> Nelson
> _______________________________________________
> 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/20090418/fe3a5a3f/attachment.html>

From nferraz em gmail.com  Sat Apr 18 11:21:09 2009
From: nferraz em gmail.com (Nelson Ferraz)
Date: Sat, 18 Apr 2009 20:21:09 +0200
Subject: [Cascavel-pm] SELECT + WHERE com numero = erro
In-Reply-To: <797fce390904181110g5dccc3d8wfe4d9e3d0aef260f@mail.gmail.com>
References: <797fce390904171955h1b88d55es1c0a18119dda1d1d@mail.gmail.com>
	<604cec170904180202g639e66f3qae7c75c25c94fb93@mail.gmail.com>
	<797fce390904181110g5dccc3d8wfe4d9e3d0aef260f@mail.gmail.com>
Message-ID: <604cec170904181121p2ab23ca7l8eb5fac598d1ce6b@mail.gmail.com>

> Seguinte, se você não quer ajudar pelo menos não atrapalha (não precisa
> responder), o exemplo que mandei pra lista, foi uma adaptação

Da próxima vez que você for mandar uma "adaptação" pra lista,
verifique se ela está correta, caso contrário vamos encontrar vários
problemas antes de poder te ajudar.

E apesar de você não ter conseguido enxergar uma tentativa de
ajudá-lo, volto a repetir: utilize "strict" e "warnings", pois isso
irá ajudá-lo a identificar um monte de erros básicos.

"Comece por ajudar a si mesmo."

From gabriel.vieira em gmail.com  Sat Apr 18 12:33:20 2009
From: gabriel.vieira em gmail.com (Gabriel Vieira)
Date: Sat, 18 Apr 2009 16:33:20 -0300
Subject: [Cascavel-pm] SELECT + WHERE com numero = erro
In-Reply-To: <797fce390904181110g5dccc3d8wfe4d9e3d0aef260f@mail.gmail.com>
References: <797fce390904171955h1b88d55es1c0a18119dda1d1d@mail.gmail.com>
	<604cec170904180202g639e66f3qae7c75c25c94fb93@mail.gmail.com>
	<797fce390904181110g5dccc3d8wfe4d9e3d0aef260f@mail.gmail.com>
Message-ID: <83d8367f0904181233q624f6330j39825de32e925409@mail.gmail.com>

2009/4/18 Ricardo Zanotto Zaniol <zanottors em gmail.com>:
> Ola Nelson Ferraz
>
> Seguinte, se você não quer ajudar pelo menos não atrapalha (não precisa
> responder), o exemplo que mandei pra lista, foi uma adaptação, para que,

Ihh... o carinha te dá a melhor dica e vocês reponde assim? Tá mal em...

{Ricardo Zanotto Zaniol}--

> quem leia possa entender o problema (que não foi o seu caso), que o problema
> não esta na construção do comando e sim da forma como ele é passado para a
> funcao. "SELECT * FROM <tabela> WHERE <atributo INT> = 1". Realmente a linha
> está errada mas se colocar da maneira certa o problema persiste, já procurei
> pela net mas os exemplos são com um ponto de interrogação "?". Portanto eu
> peço a quem já passou por essa situação ou quem realmente esteja interessado
> em ajudar que traga uma solução para o problema.
>
> Obrigado a todos e desculpem se fui mal entendido.
>

O que é "trava"? Quantos registros deveriam ser retornados? Você tem
acesso direto ao banco? Já testou executar a consulta diretamente
nele?


-- 
Gabriel Vieira

From acid06 em gmail.com  Sat Apr 18 20:49:39 2009
From: acid06 em gmail.com (Nilson Santos Figueiredo Jr.)
Date: Sun, 19 Apr 2009 00:49:39 -0300
Subject: [Cascavel-pm] SELECT + WHERE com numero = erro
In-Reply-To: <797fce390904181110g5dccc3d8wfe4d9e3d0aef260f@mail.gmail.com>
References: <797fce390904171955h1b88d55es1c0a18119dda1d1d@mail.gmail.com>
	<604cec170904180202g639e66f3qae7c75c25c94fb93@mail.gmail.com>
	<797fce390904181110g5dccc3d8wfe4d9e3d0aef260f@mail.gmail.com>
Message-ID: <9a08c9b40904182049w15141b3tf75cc57038cd6784@mail.gmail.com>

2009/4/18 Ricardo Zanotto Zaniol <zanottors em gmail.com>:
> Seguinte, se você não quer ajudar pelo menos não atrapalha (não precisa
> responder), o exemplo que mandei pra lista, foi uma adaptação, para que,
> quem leia possa entender o problema (que não foi o seu caso), que o problema
> não esta na construção do comando e sim da forma como ele é passado para a
> funcao. "SELECT * FROM <tabela> WHERE <atributo INT> = 1". Realmente a linha
> está errada mas se colocar da maneira certa o problema persiste, já procurei
> pela net mas os exemplos são com um ponto de interrogação "?". Portanto eu
> peço a quem já passou por essa situação ou quem realmente esteja interessado
> em ajudar que traga uma solução para o problema.

Com este tipo de atitude, talvez seja melhor voltar a "procurar pela
internet" mesmo.
Quem está te respondendo, está *te fazendo um favor*, não se esqueça disso.

Ele te deu o melhor conselho que um iniciante em Perl pode receber. Se
você recusou e ainda achou ruim, está começando *bem* mal.

Mais um bom conselho pra você:
http://www.catb.org/~esr/faqs/smart-questions.html

-Nilson Santos F. Jr.

From breno em rio.pm.org  Tue Apr 21 11:23:48 2009
From: breno em rio.pm.org (breno)
Date: Tue, 21 Apr 2009 15:23:48 -0300
Subject: [Cascavel-pm] Google anuncia 9 estudantes para projetos da Perl
	Foundation
Message-ID: <bbea248f0904211123p5de8d1e6j37dba96d751571e0@mail.gmail.com>

É com muito prazer que anunciamos que o Google Summer of Code 2009
começou oficialmente, e a The Perl Foundation será mentora de nove
estudantes esse ano em uma variedade de projetos, a saber:

    * Cross-platform Perl Bindings for wxWebKit
    * A prototype LLVM JIT runcore for Parrot
    * HTTP/1.1 Compliance Testing and User-Agent Development for the
Mojo Web Framework
    * Implement BPSW algorithm as a Perl 5 CPAN module,
Math::Primality with extensive test-suite
    * Decimal Arithmetic: BigInt, BigNum and BigRat for parrot
    * Refactoring Catalyst helper modules
    * Perl 6 end-user documentation tools
    * SQL::Translator rewrite
    * Multimethods for SMOP

Mais detalhes sobre cada projeto podem ser vistos em [1]. Caso desejem
manter-se informados, assinem o feed RSS[2]. Se quiserem se envolver
um pouco mais, entrem no #soc-help em irc.perl.org e/ou assinem a
lista de estudantes tpf-gsoc-students[3].

Obrigado a todos que se envolveram, incluindo estudantes com projetos
que não foram aceitos. Havia um número limitado de vagas e muitos
projetos bacanas não puderam entrar - projetos esses que podem ser
adaptados e polidos para concorrer às subvenções da TPF. Um
agradecimento especial a *todos* que submeteram seus projetos e, se
você não foi aceito este ano, pode implementar seu projeto e tornar-se
parte da comunidade mesmo assim, sem ser pago. Ninguém morde :-)

Agradecimentos especiais vão para o Jonathan Leto, o grande
responsável da TPF com o Google e sem o qual nada disso teria
acontecido. E também para o Daniel Ruoso, que está fazendo um
excelente trabalho e é o mentor do último projeto (SMOP).

[]s

-b

[1] http://leto.net/dukeleto.pl/2009/04/google-announces-nine-students-in-gsoc2009-with-the-perl-fou.html
[2] http://leto.net/dukeleto.pl/atom.xml
[3] http://groups.google.com/group/tpf-gsoc-students

From breno em rio.pm.org  Tue Apr 21 12:23:33 2009
From: breno em rio.pm.org (breno)
Date: Tue, 21 Apr 2009 16:23:33 -0300
Subject: [Cascavel-pm] YAPC::SA 2009
Message-ID: <bbea248f0904211223j40830f33na7a3238735e0093e@mail.gmail.com>

Prezados,

gostaria de convidar a todos mais uma vez a participarem do YAPC::SA
2009, que acontecerá de 24 a 27 de junho dentro do FISL - Fórum
Internacional de Software Livre.

http://www.perl.org.br/YAPC/SA2009/

Os YAPCs (Yet Another Perl Conference) são eventos técnicos
tradicionais da comunidade Perl em todo o mundo, em que profissionais,
entusiastas e curiosos podem se encontrar e trocar experiências sobre
a linguagem, frameworks, projetos, problemas e soluções. A edição da
América do Sul (YAPC::SA) não será diferente, e sem dúvida trará
grande valor pessoal e profissional a todos os que irão apresentar ou
assistir.

Falando em apresentar, submetam suas palestras! Vocês podem ou
inscrever suas palestras diretamente pelo FISL[1] - lembrando que esse
ano Perl será um dos temários principais do evento - ou, caso queira
falar sobre algo muito específico e/ou queiram um público mais seleto,
inscrevam suas palestras especificamente para o YAPC, realizados no
stand da comunidade Perl dentro do FISL ou em sala separada lá na
PUC-RS (em negociação).

Apresentações/Hackathons/Lightning Talks são muito bem-vindas!
Inscrevam-se já, colocando suas propostas na área de programação[2] da
nossa wiki, ou mandando email diretamente para mim.

Mas, se quiserem apresentar dentro da grade do FISL, fiquem atentos! O
prazo de submissão de propostas termina agora dia 26 de abril
(domingo). Ouviram, né?

*********************
26 de abril
*********************

Ah, dei uma guaribada nos textos do site e atualizei todo o conteúdo,
mas sintam-se à vontade para contribuir com mais conteúdo ou novas
idéias (é uma wiki :-)

Quem quiser divulgar o evento (obrigado!), o (Gabriel Vieira)++ fez
uma série de banners[3] que podem ser colocados em sites, blogs e
derivados.


É isso. Submetam suas propostas de palestras! E qualquer dúvida podem
me procurar off-list.

Nos vemos lá!!!


1.  http://fisl.softwarelivre.org/10/www/chamada-de-trabalhos
2.  http://www.perl.org.br/YAPC/SA2009/Programacao
3.  http://www.perl.org.br/YAPC/SA2009/Divulgacao

From gabriel.vieira em gmail.com  Tue Apr 21 20:55:07 2009
From: gabriel.vieira em gmail.com (Gabriel Vieira)
Date: Wed, 22 Apr 2009 00:55:07 -0300
Subject: [Cascavel-pm] Google anuncia 9 estudantes para projetos da Perl
	Foundation
In-Reply-To: <bbea248f0904211123p5de8d1e6j37dba96d751571e0@mail.gmail.com>
References: <bbea248f0904211123p5de8d1e6j37dba96d751571e0@mail.gmail.com>
Message-ID: <83d8367f0904212055i150b4d09l648b642cfd6ed12b@mail.gmail.com>

Ruoso++

Aproveitando, tenho uma microentrevista que fiz com ele (um bate-papo
na verdade) que se transformará em um mini artigo sobre SMOP, ou algo
do gênero,, se tiver algum voluntário para me ajudar, agradeço (to
meio corrido esses dias).

Abraços,

2009/4/21 breno <breno em rio.pm.org>:
> É com muito prazer que anunciamos que o Google Summer of Code 2009
> começou oficialmente, e a The Perl Foundation será mentora de nove
> estudantes esse ano em uma variedade de projetos, a saber:
>
>    * Cross-platform Perl Bindings for wxWebKit
>    * A prototype LLVM JIT runcore for Parrot
>    * HTTP/1.1 Compliance Testing and User-Agent Development for the
> Mojo Web Framework
>    * Implement BPSW algorithm as a Perl 5 CPAN module,
> Math::Primality with extensive test-suite
>    * Decimal Arithmetic: BigInt, BigNum and BigRat for parrot
>    * Refactoring Catalyst helper modules
>    * Perl 6 end-user documentation tools
>    * SQL::Translator rewrite
>    * Multimethods for SMOP
>
> Mais detalhes sobre cada projeto podem ser vistos em [1]. Caso desejem
> manter-se informados, assinem o feed RSS[2]. Se quiserem se envolver
> um pouco mais, entrem no #soc-help em irc.perl.org e/ou assinem a
> lista de estudantes tpf-gsoc-students[3].
>
> Obrigado a todos que se envolveram, incluindo estudantes com projetos
> que não foram aceitos. Havia um número limitado de vagas e muitos
> projetos bacanas não puderam entrar - projetos esses que podem ser
> adaptados e polidos para concorrer às subvenções da TPF. Um
> agradecimento especial a *todos* que submeteram seus projetos e, se
> você não foi aceito este ano, pode implementar seu projeto e tornar-se
> parte da comunidade mesmo assim, sem ser pago. Ninguém morde :-)
>
> Agradecimentos especiais vão para o Jonathan Leto, o grande
> responsável da TPF com o Google e sem o qual nada disso teria
> acontecido. E também para o Daniel Ruoso, que está fazendo um
> excelente trabalho e é o mentor do último projeto (SMOP).
>
> []s
>
> -b
>
> [1] http://leto.net/dukeleto.pl/2009/04/google-announces-nine-students-in-gsoc2009-with-the-perl-fou.html
> [2] http://leto.net/dukeleto.pl/atom.xml
> [3] http://groups.google.com/group/tpf-gsoc-students
> _______________________________________________
> Cascavel-pm mailing list
> Cascavel-pm em pm.org
> http://mail.pm.org/mailman/listinfo/cascavel-pm
>



-- 
Gabriel Vieira

From nferraz em gmail.com  Wed Apr 22 00:53:29 2009
From: nferraz em gmail.com (Nelson Ferraz)
Date: Wed, 22 Apr 2009 09:53:29 +0200
Subject: [Cascavel-pm] Google anuncia 9 estudantes para projetos da Perl
	Foundation
In-Reply-To: <83d8367f0904212055i150b4d09l648b642cfd6ed12b@mail.gmail.com>
References: <bbea248f0904211123p5de8d1e6j37dba96d751571e0@mail.gmail.com>
	<83d8367f0904212055i150b4d09l648b642cfd6ed12b@mail.gmail.com>
Message-ID: <604cec170904220053q724d98bawd62ee7a2fbca2898@mail.gmail.com>

> Aproveitando, tenho uma microentrevista que fiz com ele (um bate-papo
> na verdade) que se transformará em um mini artigo sobre SMOP, ou algo
> do gênero,, se tiver algum voluntário para me ajudar, agradeço (to
> meio corrido esses dias).

Hm... por que não publica em forma de entrevista mesmo?

From gabriel.vieira em gmail.com  Wed Apr 22 05:08:38 2009
From: gabriel.vieira em gmail.com (Gabriel Vieira)
Date: Wed, 22 Apr 2009 09:08:38 -0300
Subject: [Cascavel-pm] Google anuncia 9 estudantes para projetos da Perl
	Foundation
In-Reply-To: <604cec170904220053q724d98bawd62ee7a2fbca2898@mail.gmail.com>
References: <bbea248f0904211123p5de8d1e6j37dba96d751571e0@mail.gmail.com>
	<83d8367f0904212055i150b4d09l648b642cfd6ed12b@mail.gmail.com>
	<604cec170904220053q724d98bawd62ee7a2fbca2898@mail.gmail.com>
Message-ID: <83d8367f0904220508mdbb62b8j96351fd02c660fef@mail.gmail.com>

Pode ser, mas é por que, como foi bate-papo, não tem bem estruturado,
tópicos começam, dão lugar a outros e só terminam bem depois. :)

Mas vou dar um jeito.

2009/4/22 Nelson Ferraz <nferraz em gmail.com>:
>> Aproveitando, tenho uma microentrevista que fiz com ele (um bate-papo
>> na verdade) que se transformará em um mini artigo sobre SMOP, ou algo
>> do gênero,, se tiver algum voluntário para me ajudar, agradeço (to
>> meio corrido esses dias).
>
> Hm... por que não publica em forma de entrevista mesmo?
> _______________________________________________
> Cascavel-pm mailing list
> Cascavel-pm em pm.org
> http://mail.pm.org/mailman/listinfo/cascavel-pm
>



-- 
Gabriel Vieira

From jasenger em gmail.com  Wed Apr 22 16:03:27 2009
From: jasenger em gmail.com (Jorge Augusto Senger)
Date: Wed, 22 Apr 2009 20:03:27 -0300
Subject: [Cascavel-pm] Ajuda com Catalyst e callback do HTML::FormFu
Message-ID: <d1051ca00904221603n6446991eh734e358877cadae5@mail.gmail.com>

Pessoal, tudo bem?

Na minha aplicação Catalyst estou utilizando o HTML::FormFu para processar
formulários e me deparei com um problema na hora de validar um dos campos.
Inseri um callback nas constraints do campo, conforme abaixo:

_YAML_
    elements:
        - type: Text
          name: login
          label: Login
          attributes:
            title: Login de acesso ao sistema
            size: 25
          constraints:
            type: Required
            message: 'Campo obrigatório: '
            type: Callback
            callback: "teste::Controller::auth::verificaLogin"
            message: 'Login em uso'
_YAML_

No mesmo Controller que processa o formulário (auth.pm) criei um método para
ser usado pelo callback (verificaLogin).
Minha idéia para este método é conectar ao banco e verificar se existe
usuário cadastrado com o login informado no formulário. Gostaria de saber se
é possível este método acessar o objeto de contexto da aplicação para
realizar a busca no banco.
Pelo que li na documentação do HTML::FormFu, o callback chama uma subrotina
e não um método, seria esse meu problema?

Obrigado!


Jorge Augusto Senger
jasenger (at) gmail.com

use Perl;
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: <http://mail.pm.org/pipermail/cascavel-pm/attachments/20090422/eb9b2e46/attachment.html>

From acid06 em gmail.com  Thu Apr 23 11:55:16 2009
From: acid06 em gmail.com (Nilson Santos Figueiredo Jr.)
Date: Thu, 23 Apr 2009 15:55:16 -0300
Subject: [Cascavel-pm] Ajuda com Catalyst e callback do HTML::FormFu
In-Reply-To: <d1051ca00904221603n6446991eh734e358877cadae5@mail.gmail.com>
References: <d1051ca00904221603n6446991eh734e358877cadae5@mail.gmail.com>
Message-ID: <9a08c9b40904231155m7b948303hba12c04c3c9cc0a2@mail.gmail.com>

2009/4/22 Jorge Augusto Senger <jasenger em gmail.com>:
> No mesmo Controller que processa o formulário (auth.pm) criei um método para
> ser usado pelo callback (verificaLogin).
> Minha idéia para este método é conectar ao banco e verificar se existe
> usuário cadastrado com o login informado no formulário. Gostaria de saber se
> é possível este método acessar o objeto de contexto da aplicação para
> realizar a busca no banco.
> Pelo que li na documentação do HTML::FormFu, o callback chama uma subrotina
> e não um método, seria esse meu problema?

Eu não sei muito sobre o HTML::FormFu, apesar de já tê-lo utilizá-lo.
Pra ser sincero, isso nem é um bom conselho, mas eu normalmente me
sinto "desconfortável" usando essas bibliotecas que auxiliam na
validação de formulários (mas, de fato, é muito mais fácil manter
código dos outros que foi escrita utilizando-as, por isso é uma boa
prática utilizá-las).

Enfim, uma maneira de fazer isso seria, ao invés de especificar a
callback no arquivo de configuração, adicionar a constraint ao
formulário depois.

Lá no seu controller, aonde a validação vai ocorrer, faça algo assim:

  sub my_action : Local FormConfig {
    my ( $self, $c ) = @_;
    my $form = $c->form;
    my $field = $form->get_field( { name => 'login' } );
    $field->constraint( {
        type => 'Callback',
        callback => sub {
            $c->forward( '/auth/verifica_login', [ @_ ] );
        }
    });
    $form->process;

    # seu código continua aqui

  }

Talvez exista uma solução melhor... mas eu sinceramente não sei.
Apesar de não ter testado, esta solução deve funcionar pro seu caso
(excluindo algum erro de compilação).

-Nilson Santos F. Jr.

From invite+zrvdl6pz em facebookmail.com  Sat Apr 25 20:27:49 2009
From: invite+zrvdl6pz em facebookmail.com (=?UTF-8?B?RmzDoXZpbyBCZWk=?=)
Date: Sat, 25 Apr 2009 20:27:49 -0700
Subject: [Cascavel-pm] Convite especial para entrar no Facebook
Message-ID: <3f1259807fe59a7688ee00d3b40cb79c@localhost.localdomain>

Olá, Cascavel,

Criei um perfil no Facebook com minhas fotos, vídeos e eventos e quero adicionar-lhe aos amigos para que você possa ver meu perfil. Primeiro, você precisa cadastrar-se no Facebook! Uma vez cadastrado, você também poderá criar o seu próprio perfil.

Atenciosamente,
Flávio

Para se cadastrar no Facebook, clique no link abaixo:
http://www.facebook.com/p.php?i=663442181&k=R4M442V64Y4M5CDBRGX2UU&r


cascavel-pm em pm.org foi convidado a participar do Facebook por Flávio Bei. Caso não deseje receber este tipo de e-mail da Facebook no futuro, clique no link a seguir para cancelar o recebimento. 
http://www.facebook.com/o.php?k=296780&u=1102357741&mid=5dd1e3G41b4a4edG0G8
Os escritórios do Facebook estão localizados em 156 University Ave., Palo Alto, CA 94301.

-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: <http://mail.pm.org/pipermail/cascavel-pm/attachments/20090425/190b4c39/attachment.html>

From ricardo_filipo em yahoo.com.br  Sun Apr 26 15:23:28 2009
From: ricardo_filipo em yahoo.com.br (Ricardo Filipo)
Date: Sun, 26 Apr 2009 15:23:28 -0700 (PDT)
Subject: [Cascavel-pm] =?iso-8859-1?q?=28OT=29_CONISLI=2E_J=E1_foi_Boas_vi?=
	=?iso-8859-1?q?ndas?=
In-Reply-To: <672426620904261127u65782366ibc2b365b64d3a7b5@mail.gmail.com>
References: <f40026c0904261036g75e14c1cs7d3cc7bc5e50d5de@mail.gmail.com>
	<214823ca0904261054vcfad470y75997c356ce281ae@mail.gmail.com>
	<672426620904261127u65782366ibc2b365b64d3a7b5@mail.gmail.com>
Message-ID: <468810.53594.qm@web33004.mail.mud.yahoo.com>

ai, que saudade do Rio...
aqui não rola estas coias ... bem, rolam outras ..

Já estamos preparando o CONISLI, aqui em SP. Teremos YAPC?
Os perl mongers que se interessarem que se manifestem!

Um abração! Pessoal!

Até algum ES[x]!

Filipo




________________________________
De: Samir Cury <rimasy em gmail.com>
Para: Perl Mongers Rio de Janeiro <rio-pm em pm.org>
Enviadas: Domingo, 26 de Abril de 2009 15:27:58
Assunto: Re: [Rio-pm] Boas vindas

Bem vindo Antonio!

ESX quinta que vem?

Ontem depois do FLISOL eu, Fernando e Ramoni (esqueci o nome), bebemos um pouco no loreninha e esticamos no bigode, ah, depois eu ainda comi uma pizza da panq's house (era isso?) e galera, muito melhor que a parme, que pelo mesmo preço não dá bebida e 4x MENOS pizza hahhahaa.

ão ão ão, abaixo ao pastelão!

aí, tava pensando, de repente o próprio ESX pode ser no outback! (geral levando torcida na mochila) => me falaram que lá o refil de refri é 8,7 reais e vc bebe até não aguentar mais!

Rolou um fato engraçado no FLISOL mas agora não dá mais tempo de contar, to saindo, na volta eu falo

Abraços!


2009/4/26 Daniel de Oliveira Mantovani <daniel.oliveira.mantovani em gmail.com>


Bem vindo!!!!!


2009/4/26 Fernando Oliveira <fernandocorrea em gmail.com>

Deem as boas vindas ao Antonio q é o mais novo inscrito na lista!
Antonio, seja bem vindo! E desde já se prepare, pois temos ESs
(Encontros Sociais) toda 2a quinta-feira do mes.

-- 
Just another Perl Hacker,
Fernando (SmokeMachine)
http://perl-e.org

_______________________________________________
Rio-pm mailing list
Rio-pm em pm.org
http://mail.pm.org/mailman/listinfo/rio-pm



-- 
http://mantovanihouse.blogspot.com/
This is my poney:
-------(\_------------_/)-----------
-------)--(----------)--(-----------
------(----(---------)----)----------
-------)----(-------)----(-----------
-------(----(-------)----)-----------
--------\_-(\\.---.//)-_/------------
----------\)' -8--8- '(/--------------
-----------/------------\---------------
----------(--)--------(--)--------------
------------(_c__c_)----------------
----------------------------------------
perl -MLWP::Simple -le 'grep{ print $1 if /href="(http.+?)"/}split($/,get("http://www.perl.org.br"))'

_______________________________________________
Rio-pm mailing list
Rio-pm em pm.org
http://mail.pm.org/mailman/listinfo/rio-pm


      Veja quais são os assuntos do momento no Yahoo! +Buscados
http://br.maisbuscados.yahoo.com
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: <http://mail.pm.org/pipermail/cascavel-pm/attachments/20090426/4f186b99/attachment.html>

From breno em rio.pm.org  Sun Apr 26 17:16:56 2009
From: breno em rio.pm.org (breno)
Date: Sun, 26 Apr 2009 21:16:56 -0300
Subject: [Cascavel-pm]
	=?iso-8859-1?q?=5BRio-pm=5D_=28OT=29_CONISLI=2E_J?=
	=?iso-8859-1?q?=E1_foi_Boas_vindas?=
In-Reply-To: <468810.53594.qm@web33004.mail.mud.yahoo.com>
References: <f40026c0904261036g75e14c1cs7d3cc7bc5e50d5de@mail.gmail.com>
	<214823ca0904261054vcfad470y75997c356ce281ae@mail.gmail.com>
	<672426620904261127u65782366ibc2b365b64d3a7b5@mail.gmail.com>
	<468810.53594.qm@web33004.mail.mud.yahoo.com>
Message-ID: <bbea248f0904261716n2934e81j46157d9c86dadb96@mail.gmail.com>

Salve Filipo!

Então, a idéia é variarmos um pouco e fazermos do YAPC::Brasil um
evento móvel. Como o do ano passado (e retrasado) foram em sampa, acho
que seria legal se o desse ano fosse no Rio (não quer dizer que outras
regionais tb não possam se candidatar).

Mas o CONISLI não passará em branco, muito pelo contrário! Seria bem
legal se os monges daí organizassem um SPPW (São Paulo Perl Workshop)
dentro do CONISLI, que tal?

Além disso, as palestras do YAPC::SA desse ano estão praticamente
vazias ainda... Ninguém vai pro FISL??? Ninguém se animou a
palestrar??? Vamos lá, pessoal! Vamos trocar informações, vamos
dividir conhecimento!

Cadastrem suas palestras aqui:

http://www.perl.org.br/YAPC/SA2009/Programacao


[]s

-b

2009/4/26 Ricardo Filipo <ricardo_filipo em yahoo.com.br>:
> ai, que saudade do Rio...
> aqui não rola estas coias ... bem, rolam outras ..
>
> Já estamos preparando o CONISLI, aqui em SP. Teremos YAPC?
> Os perl mongers que se interessarem que se manifestem!
>
> Um abração! Pessoal!
>
> Até algum ES[x]!
>
> Filipo
>
> ________________________________
> De: Samir Cury <rimasy em gmail.com>
> Para: Perl Mongers Rio de Janeiro <rio-pm em pm.org>
> Enviadas: Domingo, 26 de Abril de 2009 15:27:58
> Assunto: Re: [Rio-pm] Boas vindas
>
> Bem vindo Antonio!
>
> ESX quinta que vem?
>
> Ontem depois do FLISOL eu, Fernando e Ramoni (esqueci o nome), bebemos um
> pouco no loreninha e esticamos no bigode, ah, depois eu ainda comi uma pizza
> da panq's house (era isso?) e galera, muito melhor que a parme, que pelo
> mesmo preço não dá bebida e 4x MENOS pizza hahhahaa.
>
> ão ão ão, abaixo ao pastelão!
>
> aí, tava pensando, de repente o próprio ESX pode ser no outback! (geral
> levando torcida na mochila) => me falaram que lá o refil de refri é 8,7
> reais e vc bebe até não aguentar mais!
>
> Rolou um fato engraçado no FLISOL mas agora não dá mais tempo de contar, to
> saindo, na volta eu falo
>
> Abraços!
>
> 2009/4/26 Daniel de Oliveira Mantovani <daniel.oliveira.mantovani em gmail.com>
>>
>> Bem vindo!!!!!
>>
>> 2009/4/26 Fernando Oliveira <fernandocorrea em gmail.com>
>>>
>>> Deem as boas vindas ao Antonio q é o mais novo inscrito na lista!
>>> Antonio, seja bem vindo! E desde já se prepare, pois temos ESs
>>> (Encontros Sociais) toda 2a quinta-feira do mes.
>>>
>>> --
>>> Just another Perl Hacker,
>>> Fernando (SmokeMachine)
>>> http://perl-e.org
>>>
>>> _______________________________________________
>>> Rio-pm mailing list
>>> Rio-pm em pm.org
>>> http://mail.pm.org/mailman/listinfo/rio-pm
>>
>>
>>
>> --
>> http://mantovanihouse.blogspot.com/
>> This is my poney:
>> -------(\_------------_/)-----------
>> -------)--(----------)--(-----------
>> ------(----(---------)----)----------
>> -------)----(-------)----(-----------
>> -------(----(-------)----)-----------
>> --------\_-(\\.---.//)-_/------------
>> ----------\)' -8--8- '(/--------------
>> -----------/------------\---------------
>> ----------(--)--------(--)--------------
>> ------------(_c__c_)----------------
>> ----------------------------------------
>> perl -MLWP::Simple -le 'grep{ print $1 if
>> /href="(http.+?)"/}split($/,get("http://www.perl.org.br"))'
>>
>> _______________________________________________
>> Rio-pm mailing list
>> Rio-pm em pm.org
>> http://mail.pm.org/mailman/listinfo/rio-pm
>
>
> ________________________________
> Veja quais são os assuntos do momento no Yahoo! + Buscados: Top 10 -
> Celebridades - Música - Esportes
> _______________________________________________
> Rio-pm mailing list
> Rio-pm em pm.org
> http://mail.pm.org/mailman/listinfo/rio-pm
>

From braun.lima em gmail.com  Sun Apr 26 18:15:24 2009
From: braun.lima em gmail.com (Marco Lima)
Date: Sun, 26 Apr 2009 22:15:24 -0300
Subject: [Cascavel-pm]
	=?iso-8859-1?q?=5BRio-pm=5D_=28OT=29_CONISLI=2E_J?=
	=?iso-8859-1?q?=E1_foi_Boas_vindas?=
In-Reply-To: <bbea248f0904261716n2934e81j46157d9c86dadb96@mail.gmail.com>
References: <f40026c0904261036g75e14c1cs7d3cc7bc5e50d5de@mail.gmail.com>
	<214823ca0904261054vcfad470y75997c356ce281ae@mail.gmail.com>
	<672426620904261127u65782366ibc2b365b64d3a7b5@mail.gmail.com>
	<468810.53594.qm@web33004.mail.mud.yahoo.com>
	<bbea248f0904261716n2934e81j46157d9c86dadb96@mail.gmail.com>
Message-ID: <34a7b6860904261815k54c9a15ehdf3477cb610099be@mail.gmail.com>

Salve!

Breno, é isso ai, a idéia é que no CONISLI desse ano seja um Workshop e
organizar o YAPC::Brasil no Rio de Janeiro no final do ano. Temos que agitar
o SA, jah estamos quase lá, as plaestras do FISL jah foram submetidas, agora
tem algum espaço no comunitário e em sala extra ainda não confirmada.

2009/4/26 breno <breno em rio.pm.org>

> Salve Filipo!
>
> Então, a idéia é variarmos um pouco e fazermos do YAPC::Brasil um
> evento móvel. Como o do ano passado (e retrasado) foram em sampa, acho
> que seria legal se o desse ano fosse no Rio (não quer dizer que outras
> regionais tb não possam se candidatar).
>
> Mas o CONISLI não passará em branco, muito pelo contrário! Seria bem
> legal se os monges daí organizassem um SPPW (São Paulo Perl Workshop)
> dentro do CONISLI, que tal?
>
> Além disso, as palestras do YAPC::SA desse ano estão praticamente
> vazias ainda... Ninguém vai pro FISL??? Ninguém se animou a
> palestrar??? Vamos lá, pessoal! Vamos trocar informações, vamos
> dividir conhecimento!
>
> Cadastrem suas palestras aqui:
>
> http://www.perl.org.br/YAPC/SA2009/Programacao
>
>
> []s
>
> -b
>
> 2009/4/26 Ricardo Filipo <ricardo_filipo em yahoo.com.br>:
> > ai, que saudade do Rio...
> > aqui não rola estas coias ... bem, rolam outras ..
> >
> > Já estamos preparando o CONISLI, aqui em SP. Teremos YAPC?
> > Os perl mongers que se interessarem que se manifestem!
> >
> > Um abração! Pessoal!
> >
> > Até algum ES[x]!
> >
> > Filipo
> >
> > ________________________________
> > De: Samir Cury <rimasy em gmail.com>
> > Para: Perl Mongers Rio de Janeiro <rio-pm em pm.org>
> > Enviadas: Domingo, 26 de Abril de 2009 15:27:58
> > Assunto: Re: [Rio-pm] Boas vindas
> >
> > Bem vindo Antonio!
> >
> > ESX quinta que vem?
> >
> > Ontem depois do FLISOL eu, Fernando e Ramoni (esqueci o nome), bebemos um
> > pouco no loreninha e esticamos no bigode, ah, depois eu ainda comi uma
> pizza
> > da panq's house (era isso?) e galera, muito melhor que a parme, que pelo
> > mesmo preço não dá bebida e 4x MENOS pizza hahhahaa.
> >
> > ão ão ão, abaixo ao pastelão!
> >
> > aí, tava pensando, de repente o próprio ESX pode ser no outback! (geral
> > levando torcida na mochila) => me falaram que lá o refil de refri é 8,7
> > reais e vc bebe até não aguentar mais!
> >
> > Rolou um fato engraçado no FLISOL mas agora não dá mais tempo de contar,
> to
> > saindo, na volta eu falo
> >
> > Abraços!
> >
> > 2009/4/26 Daniel de Oliveira Mantovani <
> daniel.oliveira.mantovani em gmail.com>
> >>
> >> Bem vindo!!!!!
> >>
> >> 2009/4/26 Fernando Oliveira <fernandocorrea em gmail.com>
> >>>
> >>> Deem as boas vindas ao Antonio q é o mais novo inscrito na lista!
> >>> Antonio, seja bem vindo! E desde já se prepare, pois temos ESs
> >>> (Encontros Sociais) toda 2a quinta-feira do mes.
> >>>
> >>> --
> >>> Just another Perl Hacker,
> >>> Fernando (SmokeMachine)
> >>> http://perl-e.org
> >>>
> >>> _______________________________________________
> >>> Rio-pm mailing list
> >>> Rio-pm em pm.org
> >>> http://mail.pm.org/mailman/listinfo/rio-pm
> >>
> >>
> >>
> >> --
> >> http://mantovanihouse.blogspot.com/
> >> This is my poney:
> >> -------(\_------------_/)-----------
> >> -------)--(----------)--(-----------
> >> ------(----(---------)----)----------
> >> -------)----(-------)----(-----------
> >> -------(----(-------)----)-----------
> >> --------\_-(\\.---.//)-_/------------
> >> ----------\)' -8--8- '(/--------------
> >> -----------/------------\---------------
> >> ----------(--)--------(--)--------------
> >> ------------(_c__c_)----------------
> >> ----------------------------------------
> >> perl -MLWP::Simple -le 'grep{ print $1 if
> >> /href="(http.+?)"/}split($/,get("http://www.perl.org.br"))'
> >>
> >> _______________________________________________
> >> Rio-pm mailing list
> >> Rio-pm em pm.org
> >> http://mail.pm.org/mailman/listinfo/rio-pm
> >
> >
> > ________________________________
> > Veja quais são os assuntos do momento no Yahoo! + Buscados: Top 10 -
> > Celebridades - Música - Esportes
> > _______________________________________________
> > Rio-pm mailing list
> > Rio-pm em pm.org
> > http://mail.pm.org/mailman/listinfo/rio-pm
> >
> _______________________________________________
> Cascavel-pm mailing list
> Cascavel-pm em pm.org
> http://mail.pm.org/mailman/listinfo/cascavel-pm
>



-- 

Marco Lima
braun.lima em gmail.com

"Ter acesso ao conhecimento é um dever de todos; transmitir conhecimento é
um dever de quem tem."

"Na visão do hacker, o sentido da vida está em dedicar-se a uma paixão. Esta
paixão é, na realidade, uma atividade significativa, inspiradora e prazerosa
para o indivíduo, seja ela rotulada como "trabalho" ou como "diversão."
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: <http://mail.pm.org/pipermail/cascavel-pm/attachments/20090426/9a41392b/attachment-0001.html>

From ricardo_filipo em yahoo.com.br  Sun Apr 26 18:42:22 2009
From: ricardo_filipo em yahoo.com.br (Ricardo Filipo)
Date: Sun, 26 Apr 2009 18:42:22 -0700 (PDT)
Subject: [Cascavel-pm] =?iso-8859-1?q?Res=3A__=5BRio-pm=5D_=28OT=29_CONISL?=
 =?iso-8859-1?q?I=2E_J=E1_foi_Boas_vindas?=
In-Reply-To: <bbea248f0904261716n2934e81j46157d9c86dadb96@mail.gmail.com>
References: <f40026c0904261036g75e14c1cs7d3cc7bc5e50d5de@mail.gmail.com>
	<214823ca0904261054vcfad470y75997c356ce281ae@mail.gmail.com>
	<672426620904261127u65782366ibc2b365b64d3a7b5@mail.gmail.com>
	<468810.53594.qm@web33004.mail.mud.yahoo.com>
	<bbea248f0904261716n2934e81j46157d9c86dadb96@mail.gmail.com>
Message-ID: <851471.37193.qm@web33008.mail.mud.yahoo.com>


blz Breno!!!

Aos trabalhos!

Queridos(as) do Rio, vamos nos mover? 
O YAPC::Brasil deste ano deve ser no Rio de Janeiro!
Eu defendo que devem ser no Forum do Rio, no final do ano.

Temos um tempo ótimo pra planejar. 

Quem quer participar? Vamos iniciar a escolha dos trabalhos?
Breno, vamos inaugurar uma seleção? O q vc acha?

Abração a todos!

Filipo




----- Mensagem original ----
De: breno <breno em rio.pm.org>
Para: Perl Mongers Rio de Janeiro <rio-pm em pm.org>
Cc: Cascavel Perl Mongers <cascavel-pm em pm.org>
Enviadas: Domingo, 26 de Abril de 2009 21:16:56
Assunto: Re: [Cascavel-pm] [Rio-pm] (OT) CONISLI. Já foi Boas vindas

Salve Filipo!

Então, a idéia é variarmos um pouco e fazermos do YAPC::Brasil um
evento móvel. Como o do ano passado (e retrasado) foram em sampa, acho
que seria legal se o desse ano fosse no Rio (não quer dizer que outras
regionais tb não possam se candidatar).

Mas o CONISLI não passará em branco, muito pelo contrário! Seria bem
legal se os monges daí organizassem um SPPW (São Paulo Perl Workshop)
dentro do CONISLI, que tal?

Além disso, as palestras do YAPC::SA desse ano estão praticamente
vazias ainda... Ninguém vai pro FISL??? Ninguém se animou a
palestrar??? Vamos lá, pessoal! Vamos trocar informações, vamos
dividir conhecimento!

Cadastrem suas palestras aqui:

http://www.perl.org.br/YAPC/SA2009/Programacao


[]s

-b

2009/4/26 Ricardo Filipo <ricardo_filipo em yahoo.com.br>:
> ai, que saudade do Rio...
> aqui não rola estas coias ... bem, rolam outras ..
>
> Já estamos preparando o CONISLI, aqui em SP. Teremos YAPC?
> Os perl mongers que se interessarem que se manifestem!
>
> Um abração! Pessoal!
>
> Até algum ES[x]!
>
> Filipo



      Veja quais são os assuntos do momento no Yahoo! +Buscados
http://br.maisbuscados.yahoo.com

From jasenger em gmail.com  Mon Apr 27 13:21:24 2009
From: jasenger em gmail.com (Jorge Augusto Senger)
Date: Mon, 27 Apr 2009 17:21:24 -0300
Subject: [Cascavel-pm] Ajuda com Catalyst e callback do HTML::FormFu
In-Reply-To: <9a08c9b40904231155m7b948303hba12c04c3c9cc0a2@mail.gmail.com>
References: <d1051ca00904221603n6446991eh734e358877cadae5@mail.gmail.com>
	<9a08c9b40904231155m7b948303hba12c04c3c9cc0a2@mail.gmail.com>
Message-ID: <d1051ca00904271321t64a90931lb7f100685151a04c@mail.gmail.com>

Nilson, funcionou perfeitamente.

Muito obrigado.

Jorge Augusto Senger
jasenger (at) gmail.com

use Perl;


2009/4/23 Nilson Santos Figueiredo Jr. <acid06 em gmail.com>

> 2009/4/22 Jorge Augusto Senger <jasenger em gmail.com>:
> > No mesmo Controller que processa o formulário (auth.pm) criei um método
> para
> > ser usado pelo callback (verificaLogin).
> > Minha idéia para este método é conectar ao banco e verificar se existe
> > usuário cadastrado com o login informado no formulário. Gostaria de saber
> se
> > é possível este método acessar o objeto de contexto da aplicação para
> > realizar a busca no banco.
> > Pelo que li na documentação do HTML::FormFu, o callback chama uma
> subrotina
> > e não um método, seria esse meu problema?
>
> Eu não sei muito sobre o HTML::FormFu, apesar de já tê-lo utilizá-lo.
> Pra ser sincero, isso nem é um bom conselho, mas eu normalmente me
> sinto "desconfortável" usando essas bibliotecas que auxiliam na
> validação de formulários (mas, de fato, é muito mais fácil manter
> código dos outros que foi escrita utilizando-as, por isso é uma boa
> prática utilizá-las).
>
> Enfim, uma maneira de fazer isso seria, ao invés de especificar a
> callback no arquivo de configuração, adicionar a constraint ao
> formulário depois.
>
> Lá no seu controller, aonde a validação vai ocorrer, faça algo assim:
>
>  sub my_action : Local FormConfig {
>    my ( $self, $c ) = @_;
>    my $form = $c->form;
>    my $field = $form->get_field( { name => 'login' } );
>    $field->constraint( {
>        type => 'Callback',
>        callback => sub {
>            $c->forward( '/auth/verifica_login', [ @_ ] );
>        }
>    });
>    $form->process;
>
>    # seu código continua aqui
>
>  }
>
> Talvez exista uma solução melhor... mas eu sinceramente não sei.
> Apesar de não ter testado, esta solução deve funcionar pro seu caso
> (excluindo algum erro de compilação).
>
> -Nilson Santos F. Jr.
> _______________________________________________
> 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/20090427/7ebfb8a4/attachment.html>

From nferraz em gmail.com  Tue Apr 28 01:56:00 2009
From: nferraz em gmail.com (Nelson Ferraz)
Date: Tue, 28 Apr 2009 10:56:00 +0200
Subject: [Cascavel-pm] Fwd: [Lisbon.pm] Perl6 logo: acid trip gone bad?
In-Reply-To: <44E3D871-716E-4429-92AE-17A9BC361E78@evolui.com>
References: <44E3D871-716E-4429-92AE-17A9BC361E78@evolui.com>
Message-ID: <604cec170904280156g7045280bvb1b9ade329280d83@mail.gmail.com>

LOL


---------- Forwarded message ----------
From: Pedro Melo <melo em evolui.com>
Date: 2009/4/27
Subject: [Lisbon.pm] Perl6 logo: acid trip gone bad?
To: perl em lisbon.pm.org


Olá,

umas das propostas de Logotipo para o perl6 é esta:

http://www.wall.org/~larry/camelia.pdf

De notar o URL do autor :).

Eu gosto do conceito geral de ser um animal com a possibilidade de
meta-morfose, mas a versão actual parece o resultado de uma
experiência acida que correu bem mal :)

Adquired taste, talvez...

Inté,
--
Pedro Melo
Blog: http://www.simplicidade.org/notes/
XMPP ID: melo em simplicidade.org
Use XMPP!





-- 
Nelson Ferraz

Free Software Foundation Associate Member #3203
Projeto Software Livre Brasil (www.softwarelivre.org.br)
Sociedade Perl do Brasil (www.perl.org.br)
Rede Livre de Compartilhamento de Cultura Digital

From fernandolouis em terra.com.br  Tue Apr 28 08:02:04 2009
From: fernandolouis em terra.com.br (Fernando)
Date: Tue, 28 Apr 2009 12:02:04 -0300
Subject: [Cascavel-pm] intranet com Perl
References: <604cec170904030545x6496c72h58dd028510d77889@mail.gmail.com>
Message-ID: <311F34980601489CA6FB93FDA542C845@rede.local>

Preciso de umas dicas pra desenvolver um sistema que será usado só 
internamente na rede dentro do meu escritório.



Sempre utilizei o Perl em aplicações para web. Tenho em meu computador o 
Apache, Active Perl e o mysql instalado para rodar via offline todos os 
sistema que desenvolvo pra web antes de ir pro ar.



Através do endereço http://localhost/cgi-bin/arquivo.pl acesso qualquer 
arquivo e executo offline no meu computador.



Minha dúvida é o seguinte:



Dentro do servidor do meu escritório quero instalar o Apache, Active Perl e 
o mysql para então qualquer computador da empresa ter acesso ao sistema que 
desenvolverei.



Qual vai ser o endereço pra acessar um arquivo .pl dentro do servidor? 
Conforme disse anteriormente, no meu computador eu uso 
http://localhost/cgi-bin/arquivo.pl, mas minha necessidade é qualquer 
computador do escritório poder acessar através de um determinado endereço, 
esse sistema. Por exemplo: http://servidor/cgi-bin/sistema_interno.pl e tudo 
que será feito pelos usuários, será alterado diretamente no servidor, por 
exemplo: INSERTs, UPDATEs e DELETEs no banco de dados MySQL.

[]s,
Fernando 


From gabriel.vieira em gmail.com  Tue Apr 28 08:12:29 2009
From: gabriel.vieira em gmail.com (Gabriel Vieira)
Date: Tue, 28 Apr 2009 12:12:29 -0300
Subject: [Cascavel-pm] intranet com Perl
In-Reply-To: <311F34980601489CA6FB93FDA542C845@rede.local>
References: <604cec170904030545x6496c72h58dd028510d77889@mail.gmail.com>
	<311F34980601489CA6FB93FDA542C845@rede.local>
Message-ID: <83d8367f0904280812t6bdaf16eyfbc366f51e969904@mail.gmail.com>

O acesso é feito pelo IP conforme da máquina servidor, ou através do
hostname dela.

2009/4/28 Fernando <fernandolouis em terra.com.br>:
> Preciso de umas dicas pra desenvolver um sistema que será usado só
> internamente na rede dentro do meu escritório.
>
>
>
> Sempre utilizei o Perl em aplicações para web. Tenho em meu computador o
> Apache, Active Perl e o mysql instalado para rodar via offline todos os
> sistema que desenvolvo pra web antes de ir pro ar.
>
>
>
> Através do endereço http://localhost/cgi-bin/arquivo.pl acesso qualquer
> arquivo e executo offline no meu computador.
>
>
>
> Minha dúvida é o seguinte:
>
>
>
> Dentro do servidor do meu escritório quero instalar o Apache, Active Perl e
> o mysql para então qualquer computador da empresa ter acesso ao sistema que
> desenvolverei.
>
>
>
> Qual vai ser o endereço pra acessar um arquivo .pl dentro do servidor?
> Conforme disse anteriormente, no meu computador eu uso
> http://localhost/cgi-bin/arquivo.pl, mas minha necessidade é qualquer
> computador do escritório poder acessar através de um determinado endereço,
> esse sistema. Por exemplo: http://servidor/cgi-bin/sistema_interno.pl e tudo
> que será feito pelos usuários, será alterado diretamente no servidor, por
> exemplo: INSERTs, UPDATEs e DELETEs no banco de dados MySQL.
>
> []s,
> Fernando
> _______________________________________________
> Cascavel-pm mailing list
> Cascavel-pm em pm.org
> http://mail.pm.org/mailman/listinfo/cascavel-pm
>



-- 
Gabriel Vieira

From breno em rio.pm.org  Tue Apr 28 08:22:04 2009
From: breno em rio.pm.org (breno)
Date: Tue, 28 Apr 2009 12:22:04 -0300
Subject: [Cascavel-pm] intranet com Perl
In-Reply-To: <83d8367f0904280812t6bdaf16eyfbc366f51e969904@mail.gmail.com>
References: <604cec170904030545x6496c72h58dd028510d77889@mail.gmail.com>
	<311F34980601489CA6FB93FDA542C845@rede.local>
	<83d8367f0904280812t6bdaf16eyfbc366f51e969904@mail.gmail.com>
Message-ID: <bbea248f0904280822ocb6369aw4e5830de4bb08ecb@mail.gmail.com>

Em outras palavras, exatamente como vc mesmo disse. Por exemplo:

se uma pessoa *na máquina* acessa o servidor por
http://localhost/cgi-bin/arquivo.pl

e a máquina tem IP 192.168.0.16

pessoas em outras máquinas na mesma rede poderão acessar por
http://192.168.0.16/cgi-bin/arquivo.pl

supondo, claro, que rotas, firewalls e Apache's estão configurados
apropriadamente.


[]s

-b

2009/4/28 Gabriel Vieira <gabriel.vieira em gmail.com>:
> O acesso é feito pelo IP conforme da máquina servidor, ou através do
> hostname dela.
>
> 2009/4/28 Fernando <fernandolouis em terra.com.br>:
>> Preciso de umas dicas pra desenvolver um sistema que será usado só
>> internamente na rede dentro do meu escritório.
>>
>>
>>
>> Sempre utilizei o Perl em aplicações para web. Tenho em meu computador o
>> Apache, Active Perl e o mysql instalado para rodar via offline todos os
>> sistema que desenvolvo pra web antes de ir pro ar.
>>
>>
>>
>> Através do endereço http://localhost/cgi-bin/arquivo.pl acesso qualquer
>> arquivo e executo offline no meu computador.
>>
>>
>>
>> Minha dúvida é o seguinte:
>>
>>
>>
>> Dentro do servidor do meu escritório quero instalar o Apache, Active Perl e
>> o mysql para então qualquer computador da empresa ter acesso ao sistema que
>> desenvolverei.
>>
>>
>>
>> Qual vai ser o endereço pra acessar um arquivo .pl dentro do servidor?
>> Conforme disse anteriormente, no meu computador eu uso
>> http://localhost/cgi-bin/arquivo.pl, mas minha necessidade é qualquer
>> computador do escritório poder acessar através de um determinado endereço,
>> esse sistema. Por exemplo: http://servidor/cgi-bin/sistema_interno.pl e tudo
>> que será feito pelos usuários, será alterado diretamente no servidor, por
>> exemplo: INSERTs, UPDATEs e DELETEs no banco de dados MySQL.
>>
>> []s,
>> Fernando
>> _______________________________________________
>> 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
>

From daniel.oliveira.mantovani em gmail.com  Tue Apr 28 08:41:23 2009
From: daniel.oliveira.mantovani em gmail.com (Daniel de Oliveira Mantovani)
Date: Tue, 28 Apr 2009 12:41:23 -0300
Subject: [Cascavel-pm] intranet com Perl
In-Reply-To: <bbea248f0904280822ocb6369aw4e5830de4bb08ecb@mail.gmail.com>
References: <604cec170904030545x6496c72h58dd028510d77889@mail.gmail.com>
	<311F34980601489CA6FB93FDA542C845@rede.local>
	<83d8367f0904280812t6bdaf16eyfbc366f51e969904@mail.gmail.com>
	<bbea248f0904280822ocb6369aw4e5830de4bb08ecb@mail.gmail.com>
Message-ID: <214823ca0904280841y304c8070g6a36c29922f158d0@mail.gmail.com>

http://pt.wikipedia.org/wiki/Endere%C3%A7o_IP

http://pt.wikipedia.org/wiki/M%C3%A1scara_de_rede

http://pt.wikipedia.org/wiki/Rede_de_%C3%A1rea_local

[]'s

2009/4/28 breno <breno em rio.pm.org>

> Em outras palavras, exatamente como vc mesmo disse. Por exemplo:
>
> se uma pessoa *na máquina* acessa o servidor por
> http://localhost/cgi-bin/arquivo.pl
>
> e a máquina tem IP 192.168.0.16
>
> pessoas em outras máquinas na mesma rede poderão acessar por
> http://192.168.0.16/cgi-bin/arquivo.pl
>
> supondo, claro, que rotas, firewalls e Apache's estão configurados
> apropriadamente.
>
>
> []s
>
> -b
>
> 2009/4/28 Gabriel Vieira <gabriel.vieira em gmail.com>:
> > O acesso é feito pelo IP conforme da máquina servidor, ou através do
> > hostname dela.
> >
> > 2009/4/28 Fernando <fernandolouis em terra.com.br>:
> >> Preciso de umas dicas pra desenvolver um sistema que será usado só
> >> internamente na rede dentro do meu escritório.
> >>
> >>
> >>
> >> Sempre utilizei o Perl em aplicações para web. Tenho em meu computador o
> >> Apache, Active Perl e o mysql instalado para rodar via offline todos os
> >> sistema que desenvolvo pra web antes de ir pro ar.
> >>
> >>
> >>
> >> Através do endereço http://localhost/cgi-bin/arquivo.pl acesso qualquer
> >> arquivo e executo offline no meu computador.
> >>
> >>
> >>
> >> Minha dúvida é o seguinte:
> >>
> >>
> >>
> >> Dentro do servidor do meu escritório quero instalar o Apache, Active
> Perl e
> >> o mysql para então qualquer computador da empresa ter acesso ao sistema
> que
> >> desenvolverei.
> >>
> >>
> >>
> >> Qual vai ser o endereço pra acessar um arquivo .pl dentro do servidor?
> >> Conforme disse anteriormente, no meu computador eu uso
> >> http://localhost/cgi-bin/arquivo.pl, mas minha necessidade é qualquer
> >> computador do escritório poder acessar através de um determinado
> endereço,
> >> esse sistema. Por exemplo: http://servidor/cgi-bin/sistema_interno.pl e
> tudo
> >> que será feito pelos usuários, será alterado diretamente no servidor,
> por
> >> exemplo: INSERTs, UPDATEs e DELETEs no banco de dados MySQL.
> >>
> >> []s,
> >> Fernando
> >> _______________________________________________
> >> 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
> >
> _______________________________________________
> Cascavel-pm mailing list
> Cascavel-pm em pm.org
> http://mail.pm.org/mailman/listinfo/cascavel-pm
>



-- 
http://mantovanihouse.blogspot.com/
This is my poney:
-------(\_------------_/)-----------
-------)--(----------)--(-----------
------(----(---------)----)----------
-------)----(-------)----(-----------
-------(----(-------)----)-----------
--------\_-(\\.---.//)-_/------------
----------\)' -8--8- '(/--------------
-----------/------------\---------------
----------(--)--------(--)--------------
------------(_c__c_)----------------
----------------------------------------
perl -MLWP::Simple -le 'grep{ print $1 if /href="(http.+?)"/}split($/,get("
http://www.perl.org.br"))'
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: <http://mail.pm.org/pipermail/cascavel-pm/attachments/20090428/669a4b7f/attachment-0001.html>

From fernandolouis em terra.com.br  Tue Apr 28 10:32:12 2009
From: fernandolouis em terra.com.br (Fernando)
Date: Tue, 28 Apr 2009 14:32:12 -0300
Subject: [Cascavel-pm] intranet com Perl
References: <604cec170904030545x6496c72h58dd028510d77889@mail.gmail.com><311F34980601489CA6FB93FDA542C845@rede.local><83d8367f0904280812t6bdaf16eyfbc366f51e969904@mail.gmail.com>
	<bbea248f0904280822ocb6369aw4e5830de4bb08ecb@mail.gmail.com>
Message-ID: <01834185855E44E29A86C9209EE4F48D@rede.local>

Supomos então que vou acessar através do endereço: 
http://192.168.1.100/cgi-bin/sistema.pl

Então o diretório "Apache", onde fica o "cgi-bin" e o "htdocs" deve estar 
compartilhado na rede?

É que não quero que os funcionários tenham acesso à pasta "cgi-bin" e 
consequentemente aos arquivos dentro dela.

Nunca trabalhei desta forma, portanto sou ignorante no assunto.

Agradeço a ajuda.
Fernando

----- Original Message ----- 
From: "breno" <breno em rio.pm.org>
To: "Cascavel Perl Mongers" <cascavel-pm em pm.org>
Sent: Tuesday, April 28, 2009 12:22 PM
Subject: Re: [Cascavel-pm] intranet com Perl


Em outras palavras, exatamente como vc mesmo disse. Por exemplo:

se uma pessoa *na máquina* acessa o servidor por
http://localhost/cgi-bin/arquivo.pl

e a máquina tem IP 192.168.0.16

pessoas em outras máquinas na mesma rede poderão acessar por
http://192.168.0.16/cgi-bin/arquivo.pl

supondo, claro, que rotas, firewalls e Apache's estão configurados
apropriadamente.


[]s

-b

2009/4/28 Gabriel Vieira <gabriel.vieira em gmail.com>:
> O acesso é feito pelo IP conforme da máquina servidor, ou através do
> hostname dela.
>
> 2009/4/28 Fernando <fernandolouis em terra.com.br>:
>> Preciso de umas dicas pra desenvolver um sistema que será usado só
>> internamente na rede dentro do meu escritório.
>>
>>
>>
>> Sempre utilizei o Perl em aplicações para web. Tenho em meu computador o
>> Apache, Active Perl e o mysql instalado para rodar via offline todos os
>> sistema que desenvolvo pra web antes de ir pro ar.
>>
>>
>>
>> Através do endereço http://localhost/cgi-bin/arquivo.pl acesso qualquer
>> arquivo e executo offline no meu computador.
>>
>>
>>
>> Minha dúvida é o seguinte:
>>
>>
>>
>> Dentro do servidor do meu escritório quero instalar o Apache, Active Perl 
>> e
>> o mysql para então qualquer computador da empresa ter acesso ao sistema 
>> que
>> desenvolverei.
>>
>>
>>
>> Qual vai ser o endereço pra acessar um arquivo .pl dentro do servidor?
>> Conforme disse anteriormente, no meu computador eu uso
>> http://localhost/cgi-bin/arquivo.pl, mas minha necessidade é qualquer
>> computador do escritório poder acessar através de um determinado 
>> endereço,
>> esse sistema. Por exemplo: http://servidor/cgi-bin/sistema_interno.pl e 
>> tudo
>> que será feito pelos usuários, será alterado diretamente no servidor, por
>> exemplo: INSERTs, UPDATEs e DELETEs no banco de dados MySQL.
>>
>> []s,
>> Fernando
>> _______________________________________________
>> 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
>
_______________________________________________
Cascavel-pm mailing list
Cascavel-pm em pm.org
http://mail.pm.org/mailman/listinfo/cascavel-pm


From daniel-vinciguerra em hotmail.com  Tue Apr 28 10:45:56 2009
From: daniel-vinciguerra em hotmail.com (Daniel Vinciguerra)
Date: Tue, 28 Apr 2009 14:45:56 -0300
Subject: [Cascavel-pm] intranet com Perl
In-Reply-To: <01834185855E44E29A86C9209EE4F48D@rede.local>
References: <604cec170904030545x6496c72h58dd028510d77889@mail.gmail.com><311F34980601489CA6FB93FDA542C845@rede.local><83d8367f0904280812t6bdaf16eyfbc366f51e969904@mail.gmail.com><bbea248f0904280822ocb6369aw4e5830de4bb08ecb@mail.gmail.com>
	<01834185855E44E29A86C9209EE4F48D@rede.local>
Message-ID: <COL101-DS2164A2113DD5B43957E05E846E0@phx.gbl>

O Apache é um servidor HTTP lógo todos vão ter acesso a sua aplicação 
atráves do navegador. bastando digitar o endereço da maquina (IP ou 
Hostname).

Tudo que você tem que fazer é ir em outra maquina, abrir o navegador 
disponivel e digitar o endereço como se você estivesse tentando se conectar 
a sua máquina localmente... (Só lembre-se de substituir o localhost pelo 
endereço IP ou hostname da sua maquina)

Ex.:
http://localhost/cgi-bin/index.pl

http://MeuHostname/cgi-bin/index.pl

Para saber o hostname da sua maquina, imaginando que você esta usando uma 
estação Windows...
1 - Abra o Prompt de Comandos
2 - Digite o comando: hostname (Pressione enter)
3 - Anote a palavra que ele retornou

http://[Host da Maquina]/cgi-bin/index.pl

Como disse todos vão poder acessar sua máquina porque você esta com um 
serviço a ativo na porta 80 então cabe a você ou ao responsável pela 
segurança da sua empresa fazer as devidas configurações e garantir que 
somente usuários da sua rede terão acesso a estas aplicações.

Forte abraço,

--------------------------------------------------
From: "Fernando" <fernandolouis em terra.com.br>
Sent: Tuesday, April 28, 2009 2:32 PM
To: "Cascavel Perl Mongers" <cascavel-pm em pm.org>
Subject: Re: [Cascavel-pm] intranet com Perl

> Supomos então que vou acessar através do endereço: 
> http://192.168.1.100/cgi-bin/sistema.pl
>
> Então o diretório "Apache", onde fica o "cgi-bin" e o "htdocs" deve estar 
> compartilhado na rede?
>
> É que não quero que os funcionários tenham acesso à pasta "cgi-bin" e 
> consequentemente aos arquivos dentro dela.
>
> Nunca trabalhei desta forma, portanto sou ignorante no assunto.
>
> Agradeço a ajuda.
> Fernando
>
> ----- Original Message ----- 
> From: "breno" <breno em rio.pm.org>
> To: "Cascavel Perl Mongers" <cascavel-pm em pm.org>
> Sent: Tuesday, April 28, 2009 12:22 PM
> Subject: Re: [Cascavel-pm] intranet com Perl
>
>
> Em outras palavras, exatamente como vc mesmo disse. Por exemplo:
>
> se uma pessoa *na máquina* acessa o servidor por
> http://localhost/cgi-bin/arquivo.pl
>
> e a máquina tem IP 192.168.0.16
>
> pessoas em outras máquinas na mesma rede poderão acessar por
> http://192.168.0.16/cgi-bin/arquivo.pl
>
> supondo, claro, que rotas, firewalls e Apache's estão configurados
> apropriadamente.
>
>
> []s
>
> -b
>
> 2009/4/28 Gabriel Vieira <gabriel.vieira em gmail.com>:
>> O acesso é feito pelo IP conforme da máquina servidor, ou através do
>> hostname dela.
>>
>> 2009/4/28 Fernando <fernandolouis em terra.com.br>:
>>> Preciso de umas dicas pra desenvolver um sistema que será usado só
>>> internamente na rede dentro do meu escritório.
>>>
>>>
>>>
>>> Sempre utilizei o Perl em aplicações para web. Tenho em meu computador o
>>> Apache, Active Perl e o mysql instalado para rodar via offline todos os
>>> sistema que desenvolvo pra web antes de ir pro ar.
>>>
>>>
>>>
>>> Através do endereço http://localhost/cgi-bin/arquivo.pl acesso qualquer
>>> arquivo e executo offline no meu computador.
>>>
>>>
>>>
>>> Minha dúvida é o seguinte:
>>>
>>>
>>>
>>> Dentro do servidor do meu escritório quero instalar o Apache, Active 
>>> Perl e
>>> o mysql para então qualquer computador da empresa ter acesso ao sistema 
>>> que
>>> desenvolverei.
>>>
>>>
>>>
>>> Qual vai ser o endereço pra acessar um arquivo .pl dentro do servidor?
>>> Conforme disse anteriormente, no meu computador eu uso
>>> http://localhost/cgi-bin/arquivo.pl, mas minha necessidade é qualquer
>>> computador do escritório poder acessar através de um determinado 
>>> endereço,
>>> esse sistema. Por exemplo: http://servidor/cgi-bin/sistema_interno.pl e 
>>> tudo
>>> que será feito pelos usuários, será alterado diretamente no servidor, 
>>> por
>>> exemplo: INSERTs, UPDATEs e DELETEs no banco de dados MySQL.
>>>
>>> []s,
>>> Fernando
>>> _______________________________________________
>>> 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
>>
> _______________________________________________
> 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 daniel-vinciguerra em hotmail.com  Tue Apr 28 10:49:10 2009
From: daniel-vinciguerra em hotmail.com (Daniel Vinciguerra)
Date: Tue, 28 Apr 2009 14:49:10 -0300
Subject: [Cascavel-pm] intranet com Perl
In-Reply-To: <COL101-DS2164A2113DD5B43957E05E846E0@phx.gbl>
References: <604cec170904030545x6496c72h58dd028510d77889@mail.gmail.com><311F34980601489CA6FB93FDA542C845@rede.local><83d8367f0904280812t6bdaf16eyfbc366f51e969904@mail.gmail.com><bbea248f0904280822ocb6369aw4e5830de4bb08ecb@mail.gmail.com><01834185855E44E29A86C9209EE4F48D@rede.local>
	<COL101-DS2164A2113DD5B43957E05E846E0@phx.gbl>
Message-ID: <COL101-DS21B63F9C2C29DC174C5762846E0@phx.gbl>

Eu e minha maldita mania de enviar e-mails sem ler...

Desculpem-me os erros de grafia.

Forte abraço a todos,

--------------------------------------------------
From: "Daniel Vinciguerra" <daniel-vinciguerra em hotmail.com>
Sent: Tuesday, April 28, 2009 2:45 PM
To: "Cascavel Perl Mongers" <cascavel-pm em pm.org>
Subject: Re: [Cascavel-pm] intranet com Perl

> O Apache é um servidor HTTP lógo todos vão ter acesso a sua aplicação 
> atráves do navegador. bastando digitar o endereço da maquina (IP ou 
> Hostname).
>
> Tudo que você tem que fazer é ir em outra maquina, abrir o navegador 
> disponivel e digitar o endereço como se você estivesse tentando se 
> conectar a sua máquina localmente... (Só lembre-se de substituir o 
> localhost pelo endereço IP ou hostname da sua maquina)
>
> Ex.:
> http://localhost/cgi-bin/index.pl
>
> http://MeuHostname/cgi-bin/index.pl
>
> Para saber o hostname da sua maquina, imaginando que você esta usando uma 
> estação Windows...
> 1 - Abra o Prompt de Comandos
> 2 - Digite o comando: hostname (Pressione enter)
> 3 - Anote a palavra que ele retornou
>
> http://[Host da Maquina]/cgi-bin/index.pl
>
> Como disse todos vão poder acessar sua máquina porque você esta com um 
> serviço a ativo na porta 80 então cabe a você ou ao responsável pela 
> segurança da sua empresa fazer as devidas configurações e garantir que 
> somente usuários da sua rede terão acesso a estas aplicações.
>
> Forte abraço,
>
> --------------------------------------------------
> From: "Fernando" <fernandolouis em terra.com.br>
> Sent: Tuesday, April 28, 2009 2:32 PM
> To: "Cascavel Perl Mongers" <cascavel-pm em pm.org>
> Subject: Re: [Cascavel-pm] intranet com Perl
>
>> Supomos então que vou acessar através do endereço: 
>> http://192.168.1.100/cgi-bin/sistema.pl
>>
>> Então o diretório "Apache", onde fica o "cgi-bin" e o "htdocs" deve estar 
>> compartilhado na rede?
>>
>> É que não quero que os funcionários tenham acesso à pasta "cgi-bin" e 
>> consequentemente aos arquivos dentro dela.
>>
>> Nunca trabalhei desta forma, portanto sou ignorante no assunto.
>>
>> Agradeço a ajuda.
>> Fernando
>>
>> ----- Original Message ----- 
>> From: "breno" <breno em rio.pm.org>
>> To: "Cascavel Perl Mongers" <cascavel-pm em pm.org>
>> Sent: Tuesday, April 28, 2009 12:22 PM
>> Subject: Re: [Cascavel-pm] intranet com Perl
>>
>>
>> Em outras palavras, exatamente como vc mesmo disse. Por exemplo:
>>
>> se uma pessoa *na máquina* acessa o servidor por
>> http://localhost/cgi-bin/arquivo.pl
>>
>> e a máquina tem IP 192.168.0.16
>>
>> pessoas em outras máquinas na mesma rede poderão acessar por
>> http://192.168.0.16/cgi-bin/arquivo.pl
>>
>> supondo, claro, que rotas, firewalls e Apache's estão configurados
>> apropriadamente.
>>
>>
>> []s
>>
>> -b
>>
>> 2009/4/28 Gabriel Vieira <gabriel.vieira em gmail.com>:
>>> O acesso é feito pelo IP conforme da máquina servidor, ou através do
>>> hostname dela.
>>>
>>> 2009/4/28 Fernando <fernandolouis em terra.com.br>:
>>>> Preciso de umas dicas pra desenvolver um sistema que será usado só
>>>> internamente na rede dentro do meu escritório.
>>>>
>>>>
>>>>
>>>> Sempre utilizei o Perl em aplicações para web. Tenho em meu computador 
>>>> o
>>>> Apache, Active Perl e o mysql instalado para rodar via offline todos os
>>>> sistema que desenvolvo pra web antes de ir pro ar.
>>>>
>>>>
>>>>
>>>> Através do endereço http://localhost/cgi-bin/arquivo.pl acesso qualquer
>>>> arquivo e executo offline no meu computador.
>>>>
>>>>
>>>>
>>>> Minha dúvida é o seguinte:
>>>>
>>>>
>>>>
>>>> Dentro do servidor do meu escritório quero instalar o Apache, Active 
>>>> Perl e
>>>> o mysql para então qualquer computador da empresa ter acesso ao sistema 
>>>> que
>>>> desenvolverei.
>>>>
>>>>
>>>>
>>>> Qual vai ser o endereço pra acessar um arquivo .pl dentro do servidor?
>>>> Conforme disse anteriormente, no meu computador eu uso
>>>> http://localhost/cgi-bin/arquivo.pl, mas minha necessidade é qualquer
>>>> computador do escritório poder acessar através de um determinado 
>>>> endereço,
>>>> esse sistema. Por exemplo: http://servidor/cgi-bin/sistema_interno.pl e 
>>>> tudo
>>>> que será feito pelos usuários, será alterado diretamente no servidor, 
>>>> por
>>>> exemplo: INSERTs, UPDATEs e DELETEs no banco de dados MySQL.
>>>>
>>>> []s,
>>>> Fernando
>>>> _______________________________________________
>>>> 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
>>>
>> _______________________________________________
>> 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 glasswalk3r em yahoo.com.br  Tue Apr 28 10:57:50 2009
From: glasswalk3r em yahoo.com.br (Alceu R. de Freitas Jr.)
Date: Tue, 28 Apr 2009 10:57:50 -0700 (PDT)
Subject: [Cascavel-pm] intranet com Perl
Message-ID: <195075.56705.qm@web30807.mail.mud.yahoo.com>


Oi Fernando,

Você está com alguns problemas conceituais. Acho que vale a pena você parar um pouco e estudar esses conceitos antes de meter a mão na massa.

Procure estudar um pouco sobre DNS (ou WINS, já que talvez você tenha esse serviço de rede na sua intranet) para ver como lidar com resolução de endereços IP para nomes. O Google é seu amigo.

Você deve estudar também sobre o Apache (http://httpd.apache.org/docs/2.2/, eu recomendo você usar a versão 2.x em ambiente Windows) e talvez o módulo Perl beeeem antigo chamado CGI.pm (http://search.cpan.org/~lds/CGI.pm-3.43/CGI.pm) ou então pular para algo como o CGI::Application (vide artigo do Champs em http://sao-paulo.pm.org), HTML::Template (http://search.cpan.org/~samtregar/HTML-Template-2.9/Template.pm) e CGI::Simple (http://search.cpan.org/~andya/CGI-Simple-1.109/lib/CGI/Simple.pm) para usar técnicas mais modernas.

Alguns monges aqui poderiam lhe sugerir o Catalyst, mas pessoalmente acho que os "valores vitamínicos" do estudo para começar a usar ele vão ser muito altos para você que parece estar começando. Mas se você tiver tempo sobrando e um prazo amigo para desenvolver essa intranet, pode ser uma boa.

Se você preferir um livro, eu posso recomendar o "Programação CGI com Perl" (http://www.temporeal.com.br/produtos.php?id=164323). É antigo (algumas técnicas já estão ultrapassadas) e a tradução para o português não é lá essas coisas, mas tem os conceitos básicos e ainda vai te ajudar também com a parte prática.

[]'s
Alceu

--- Em ter, 28/4/09, Fernando <fernandolouis em terra.com.br> escreveu:

> De: Fernando <fernandolouis em terra.com.br>
> Assunto: Re: [Cascavel-pm] intranet com Perl
> Para: "Cascavel Perl Mongers" <cascavel-pm em pm.org>
> Data: Terça-feira, 28 de Abril de 2009, 10:32
> Supomos então que vou acessar
> através do endereço: 
> http://192.168.1.100/cgi-bin/sistema.pl
> 
> Então o diretório "Apache", onde fica o "cgi-bin" e o
> "htdocs" deve estar 
> compartilhado na rede?
> 
> É que não quero que os funcionários tenham acesso à
> pasta "cgi-bin" e 
> consequentemente aos arquivos dentro dela.
> 
> Nunca trabalhei desta forma, portanto sou ignorante no
> assunto.
> 
> Agradeço a ajuda.
> Fernando
> 



      Veja quais são os assuntos do momento no Yahoo! +Buscados
http://br.maisbuscados.yahoo.com

From a.r.ferreira em gmail.com  Tue Apr 28 12:37:11 2009
From: a.r.ferreira em gmail.com (Adriano Ferreira)
Date: Tue, 28 Apr 2009 16:37:11 -0300
Subject: [Cascavel-pm] Fwd: [Lisbon.pm] Perl6 logo: acid trip gone bad?
In-Reply-To: <604cec170904280156g7045280bvb1b9ade329280d83@mail.gmail.com>
References: <44E3D871-716E-4429-92AE-17A9BC361E78@evolui.com>
	<604cec170904280156g7045280bvb1b9ade329280d83@mail.gmail.com>
Message-ID: <73ddeb6c0904281237y19b19dd0w4635cfda507d97f@mail.gmail.com>

2009/4/28 Nelson Ferraz <nferraz em gmail.com>:
> LOL
>
>
> ---------- Forwarded message ----------
> From: Pedro Melo <melo em evolui.com>
> Date: 2009/4/27
> Subject: [Lisbon.pm] Perl6 logo: acid trip gone bad?
> To: perl em lisbon.pm.org
>
>
> Olá,
>
> umas das propostas de Logotipo para o perl6 é esta:
>
> http://www.wall.org/~larry/camelia.pdf
>

Eu também achei estranho o logo da primeira vez que vi. Mas explicado
por Larry Wall se torna bem mais coerente e são:


"
(Eu quero algo com apelo profundo no estilo do Tux. Em particular eu
quero um logo para Perl 6 que seja:)
I want something with gut appeal on the order of Tux.  In particular I
want a logo for Perl 6 that is:

   Fun  (Divertido)
   Cool   (Legal)
   Cute    (Bonitinho)
   Named   (Que tenha um nome)
   Lively      (Vivaz)
   Punable
   Personal    (Pessoal)
   Concrete     (Concreto)
   Symmetric   (Simétrico)
   Asymmetric    (Assimétrico)
   Attractive         (Atraente)
   Relational           (Relacional)
   Metamorphic         (Metamórfico)
   Decolorizable          (Que funcione sem cores)
   Shrinkable to textual icon   (Que possa ser resumido a um ícone textual)
   Shrinkable to graphical icon   (Que possa ser transformado em um
ícone gráfico)

(Além do mais, você pode estender quase qualquer coisa colocando asas
"P6" nela. Eu também quero desencorajar a misoginia em nossa
comunidade. Você de opiniões masculinas deve considerar isto como uma
oportunidade de demonstrar o seu lado sensível. :) )
In addition, you can extend just about anything by attaching "P6"
wings to it.  I also take it as a given that we want to discourage
misogyny in our community.  You of the masculine persuasion should
consider it an opportunity to show off your sensitive side.  :)

(Logo, Camelia.)
Hence, Camelia.
"
Larry Wall, in a thread at perl6-users em perl.org mailing list, 2009-03-24

> De notar o URL do autor :).
>
> Eu gosto do conceito geral de ser um animal com a possibilidade de
> meta-morfose, mas a versão actual parece o resultado de uma
> experiência acida que correu bem mal :)
>
> Adquired taste, talvez...
>
> Inté,
> --
> Pedro Melo
> Blog: http://www.simplicidade.org/notes/
> XMPP ID: melo em simplicidade.org
> Use XMPP!
>
>
>
>
>
> --
> Nelson Ferraz
>
> Free Software Foundation Associate Member #3203
> Projeto Software Livre Brasil (www.softwarelivre.org.br)
> Sociedade Perl do Brasil (www.perl.org.br)
> Rede Livre de Compartilhamento de Cultura Digital
> _______________________________________________
> Cascavel-pm mailing list
> Cascavel-pm em pm.org
> http://mail.pm.org/mailman/listinfo/cascavel-pm
>

From acid06 em gmail.com  Tue Apr 28 12:43:21 2009
From: acid06 em gmail.com (Nilson Santos Figueiredo Jr.)
Date: Tue, 28 Apr 2009 16:43:21 -0300
Subject: [Cascavel-pm] Fwd: [Lisbon.pm] Perl6 logo: acid trip gone bad?
In-Reply-To: <73ddeb6c0904281237y19b19dd0w4635cfda507d97f@mail.gmail.com>
References: <44E3D871-716E-4429-92AE-17A9BC361E78@evolui.com>
	<604cec170904280156g7045280bvb1b9ade329280d83@mail.gmail.com>
	<73ddeb6c0904281237y19b19dd0w4635cfda507d97f@mail.gmail.com>
Message-ID: <9a08c9b40904281243y3254cddcg9829555cba8dde0@mail.gmail.com>

2009/4/28 Adriano Ferreira <a.r.ferreira em gmail.com>:
> Eu também achei estranho o logo da primeira vez que vi. Mas explicado
> por Larry Wall se torna bem mais coerente e são:

Bom, podem dar o tanto de explicação que quiserem. Mas eu achei uma
porcaria completa esse logo.
Definitivamente Perl tem o pior "marketing guidance" de qualquer
linguagem existente atualmente.

Perl 6 já não é levado à sério mais... ainda colocam um logo daqueles,
só vai reforçar a imagem de que é uma "toy language".

Na altura do campeonato, eu acho que eu torço pra Perl 6 não sair e
continuarmos com Perl 5 pra sempre. Porque quando sair, Perl 5 vai ser
visto como algo "ultrapassado" e Perl 6 vai ser uma aberração.

Claro que eu gostaria muito de estar errado - e torço pra isso.

-Nilson Santos F. Jr.

From daniel em ruoso.com  Tue Apr 28 12:49:02 2009
From: daniel em ruoso.com (Daniel Ruoso)
Date: Tue, 28 Apr 2009 16:49:02 -0300
Subject: [Cascavel-pm] Fwd: [Lisbon.pm] Perl6 logo: acid trip gone bad?
In-Reply-To: <9a08c9b40904281243y3254cddcg9829555cba8dde0@mail.gmail.com>
References: <44E3D871-716E-4429-92AE-17A9BC361E78@evolui.com>
	<604cec170904280156g7045280bvb1b9ade329280d83@mail.gmail.com>
	<73ddeb6c0904281237y19b19dd0w4635cfda507d97f@mail.gmail.com>
	<9a08c9b40904281243y3254cddcg9829555cba8dde0@mail.gmail.com>
Message-ID: <1240948142.3854.35.camel@cajueiro>

Em Ter, 2009-04-28 às 16:43 -0300, Nilson Santos Figueiredo Jr.
escreveu:
> Na altura do campeonato, eu acho que eu torço pra Perl 6 não sair e
> continuarmos com Perl 5 pra sempre. Porque quando sair, Perl 5 vai ser
> visto como algo "ultrapassado" e Perl 6 vai ser uma aberração.

se os meus planos derem certo, o perl 5.12 vai suportar Perl 6, e vamos
ter completa interoperabilidade entre as duas linguagens.

daniel


From glasswalk3r em yahoo.com.br  Tue Apr 28 13:16:21 2009
From: glasswalk3r em yahoo.com.br (Alceu R. de Freitas Jr.)
Date: Tue, 28 Apr 2009 13:16:21 -0700 (PDT)
Subject: [Cascavel-pm] Fwd: [Lisbon.pm] Perl6 logo: acid trip gone bad?
Message-ID: <568775.55409.qm@web30807.mail.mud.yahoo.com>



--- Em ter, 28/4/09, Daniel Ruoso <daniel em ruoso.com> escreveu:

> se os meus planos derem certo, o perl 5.12 vai suportar
> Perl 6, e vamos
> ter completa interoperabilidade entre as duas linguagens.

Faltou aquele "HUAHAHAHAHAHA" pra terminar a frase Daniel. ;-)

Mas eu achei o logo ruim. Talvez fosse as cores, não sei. O conceito do Larry é até interessante, mas é trabalho para um artista interpretar o conceito e fazer um desenho de acordo.

[]'s
Alceu


      Veja quais são os assuntos do momento no Yahoo! +Buscados
http://br.maisbuscados.yahoo.com

From a.r.ferreira em gmail.com  Tue Apr 28 13:30:34 2009
From: a.r.ferreira em gmail.com (Adriano Ferreira)
Date: Tue, 28 Apr 2009 17:30:34 -0300
Subject: [Cascavel-pm] Fwd: [Lisbon.pm] Perl6 logo: acid trip gone bad?
In-Reply-To: <9a08c9b40904281243y3254cddcg9829555cba8dde0@mail.gmail.com>
References: <44E3D871-716E-4429-92AE-17A9BC361E78@evolui.com>
	<604cec170904280156g7045280bvb1b9ade329280d83@mail.gmail.com>
	<73ddeb6c0904281237y19b19dd0w4635cfda507d97f@mail.gmail.com>
	<9a08c9b40904281243y3254cddcg9829555cba8dde0@mail.gmail.com>
Message-ID: <73ddeb6c0904281330k7b0e4cddq4eb9fd9416b114ae@mail.gmail.com>

2009/4/28 Nilson Santos Figueiredo Jr. <acid06 em gmail.com>:
> 2009/4/28 Adriano Ferreira <a.r.ferreira em gmail.com>:
>> Eu também achei estranho o logo da primeira vez que vi. Mas explicado
>> por Larry Wall se torna bem mais coerente e são:
>
> Bom, podem dar o tanto de explicação que quiserem. Mas eu achei uma
> porcaria completa esse logo.
> Definitivamente Perl tem o pior "marketing guidance" de qualquer
> linguagem existente atualmente.
>
> Perl 6 já não é levado à sério mais... ainda colocam um logo daqueles,
> só vai reforçar a imagem de que é uma "toy language".

Assim como o Linux que tem um pingüim de logo é "toy OS"? e o FreeBSD
com seu diabinho é um brinquedo (que ninguém usa em tudo quanto é
servidor web por aí)?

Não é um logo mais lúdico que vai piorar a imagem de Perl. Acho que os
desbocados falando de Perl fazem mais mal do que isso (porque espantam
quem quer entabular um conversa normal e não de intimidação
adolescente).

>
> Na altura do campeonato, eu acho que eu torço pra Perl 6 não sair e
> continuarmos com Perl 5 pra sempre. Porque quando sair, Perl 5 vai ser
> visto como algo "ultrapassado" e Perl 6 vai ser uma aberração.
>
> Claro que eu gostaria muito de estar errado - e torço pra isso.
>
> -Nilson Santos F. Jr.
> _______________________________________________
> Cascavel-pm mailing list
> Cascavel-pm em pm.org
> http://mail.pm.org/mailman/listinfo/cascavel-pm
>

From nferraz em gmail.com  Tue Apr 28 13:42:20 2009
From: nferraz em gmail.com (Nelson Ferraz)
Date: Tue, 28 Apr 2009 22:42:20 +0200
Subject: [Cascavel-pm] Fwd: [Lisbon.pm] Perl6 logo: acid trip gone bad?
In-Reply-To: <568775.55409.qm@web30807.mail.mud.yahoo.com>
References: <568775.55409.qm@web30807.mail.mud.yahoo.com>
Message-ID: <604cec170904281342w20eef9e2qe14c68ec615d93d7@mail.gmail.com>

Comentários na Lisbon.pm:

"Eu gosto do conceito geral de ser um animal com a possibilidade de
meta-morfose, mas a versão actual parece o resultado de uma
experiência acida que correu bem mal :)"

---

"Acho que o símbolo combina bem com as camisas dele :)"

---

"Não sei se é dos comprimidos, mas eu começo a gostar do logo :-)"

---

"Eu gosto da borboleta, e do nome. Acho que seria um bom logo para o
perl6. Gosto das ideias associadas às borboletas e do paralelo que se
pode fazer com as capacidades do perl6. Esta borboleta em particular,
not so much..."

---

"Há que ser honesto: eu acho o logo muito mariconço! O perl 6 devia
ser algo bad ass, way cool! Acho que uma borboleta (pelo menos esta)
não irá trazer esse felling mas sim gozo por parte das outras
comunidades... Para ser construtivo, acho que devia ser um dragão,
azul e branco :D.."

---

"a cuspir fogo e a queimar borboletas"

---

"Dude, esquece lá isso. Nada é mariconço comparado com o logo de outro
projecto em Perl:

http://sqlfairy.sourceforge.net/

O perl6 permite-te mudar a propria linguagem com as gramaticas que
suporta. Isso é muito semelhante a uma metamorfose.

Tb teve uma vida atribulada, cheia de malta a dizer que está morta e
nunca vai dar em nada, mas quem usa um pouco de perl6 vê que realmente
é uma linguagem maravilhosa. Tal como a passagem de uma crisalida para
borboleta.

Por fim, Camelia é um bom play-on-words com Camel."

From acid06 em gmail.com  Tue Apr 28 14:49:13 2009
From: acid06 em gmail.com (Nilson Santos Figueiredo Jr.)
Date: Tue, 28 Apr 2009 18:49:13 -0300
Subject: [Cascavel-pm] Fwd: [Lisbon.pm] Perl6 logo: acid trip gone bad?
In-Reply-To: <73ddeb6c0904281330k7b0e4cddq4eb9fd9416b114ae@mail.gmail.com>
References: <44E3D871-716E-4429-92AE-17A9BC361E78@evolui.com>
	<604cec170904280156g7045280bvb1b9ade329280d83@mail.gmail.com>
	<73ddeb6c0904281237y19b19dd0w4635cfda507d97f@mail.gmail.com>
	<9a08c9b40904281243y3254cddcg9829555cba8dde0@mail.gmail.com>
	<73ddeb6c0904281330k7b0e4cddq4eb9fd9416b114ae@mail.gmail.com>
Message-ID: <9a08c9b40904281449g3026d7cfg2e96fff2b0d64174@mail.gmail.com>

2009/4/28 Adriano Ferreira <a.r.ferreira em gmail.com>:
> Assim como o Linux que tem um pingüim de logo é "toy OS"? e o FreeBSD
> com seu diabinho é um brinquedo (que ninguém usa em tudo quanto é
> servidor web por aí)?

Sinceramente, coloque em sua tela uma imagem lado a lado do Tux com
essa borboleta e eu imagino que você vá entender o que estou falando.
O problema não é ser uma borboleta.

O problema é:
1) Um logo com 6 cores diferentes.
2) Um logo com 6 cores diferentes, das quais metade são praticamente
cores fluorescentes, daquelas que brilham no escuro.
3) O logo é completamente "poluído".
4) As asas parecem que foram desenhadas por uma criança de 5 anos
brincando no MS Paint.
5) O toque final de ruindade é aquela "boca" torta tentando ser feliz,
com uma cor completamente destoante do amarelo de fundo.

Enfim, é muito ruim.

Eles poderiam fazer algo legal com o conceito da borboleta, mas isso
daí está *longe* de ser legal. Eu sou completamente inapto em artes
gráficos mas eu sinceramente acredito que até eu conseguiria fazer
algo melhor.

É horrível e só vai servir pra Perl ser piada (mais freqüentemente do
que já é, com coisas como tabela periódica de operadores e a fama de
ser "write-only"). Claro, todos nós continuamos ganhando nosso
dinheiro com Perl. Mas eu preferia que a linguagem ganhasse um pouco
de reputação, ao invés de perder mais ainda.

-Nilson Santos F. Jr.

From otaviof em gmail.com  Tue Apr 28 15:50:19 2009
From: otaviof em gmail.com (=?ISO-8859-1?Q?Ot=E1vio_Fernandes?=)
Date: Tue, 28 Apr 2009 19:50:19 -0300
Subject: [Cascavel-pm] Fwd: [Lisbon.pm] Perl6 logo: acid trip gone bad?
In-Reply-To: <9a08c9b40904281449g3026d7cfg2e96fff2b0d64174@mail.gmail.com>
References: <44E3D871-716E-4429-92AE-17A9BC361E78@evolui.com>
	<604cec170904280156g7045280bvb1b9ade329280d83@mail.gmail.com>
	<73ddeb6c0904281237y19b19dd0w4635cfda507d97f@mail.gmail.com>
	<9a08c9b40904281243y3254cddcg9829555cba8dde0@mail.gmail.com>
	<73ddeb6c0904281330k7b0e4cddq4eb9fd9416b114ae@mail.gmail.com>
	<9a08c9b40904281449g3026d7cfg2e96fff2b0d64174@mail.gmail.com>
Message-ID: <8e3843570904281550x9372442r995f47985cc8028e@mail.gmail.com>

2009/4/28 Nilson Santos Figueiredo Jr. <acid06 em gmail.com>:
> 2009/4/28 Adriano Ferreira <a.r.ferreira em gmail.com>:
>> Assim como o Linux que tem um pingüim de logo é "toy OS"? e o FreeBSD
>> com seu diabinho é um brinquedo (que ninguém usa em tudo quanto é
>> servidor web por aí)?
>
> Sinceramente, coloque em sua tela uma imagem lado a lado do Tux com
> essa borboleta e eu imagino que você vá entender o que estou falando.
> O problema não é ser uma borboleta.
>
> O problema é:
> 1) Um logo com 6 cores diferentes.
> 2) Um logo com 6 cores diferentes, das quais metade são praticamente
> cores fluorescentes, daquelas que brilham no escuro.
> 3) O logo é completamente "poluído".
> 4) As asas parecem que foram desenhadas por uma criança de 5 anos
> brincando no MS Paint.
> 5) O toque final de ruindade é aquela "boca" torta tentando ser feliz,
> com uma cor completamente destoante do amarelo de fundo.
>
> Enfim, é muito ruim.
>
> Eles poderiam fazer algo legal com o conceito da borboleta, mas isso
> daí está *longe* de ser legal. Eu sou completamente inapto em artes
> gráficos mas eu sinceramente acredito que até eu conseguiria fazer
> algo melhor.
>
> É horrível e só vai servir pra Perl ser piada (mais freqüentemente do
> que já é, com coisas como tabela periódica de operadores e a fama de
> ser "write-only"). Claro, todos nós continuamos ganhando nosso
> dinheiro com Perl. Mas eu preferia que a linguagem ganhasse um pouco
> de reputação, ao invés de perder mais ainda.
>
> -Nilson Santos F. Jr.
> _______________________________________________
> Cascavel-pm mailing list
> Cascavel-pm em pm.org
> http://mail.pm.org/mailman/listinfo/cascavel-pm
>

Nilson,

Concordo com você, mas devemos lembrar que programadores, em quase
101% dos casos não tem bom gosto para imagens, cores, tonalidades,
etc. Vamos levar isso em consideração ;-).

um abraço,

-- 
Otávio Fernandes <otaviof at gmail.com>
http://otaviof.blogspot.com/

From nferraz em gmail.com  Wed Apr 29 03:10:06 2009
From: nferraz em gmail.com (Nelson Ferraz)
Date: Wed, 29 Apr 2009 12:10:06 +0200
Subject: [Cascavel-pm] Fwd: [Lisbon.pm] Perl6 logo: acid trip gone bad?
In-Reply-To: <9a08c9b40904281449g3026d7cfg2e96fff2b0d64174@mail.gmail.com>
References: <44E3D871-716E-4429-92AE-17A9BC361E78@evolui.com>
	<604cec170904280156g7045280bvb1b9ade329280d83@mail.gmail.com>
	<73ddeb6c0904281237y19b19dd0w4635cfda507d97f@mail.gmail.com>
	<9a08c9b40904281243y3254cddcg9829555cba8dde0@mail.gmail.com>
	<73ddeb6c0904281330k7b0e4cddq4eb9fd9416b114ae@mail.gmail.com>
	<9a08c9b40904281449g3026d7cfg2e96fff2b0d64174@mail.gmail.com>
Message-ID: <604cec170904290310u6ac3258agfdffcdcb2a651e30@mail.gmail.com>

2009/4/28 Nilson Santos Figueiredo Jr. <acid06 em gmail.com>:
> 2009/4/28 Adriano Ferreira <a.r.ferreira em gmail.com>:
>> Assim como o Linux que tem um pingüim de logo é "toy OS"? e o FreeBSD
>> com seu diabinho é um brinquedo (que ninguém usa em tudo quanto é
>> servidor web por aí)?
>
> Sinceramente, coloque em sua tela uma imagem lado a lado do Tux com
> essa borboleta e eu imagino que você vá entender o que estou falando.
> O problema não é ser uma borboleta.
>
> O problema é:
> 1) Um logo com 6 cores diferentes.
> 2) Um logo com 6 cores diferentes, das quais metade são praticamente
> cores fluorescentes, daquelas que brilham no escuro.
> 3) O logo é completamente "poluído".
> 4) As asas parecem que foram desenhadas por uma criança de 5 anos
> brincando no MS Paint.
> 5) O toque final de ruindade é aquela "boca" torta tentando ser feliz,
> com uma cor completamente destoante do amarelo de fundo.
>
> Enfim, é muito ruim.
>
> Eles poderiam fazer algo legal com o conceito da borboleta, mas isso
> daí está *longe* de ser legal. Eu sou completamente inapto em artes
> gráficos mas eu sinceramente acredito que até eu conseguiria fazer
> algo melhor.

Pessoal,

Se eu entendi corretamente, esta é uma *proposta* para o logo de Perl 6.

O

From nferraz em gmail.com  Wed Apr 29 03:14:41 2009
From: nferraz em gmail.com (Nelson Ferraz)
Date: Wed, 29 Apr 2009 12:14:41 +0200
Subject: [Cascavel-pm] Fwd: [Lisbon.pm] Perl6 logo: acid trip gone bad?
In-Reply-To: <604cec170904290310u6ac3258agfdffcdcb2a651e30@mail.gmail.com>
References: <44E3D871-716E-4429-92AE-17A9BC361E78@evolui.com>
	<604cec170904280156g7045280bvb1b9ade329280d83@mail.gmail.com>
	<73ddeb6c0904281237y19b19dd0w4635cfda507d97f@mail.gmail.com>
	<9a08c9b40904281243y3254cddcg9829555cba8dde0@mail.gmail.com>
	<73ddeb6c0904281330k7b0e4cddq4eb9fd9416b114ae@mail.gmail.com>
	<9a08c9b40904281449g3026d7cfg2e96fff2b0d64174@mail.gmail.com>
	<604cec170904290310u6ac3258agfdffcdcb2a651e30@mail.gmail.com>
Message-ID: <604cec170904290314n7f696706t7b0b8ec1a90a5ba8@mail.gmail.com>

> Pessoal,
>
> Se eu entendi corretamente, esta é uma *proposta* para o logo de Perl 6.

O que o Larry Wall fez foi dar o pontapé inicial.

Assim como o Linus sugeriu um pinguim, mas foi uma outra pessoa -- o
Larry Ewing -- que criou a versão definitiva.