From gilmagno em gmail.com Fri Oct 5 08:52:06 2012 From: gilmagno em gmail.com (Gil Magno) Date: Fri, 05 Oct 2012 12:52:06 -0300 Subject: [Rio-pm] =?utf-8?q?Contribui=C3=A7=C3=A3o_ao_Open_Data_BR_-_wikip?= =?utf-8?q?oliticos=2Ecom=2Ebr?= Message-ID: <506F0226.2070608@gmail.com> Olá, Monges, Acompanho várias listas de Perl, mas mais com um observador. Gosto muito da linguagem; infelizmente no trabalho uso menos do que eu gostaria, mas estou mudando isso. Pesquisando para a eleições, achei uma fonte de dados muito boa no Tribunal Superior Eleitoral. A lei 9.504 obriga os candidatos a fazerem duas prestações de contas de suas campanhas ainda durante as eleições. Em agosto e em setembro eles declararam quanto e de quem receberam doações, e também com o que as gastaram. Peguei a segunda parcial (de setembro), importei para um banco de dados e fiz uma interface. Ela está em wikipoliticos.com.br Nessa página podemos ver as doações feitas para as campanhas de prefeito e vereador até o início de setembro, incluindo o nome de quem doou (pessoas físicas, empresas etc.) e a proporção por tipo de doação (doações de pessoas físicas, doações de empresas etc.) Também podemos ver o quanto cada candidato declarou que gastaria, no máximo, em sua campanha. Essa é uma informação muito importante, pois entre setembro e o dia das eleições as doações ainda estão acontecendo, mas a segunda prestação de contas parciais só nos dá dados até setembro. Assim como o www.deputando.com.br e o www.paraondefoiomeudinheiro.com.br, espero que seja uma contribuição para o Open Data BR. Os scripts de importação e a interface web foram escrito em Perl e Catalyst. A escrita está ruim[1], mas não me importo; ela está atingindo o objetivo de deixar a informação acessível, então tudo bem. Após às eleições vou reescrevê-lo e importar mais informações. E desculpem o relativo spam (estou mandando para muitas listas de Perl Qualquer crítica, sugestão, contribuição é bem-vinda. [1] github.com/gilmagno/dados-eleitorais gil From renato.cron em gmail.com Fri Oct 5 08:55:34 2012 From: renato.cron em gmail.com (Renato Santos) Date: Fri, 5 Oct 2012 12:55:34 -0300 Subject: [Rio-pm] =?iso-8859-1?q?=5BCuritiba-pm=5D_Contribui=E7=E3o_ao_Ope?= =?iso-8859-1?q?n_Data_BR_-_wikipoliticos=2Ecom=2Ebr?= In-Reply-To: <506F0226.2070608@gmail.com> References: <506F0226.2070608@gmail.com> Message-ID: Gil++ Ficou muito legal! Depois das eleições, teremos mais dados para poder brincar com quem passou dos limites, ou não. 2012/10/5 Gil Magno > Olá, Monges, > > Acompanho várias listas de Perl, mas mais com um observador. Gosto muito > da linguagem; infelizmente no trabalho uso menos do que eu gostaria, mas > estou mudando isso. > > Pesquisando para a eleições, achei uma fonte de dados muito boa no > Tribunal Superior Eleitoral. A lei 9.504 obriga os candidatos a fazerem > duas prestações de contas de suas campanhas ainda durante as eleições. > Em agosto e em setembro eles declararam quanto e de quem receberam > doações, e também com o que as gastaram. > > Peguei a segunda parcial (de setembro), importei para um banco de dados > e fiz uma interface. Ela está em wikipoliticos.com.br > > Nessa página podemos ver as doações feitas para as campanhas de prefeito > e vereador até o início de setembro, incluindo o nome de quem doou > (pessoas físicas, empresas etc.) e a proporção por tipo de doação > (doações de pessoas físicas, doações de empresas etc.) > > Também podemos ver o quanto cada candidato declarou que gastaria, no > máximo, em sua campanha. Essa é uma informação muito importante, pois > entre setembro e o dia das eleições as doações ainda estão acontecendo, > mas a segunda prestação de contas parciais só nos dá dados até setembro. > > Assim como o www.deputando.com.br e o > www.paraondefoiomeudinheiro.com.br, espero que seja uma contribuição > para o Open Data BR. > > Os scripts de importação e a interface web foram escrito em Perl e > Catalyst. A escrita está ruim[1], mas não me importo; ela está atingindo > o objetivo de deixar a informação acessível, então tudo bem. Após às > eleições vou reescrevê-lo e importar mais informações. > > E desculpem o relativo spam (estou mandando para muitas listas de Perl > > Qualquer crítica, sugestão, contribuição é bem-vinda. > > [1] github.com/gilmagno/dados-eleitorais > > gil > _______________________________________________ > Curitiba-pm mailing list > Curitiba-pm em pm.org > http://mail.pm.org/mailman/listinfo/curitiba-pm > -- Saravá, Renato CRON http://www.renatocron.com/blog/ @renato_cron -------------- Próxima Parte ---------- Um anexo em HTML foi limpo... URL: From ole.ufg em gmail.com Fri Oct 5 09:14:54 2012 From: ole.ufg em gmail.com (Ole Peter Smith) Date: Fri, 5 Oct 2012 13:14:54 -0300 Subject: [Rio-pm] =?iso-8859-1?q?=5BCuritiba-pm=5D_Contribui=E7=E3o_ao_Ope?= =?iso-8859-1?q?n_Data_BR_-_wikipoliticos=2Ecom=2Ebr?= In-Reply-To: References: <506F0226.2070608@gmail.com> Message-ID: bacana!!!! 0le Send via Android On Oct 5, 2012 12:55 PM, "Renato Santos" wrote: > Gil++ > > Ficou muito legal! > > > Depois das eleições, teremos mais dados para poder brincar com quem passou > dos limites, ou não. > > > 2012/10/5 Gil Magno > >> Olá, Monges, >> >> Acompanho várias listas de Perl, mas mais com um observador. Gosto muito >> da linguagem; infelizmente no trabalho uso menos do que eu gostaria, mas >> estou mudando isso. >> >> Pesquisando para a eleições, achei uma fonte de dados muito boa no >> Tribunal Superior Eleitoral. A lei 9.504 obriga os candidatos a fazerem >> duas prestações de contas de suas campanhas ainda durante as eleições. >> Em agosto e em setembro eles declararam quanto e de quem receberam >> doações, e também com o que as gastaram. >> >> Peguei a segunda parcial (de setembro), importei para um banco de dados >> e fiz uma interface. Ela está em wikipoliticos.com.br >> >> Nessa página podemos ver as doações feitas para as campanhas de prefeito >> e vereador até o início de setembro, incluindo o nome de quem doou >> (pessoas físicas, empresas etc.) e a proporção por tipo de doação >> (doações de pessoas físicas, doações de empresas etc.) >> >> Também podemos ver o quanto cada candidato declarou que gastaria, no >> máximo, em sua campanha. Essa é uma informação muito importante, pois >> entre setembro e o dia das eleições as doações ainda estão acontecendo, >> mas a segunda prestação de contas parciais só nos dá dados até setembro. >> >> Assim como o www.deputando.com.br e o >> www.paraondefoiomeudinheiro.com.br, espero que seja uma contribuição >> para o Open Data BR. >> >> Os scripts de importação e a interface web foram escrito em Perl e >> Catalyst. A escrita está ruim[1], mas não me importo; ela está atingindo >> o objetivo de deixar a informação acessível, então tudo bem. Após às >> eleições vou reescrevê-lo e importar mais informações. >> >> E desculpem o relativo spam (estou mandando para muitas listas de Perl >> >> Qualquer crítica, sugestão, contribuição é bem-vinda. >> >> [1] github.com/gilmagno/dados-eleitorais >> >> gil >> _______________________________________________ >> Curitiba-pm mailing list >> Curitiba-pm em pm.org >> http://mail.pm.org/mailman/listinfo/curitiba-pm >> > > > > -- > Saravá, > Renato CRON > http://www.renatocron.com/blog/ > @renato_cron > > > _______________________________________________ > Rio-pm mailing list > Rio-pm em pm.org > http://mail.pm.org/mailman/listinfo/rio-pm > -------------- Próxima Parte ---------- Um anexo em HTML foi limpo... URL: From viniciusmiasato em gmail.com Fri Oct 5 09:19:38 2012 From: viniciusmiasato em gmail.com (=?ISO-8859-1?Q?Vin=EDcius_Miasato?=) Date: Fri, 5 Oct 2012 13:19:38 -0300 Subject: [Rio-pm] =?iso-8859-1?q?=5BCuritiba-pm=5D_Contribui=E7=E3o_ao_Ope?= =?iso-8859-1?q?n_Data_BR_-_wikipoliticos=2Ecom=2Ebr?= In-Reply-To: References: <506F0226.2070608@gmail.com> Message-ID: muito bom mesmo, parabéns, Em 5 de outubro de 2012 13:14, Ole Peter Smith escreveu: > bacana!!!! > > 0le > > Send via Android > > On Oct 5, 2012 12:55 PM, "Renato Santos" wrote: >> >> Gil++ >> >> Ficou muito legal! >> >> >> Depois das eleições, teremos mais dados para poder brincar com quem passou >> dos limites, ou não. >> >> >> 2012/10/5 Gil Magno >>> >>> Olá, Monges, >>> >>> Acompanho várias listas de Perl, mas mais com um observador. Gosto muito >>> da linguagem; infelizmente no trabalho uso menos do que eu gostaria, mas >>> estou mudando isso. >>> >>> Pesquisando para a eleições, achei uma fonte de dados muito boa no >>> Tribunal Superior Eleitoral. A lei 9.504 obriga os candidatos a fazerem >>> duas prestações de contas de suas campanhas ainda durante as eleições. >>> Em agosto e em setembro eles declararam quanto e de quem receberam >>> doações, e também com o que as gastaram. >>> >>> Peguei a segunda parcial (de setembro), importei para um banco de dados >>> e fiz uma interface. Ela está em wikipoliticos.com.br >>> >>> Nessa página podemos ver as doações feitas para as campanhas de prefeito >>> e vereador até o início de setembro, incluindo o nome de quem doou >>> (pessoas físicas, empresas etc.) e a proporção por tipo de doação >>> (doações de pessoas físicas, doações de empresas etc.) >>> >>> Também podemos ver o quanto cada candidato declarou que gastaria, no >>> máximo, em sua campanha. Essa é uma informação muito importante, pois >>> entre setembro e o dia das eleições as doações ainda estão acontecendo, >>> mas a segunda prestação de contas parciais só nos dá dados até setembro. >>> >>> Assim como o www.deputando.com.br e o >>> www.paraondefoiomeudinheiro.com.br, espero que seja uma contribuição >>> para o Open Data BR. >>> >>> Os scripts de importação e a interface web foram escrito em Perl e >>> Catalyst. A escrita está ruim[1], mas não me importo; ela está atingindo >>> o objetivo de deixar a informação acessível, então tudo bem. Após às >>> eleições vou reescrevê-lo e importar mais informações. >>> >>> E desculpem o relativo spam (estou mandando para muitas listas de Perl >>> >>> Qualquer crítica, sugestão, contribuição é bem-vinda. >>> >>> [1] github.com/gilmagno/dados-eleitorais >>> >>> gil >>> _______________________________________________ >>> Curitiba-pm mailing list >>> Curitiba-pm em pm.org >>> http://mail.pm.org/mailman/listinfo/curitiba-pm >> >> >> >> >> -- >> Saravá, >> Renato CRON >> http://www.renatocron.com/blog/ >> @renato_cron >> >> >> _______________________________________________ >> Rio-pm mailing list >> Rio-pm em pm.org >> http://mail.pm.org/mailman/listinfo/rio-pm > > > _______________________________________________ > Rio-pm mailing list > Rio-pm em pm.org > http://mail.pm.org/mailman/listinfo/rio-pm From thiago em aware.com.br Sat Oct 6 04:38:50 2012 From: thiago em aware.com.br (Thiago Rondon) Date: Sat, 6 Oct 2012 08:38:50 -0300 Subject: [Rio-pm] =?utf-8?q?=5Bopendata-br=5D_Contribui=C3=A7=C3=A3o_ao_Op?= =?utf-8?q?en_Data_BR_-_wikipoliticos=2Ecom=2Ebr?= In-Reply-To: <506F0226.2070608@gmail.com> References: <506F0226.2070608@gmail.com> Message-ID: <660EDAFE428A49CDAF6457303807E7C6@aware.com.br> Gil Magno, Muito bacana o teu projeto, parabéns pela iniciativa! E eu faço um convite para você, para você participar do evento que estamos trabalhando que é o YAPC::Brasil::2012 - A Revolução dos dados, http://yapcbrasil.org.br/2012/ Você não quer oferecer um lightning talk sobre o teu projeto no evento ? Abs! -Thiago Rondon On Friday, October 5, 2012 at 12:52 PM, Gil Magno wrote: > Olá, Monges, > > Acompanho várias listas de Perl, mas mais com um observador. Gosto muito > da linguagem; infelizmente no trabalho uso menos do que eu gostaria, mas > estou mudando isso. > > Pesquisando para a eleições, achei uma fonte de dados muito boa no > Tribunal Superior Eleitoral. A lei 9.504 obriga os candidatos a fazerem > duas prestações de contas de suas campanhas ainda durante as eleições. > Em agosto e em setembro eles declararam quanto e de quem receberam > doações, e também com o que as gastaram. > > Peguei a segunda parcial (de setembro), importei para um banco de dados > e fiz uma interface. Ela está em wikipoliticos.com.br > > Nessa página podemos ver as doações feitas para as campanhas de prefeito > e vereador até o início de setembro, incluindo o nome de quem doou > (pessoas físicas, empresas etc.) e a proporção por tipo de doação > (doações de pessoas físicas, doações de empresas etc.) > > Também podemos ver o quanto cada candidato declarou que gastaria, no > máximo, em sua campanha. Essa é uma informação muito importante, pois > entre setembro e o dia das eleições as doações ainda estão acontecendo, > mas a segunda prestação de contas parciais só nos dá dados até setembro. > > Assim como o www.deputando.com.br (http://www.deputando.com.br) e o > www.paraondefoiomeudinheiro.com.br (http://www.paraondefoiomeudinheiro.com.br), espero que seja uma contribuição > para o Open Data BR. > > Os scripts de importação e a interface web foram escrito em Perl e > Catalyst. A escrita está ruim[1], mas não me importo; ela está atingindo > o objetivo de deixar a informação acessível, então tudo bem. Após às > eleições vou reescrevê-lo e importar mais informações. > > E desculpem o relativo spam (estou mandando para muitas listas de Perl > > Qualquer crítica, sugestão, contribuição é bem-vinda. > > [1] github.com/gilmagno/dados-eleitorais (http://github.com/gilmagno/dados-eleitorais) > > gil > > -- > Para maiores informações: > http://www.opendatabr.org/ > http://groups.google.com/group/opendata-br?hl=en From creaktive em gmail.com Mon Oct 8 07:35:54 2012 From: creaktive em gmail.com (Stanislaw Pusep) Date: Mon, 8 Oct 2012 11:35:54 -0300 Subject: [Rio-pm] Fwd: Senior Perl and Sysop opportunity with Betonmarkets.com In-Reply-To: <4tn0itk8shz4.llhl4s-dupal422@elasticemail.com> References: <4tn0itk8shz4.llhl4s-dupal422@elasticemail.com> Message-ID: FWIW ABS() ---------- Forwarded message ---------- From: Jean-Yves Sireau Date: Mon, Oct 8, 2012 at 4:00 AM Subject: Senior Perl and Sysop opportunity with Betonmarkets.com To: stas em sysd.org Dear Stanislaw, Betonmarkets.com is currently recruiting for a Senior Perl Developer and a Senior Systems Engineer. Your email address is in our database of experienced Perl and Linux developers. Would you potentially have an interest in either position? This is a unique opportunity to join a multi-national team of talented developers, whilst gaining international experience in Malaysia's e-commerce hub of Cyberjaya. Our Group was founded in 1999, we have been operating in Malaysia since 2004. We have a technical team of diverse nationalities, including people working in Malaysia as well as commuters in different parts of the world. Our company provides IT and quant (financial mathematics) services to the betonmarkets.com financial platform. We use Perl and lots of Perl-related technologies extensively. We use other technologies too such as Apache, nginx, mod_perl, PostgreSQL, Javascript, Git, Puppet, Selenium, Jenkins, OpenVZ and AWS. We use Linux for all our infrastructure and desktops. Our daily routine involves maintaining the business operations as well as developing and deploying new solutions to make life easier for ourselves and our customers. We have a very casual work environment and culture, from dress code to the way we communicate and work. Our technical teams are people who are deeply concerned about the quality of their work and have a passion for it. We try to improve the way things are done constantly. We don't have a very big team so our staff have to deal with a variety of interesting tasks on a daily basis. Right now due to recent business expansion we have a vacancy for a Senior Perl Developer and a Senior Systems Engineer. As a part of our technical team, the successful candidates will be involved in our daily operations to make our infrastructure and products closer to what our customers need. Development is ongoing and we deploy regularly. We really care about testing and fault-proofing our code before it goes live so there?s a great deal of QA involved. We use virtualization extensively and rely on third party cloud services for parts of our operation. We are always on the lookout for new technologies that can add value to our portfolio of tools and services. You might be a good match for our company if: - You are knowledgeable and passionate about Linux and its nuts and bolts; - You are experienced with Perl. Take our word - there?s no escape from Perl here; - You are familiar with technologies such as Apache, nginx, Git, Debian packaging, monitoring solutions and are comfortable learning new ones when needed; - You can work as a part of a team of people as good as or better than you. - You can take and provide criticism and build on the experience to build better solutions in the future; - You are an independent thinker and can surprise yourself and the others with the new stuff you come up with; - As a developer, you are familiar with the concepts of software quality assurance and can test your own and other?s code against best-practice standards. So after what we expect from you, here's a list of the things you can expect from us: - You can expect a competitive compensation package, including health and other benefits; - A multi-national team of talented and passionate engineers; - Friendly and casual working environment; - Flexible working hours; - Canteen with refreshments for those times when you really need some; - Working from home option on certain occasions; - The opportunity to explore Malaysia, an exciting destination. - Work permit and relocation assistance. Please visit http://www.regentmarkets.com/careersfor further information about the company and the job opportunities. If you think you can be a good match for our company, drop us a line along with your resume. While not mandatory here's a list of the things we might be really interested in: - Projects you have been involved in; - If you have any public repositories on places such as github, please provide a link to them; - Contributions you might have made to open-source projects such as providing patches, new features,... - Anything that gives us a better picture of who you are and what you do. Please feel free to forward this email to any person who you think might fit the profile we are looking for. Many thanks and best regards, Jean-Yves Sireau -------------- Próxima Parte ---------- Um anexo em HTML foi limpo... URL: From andregarciacarneiro em gmail.com Mon Oct 8 09:52:57 2012 From: andregarciacarneiro em gmail.com (Andre Carneiro) Date: Mon, 8 Oct 2012 13:52:57 -0300 Subject: [Rio-pm] Fwd: Senior Perl and Sysop opportunity with Betonmarkets.com In-Reply-To: References: <4tn0itk8shz4.llhl4s-dupal422@elasticemail.com> Message-ID: eheheh... Eu recebi essa também. On Mon, Oct 8, 2012 at 11:35 AM, Stanislaw Pusep wrote: > FWIW > > ABS() > > > > ---------- Forwarded message ---------- > From: Jean-Yves Sireau > Date: Mon, Oct 8, 2012 at 4:00 AM > Subject: Senior Perl and Sysop opportunity with Betonmarkets.com > To: stas em sysd.org > > > Dear Stanislaw, > > Betonmarkets.com is currently recruiting for a Senior Perl Developer and > a Senior Systems Engineer. Your email address is in our database of > experienced Perl and Linux developers. Would you potentially have an > interest in either position? > > This is a unique opportunity to join a multi-national team of talented > developers, whilst gaining international experience in Malaysia's > e-commerce hub of Cyberjaya. > > Our Group was founded in 1999, we have been operating in Malaysia since > 2004. We have a technical team of diverse nationalities, including people > working in Malaysia as well as commuters in different parts of the world. > > Our company provides IT and quant (financial mathematics) services to the > betonmarkets.com financial platform. We use Perl and lots of Perl-related > technologies extensively. We use other technologies too such as Apache, > nginx, mod_perl, PostgreSQL, Javascript, Git, Puppet, Selenium, Jenkins, > OpenVZ and AWS. We use Linux for all our infrastructure and desktops. > Our daily routine involves maintaining the business operations as well as > developing and deploying new solutions to make life easier for ourselves > and our customers. > > We have a very casual work environment and culture, from dress code to > the way we communicate and work. Our technical teams are people who are > deeply concerned about the quality of their work and have a passion for > it. We try to improve the way things are done constantly. We don't have > a very big team so our staff have to deal with a variety of interesting > tasks on a daily basis. > > Right now due to recent business expansion we have a vacancy for a > Senior Perl Developer and a Senior Systems Engineer. As a part of our > technical team, the successful candidates will be involved in our daily > operations to make our infrastructure and products closer to what our > customers need. Development is ongoing and we deploy regularly. We > really care about testing and fault-proofing our code before it goes > live so there?s a great deal of QA involved. We use virtualization > extensively and rely on third party cloud services for parts of our > operation. We are always on the lookout for new technologies that can > add value to our portfolio of tools and services. > > You might be a good match for our company if: > > - You are knowledgeable and passionate about Linux and its nuts and > bolts; > - You are experienced with Perl. Take our word - there?s no escape > from Perl here; > - You are familiar with technologies such as Apache, nginx, Git, Debian > packaging, monitoring solutions and are comfortable learning new ones > when needed; > - You can work as a part of a team of people as good as or better than > you. > - You can take and provide criticism and build on the experience to > build better solutions in the future; > - You are an independent thinker and can surprise yourself and the > others with the new stuff you come up with; > - As a developer, you are familiar with the concepts of software > quality assurance and can test your own and other?s code against > best-practice standards. > > So after what we expect from you, here's a list of the things you can > expect from us: > > - You can expect a competitive compensation package, including health > and other benefits; > - A multi-national team of talented and passionate engineers; > - Friendly and casual working environment; > - Flexible working hours; > - Canteen with refreshments for those times when you really need some; > - Working from home option on certain occasions; > - The opportunity to explore Malaysia, an exciting destination. > - Work permit and relocation assistance. > > Please visit http://www.regentmarkets.com/careersfor further > information about the company and the job opportunities. > > If you think you can be a good match for our company, drop us a line > along with your resume. While not mandatory here's a list of the things > we might be really interested in: > > - Projects you have been involved in; > - If you have any public repositories on places such as github, please > provide a link to them; > - Contributions you might have made to open-source projects such as > providing patches, new features,... > - Anything that gives us a better picture of who you are and what you > do. > > Please feel free to forward this email to any person who you think > might fit the profile we are looking for. > > Many thanks and best regards, > > Jean-Yves Sireau > > > _______________________________________________ > Rio-pm mailing list > Rio-pm em pm.org > http://mail.pm.org/mailman/listinfo/rio-pm > -- André Garcia Carneiro Software Engineer (11)982907780 -------------- Próxima Parte ---------- Um anexo em HTML foi limpo... URL: From gilmagno em gmail.com Tue Oct 9 02:43:25 2012 From: gilmagno em gmail.com (Gil Magno) Date: Tue, 09 Oct 2012 06:43:25 -0300 Subject: [Rio-pm] =?utf-8?q?Contribui=C3=A7=C3=A3o_ao_Open_Data_BR_-_wikip?= =?utf-8?q?oliticos=2Ecom=2Ebr?= In-Reply-To: <506F0226.2070608@gmail.com> References: <506F0226.2070608@gmail.com> Message-ID: <5073F1BD.3010305@gmail.com> Valeu, pessoal. O projeto é aberto pra contribuições e sugestões. E, mais uma vez, desculpem o relativo spam (e-mail pra muitas listas), mas as eleições estavam chegando, e as informações da página poderiam ajudar alguém que estivesse em dúvida. Abraços, From gilmagno em gmail.com Tue Oct 9 02:43:37 2012 From: gilmagno em gmail.com (Gil Magno) Date: Tue, 09 Oct 2012 06:43:37 -0300 Subject: [Rio-pm] =?utf-8?q?Contribui=C3=A7=C3=A3o_ao_Open_Data_BR_-_wikip?= =?utf-8?q?oliticos=2Ecom=2Ebr?= In-Reply-To: <660EDAFE428A49CDAF6457303807E7C6@aware.com.br> References: <506F0226.2070608@gmail.com> <660EDAFE428A49CDAF6457303807E7C6@aware.com.br> Message-ID: <5073F1C9.80305@gmail.com> Thiago Rondon, 2012-10-06: > E eu faço um convite para você, para você participar do evento que estamos trabalhando que é o YAPC::Brasil::2012 - A Revolução dos dados, http://yapcbrasil.org.br/2012/ > Você não quer oferecer um lightning talk sobre o teu projeto no evento ? > Abs! > -Thiago Rondon Opa Thiago, Fico alegre com o convite. Eu já estava querendo ir pra o YAPC, mas estava incerto. Seria um prazer poder contribuir de alguma forma com o evento. Quanto tempo tem um lightning talk? Abraço, From thiago em aware.com.br Tue Oct 9 06:26:23 2012 From: thiago em aware.com.br (Thiago Rondon) Date: Tue, 9 Oct 2012 10:26:23 -0300 Subject: [Rio-pm] =?utf-8?q?=5BBrasil-PM=5D_Contribui=C3=A7=C3=A3o_ao_Open?= =?utf-8?q?_Data_BR_-_wikipoliticos=2Ecom=2Ebr?= In-Reply-To: <5073F1C9.80305@gmail.com> References: <506F0226.2070608@gmail.com> <660EDAFE428A49CDAF6457303807E7C6@aware.com.br> <5073F1C9.80305@gmail.com> Message-ID: <48A9C395B4774EA498C0240FBAB220FA@aware.com.br> On Tuesday, October 9, 2012 at 6:43 AM, Gil Magno wrote: > Thiago Rondon, 2012-10-06: > > E eu faço um convite para você, para você participar do evento que estamos trabalhando que é o YAPC::Brasil::2012 - A Revolução dos dados, http://yapcbrasil.org.br/2012/ > > Você não quer oferecer um lightning talk sobre o teu projeto no evento ? > > > > Nós iremos abrir no sábado um momento, para que as pessoas que estejam participando no evento possam realiazar estas palestras relâmpago. Ou seja, quem quiser, quem tiver lá, é só entrar na fila na frente do palco, e esperar sua vez. :-) O tempo é de 5 minutos. O interessante que dentro do YAPC no sábado, estará o pessoal da HacksHackers (grupo de jornalistas e desenvolvedores interessados em dados abertos) e o concurso Decoders (que é um evento que tem como objetivo fomentar a criação de ferramentas como a tua, e que seria muito interessante para as pessoas verem o teu aplicativo). Abs! -Thiago Rondon From nuba em fastmail.fm Tue Oct 9 09:19:11 2012 From: nuba em fastmail.fm (Nuba Princigalli) Date: Tue, 09 Oct 2012 13:19:11 -0300 Subject: [Rio-pm] =?iso-8859-1?q?Fwd=3A_=5BBrasil-PM=5D_Concurso_dar=E1_R?= =?iso-8859-1?q?=24_15_mil_a_hacker_que_ajudar_a_combater_corru=E7=E3o?= References: Message-ID: <1349799551.32040.140661138490717.1E5212F5@webmail.messagingengine.com> Passando adiante!.. ----- Original message ----- From: Nelson Ferraz To: saopaulo-pm em mail.pm.org, "Perl Mongers do Brasil, uni-vos!" , opendata-br em googlegroups.com Subject: [Brasil-PM] Concurso dará R$ 15 mil a hacker que ajudar a combater corrução Date: Tue, 9 Oct 2012 17:07:12 +0200 A 15ª Conferência Internacional Anticorrupção (IACC) abriu inscrições para o ?IACC Hackathon?, concurso que premiará as melhores iniciativas tecnológicas para solucionar problemas ligados à corrupção. Podem participar programadores que criarem sites, aplicativos de redes sociais, aplicativos de smartphones, máquinas e soluções de hardware ou ainda qualquer pessoa que tenha ideias ligadas à corrupção e transparência que possam ser discutidas no IACC Hackathon. Entre os principais temas que podem inspirar os projetos, segundo a organização do prêmio, estão o acesso a informações sobre uso de verbas públicas ou novas legislações; pesquisa de conjuntos de dados sobre questões relacionadas à corrupção; visualização de dados sobre conscientização; eficiência na comunicação da política; crowdsourcing para organizações anticorrupção, ente outros. Além da premiação de 6 mil euros, equivalente a mais de R$ 15 mil, para apoiar a viabilização do projeto vencedor, outros participantes poderão ser convidados para participar da 15ª edição do IACC. Considerado o principal encontro mundial sobre corrupção, o fórum reúne chefes de estado, sociedade civil e representantes dos setores público e privado, e ocorrerá em Brasília (DF), de 7 a 10 de novembro. Para participar, inscreva sua ideia neste site: http://15iacc.org/get-involved/iacc-hackathon/hackathon-problem-proposal/ http://olhardigital.uol.com.br/negocios/digital_news/noticias/concurso-dara-r-15-mil-a-hacker-que-ajudar-a-combater-corrucao _______________________________________________ Brasil-PM mailing list Brasil-PM em pm.org http://mail.pm.org/mailman/listinfo/brasil-pm -- Nuba R. Princigalli nuba em pauleira.com http://pauleira.com @nprincigalli Discipline is not an end in itself, just a means to an end. - King Crimson From thiago em aware.com.br Wed Oct 10 12:34:25 2012 From: thiago em aware.com.br (Thiago Rondon) Date: Wed, 10 Oct 2012 16:34:25 -0300 Subject: [Rio-pm] YAPC::Brasil::2012 -- Falta pouco! Nos ajude a divulgar! Message-ID: Pessoal, Nosso evento tá saindo do forno, estamos correndo para fazer um YAPC diferente, experimental, para re-encontrar pessoas presencialmente da comunidade, assim como para conhecermos outras. Se você quiser nos ajudar em alguma coisa com a organização do evento, participe da nossa lista de discussão. [1] Estamos procurando formas de divulgar o evento, fechar pacotes dentro de empresas e universidades para participações com desconto por inscrito ! Peço a ajuda de todos, para divulgar nosso evento, em todos os meios que forem possível! Há um release que o Leonardo preparou e já foi divulgado na BR-Linux. [2]. [1]https://groups.google.com/forum/?hl=pt-BR&fromgroups#!forum/yapc-brasil-coord [2]http://br-linux.org/2012/inscricoes-abertas-para-a-yapcbrasil-2012-a-revolucao-dos-dados/ abs! -Thiago Rondon From nuba em fastmail.fm Wed Oct 10 14:15:24 2012 From: nuba em fastmail.fm (Nuba Princigalli) Date: Wed, 10 Oct 2012 18:15:24 -0300 Subject: [Rio-pm] =?iso-8859-1?q?EITA=2C_ES_=E9_amanh=E3!_11/Outubro?= Message-ID: <1349903724.14955.140661139104737.3F2BC904@webmail.messagingengine.com> Perlssoal, *Quase* passou batido!!! É amanhã!!! E agora!?! Teremos ES?!?! E onde?!?! Abraço! Nuba -- Nuba R. Princigalli nuba em pauleira.com http://pauleira.com @nprincigalli Discipline is not an end in itself, just a means to an end. - King Crimson From gabriel.vieira em gmail.com Wed Oct 10 14:18:21 2012 From: gabriel.vieira em gmail.com (Gabriel Vieira) Date: Wed, 10 Oct 2012 18:18:21 -0300 Subject: [Rio-pm] YAPC::Brasil 2012 - Parceria com o 155 Hotel In-Reply-To: References: Message-ID: O YAPC::Brasil 2012 (http://www.yapcbrasil.org.br/2012) conseguiu preços diferenciados no 155 Hotel (http://www.155hotel.com.br/), localizado a apenas 850 metros do Shopping Frei Caneca (http://goo.gl/maps/UfHup). As diárias diárias serão de apenas R$ 140,00, sem cobrança de impostos ou taxa de serviço, para uma ou duas pessoas, com check-in às 14h e check-out às 13h, com café da manhã, sendo de 2ª a 6ª feira das 06h30 às 10h30 e aos sábados e domingos das 06h30 às 12h00. ******************************************** Como garantir o desconto: 1) Acessar http://www.155hotel.com.br/ e realizar a reserva online (não se preocupe com o valor apresentado, o pagamento é efetuado apenas na hora do check in); 2) Ao chegar ao hotel e realizar o check in, apresentar o comprovante de inscrição no YAPC::Brasil 2012, será informado o valor total já com o desconto. Observações: 1) Não será fornecido desconto a quem não apresentar o comprovante de inscrição no YAPC::Brasil 2012; 2) Não haverá devolução de dinheiro para quem realizar a inscrição no YAPC::Brasil 2012 após feito o check in; 3) Acredito que a reserva poderá ser realizada também pelo telefone (11) 3150 1555. ******************************************** Informações retiradas do site do Hotel: ------------------------------------------------------- 155 HOTEL - São Paulo Conforto e Praticidade por preço Justo Um cantinho tranquilo no meio da correria de São Paulo, o 155 Hotel trabalha com o conceito de Low Cost de hotel econômico, oferecendo praticidade e comodidade a um baixo custo. Está localizado no bairro Consolação nas proximidades da famosa rua Augusta, o hotel é uma aconchegante opção para quem busca um quarto confortável para desfrutar de São Paulo e que não fique pesado no bolso. Além de oferecer aos seus hóspedes um espaço incomparável em São Paulo, o Hotel 155 busca através de novas tecnologias de inteligência ambiental manter-se como uma instituição sustentável com o reuso das águas da chuva e também sistema economizador de energia. Juntos estes fatores permitem o 155 a ser um hotel econômico, oferecendo um preço justo aos visitantes da cidade de São Paulo. Todos os quartos dispõe de: - TV LCD 32" com SKY - Internet wireless grátis - Ar condicionado inteligente - Frigobar - Janelas Antirruido - Cama box spring - Roupa de cama antialérgica - Cofre digital - Fechadura eletrônica - Estação de trabalho - Detector de fumaça (100% antifumo) - Água do chuveiro aquecida a gás ------------------------------------------------------- -- Gabriel Vieira -------------- Próxima Parte ---------- Um anexo em HTML foi limpo... URL: From leonardo.balter em gmail.com Wed Oct 10 15:49:21 2012 From: leonardo.balter em gmail.com (Leo Balter) Date: Wed, 10 Oct 2012 19:49:21 -0300 Subject: [Rio-pm] =?utf-8?q?EITA=2C_ES_=C3=A9_amanh=C3=A3!_11/Outubro?= In-Reply-To: <1349903724.14955.140661139104737.3F2BC904@webmail.messagingengine.com> References: <1349903724.14955.140661139104737.3F2BC904@webmail.messagingengine.com> Message-ID: Amanhã tem G3, vou com o Buss Em 10 de outubro de 2012 18:15, Nuba Princigalli escreveu: > Perlssoal, > > *Quase* passou batido!!! > É amanhã!!! > E agora!?! > Teremos ES?!?! > E onde?!?! > > Abraço! > > Nuba > -- > Nuba R. Princigalli nuba em pauleira.com http://pauleira.com @nprincigalli > Discipline is not an end in itself, just a means to an end. - King Crimson > > _______________________________________________ > Rio-pm mailing list > Rio-pm em pm.org > http://mail.pm.org/mailman/listinfo/rio-pm > -------------- Próxima Parte ---------- Um anexo em HTML foi limpo... URL: From nuba em fastmail.fm Thu Oct 11 10:56:02 2012 From: nuba em fastmail.fm (Nuba Princigalli) Date: Thu, 11 Oct 2012 14:56:02 -0300 Subject: [Rio-pm] =?iso-8859-1?q?EITA=2C_ES_=E9_amanh=E3!_11/Outubro?= In-Reply-To: <1349903724.14955.140661139104737.3F2BC904@webmail.messagingengine.com> References: <1349903724.14955.140661139104737.3F2BC904@webmail.messagingengine.com> Message-ID: <1349978162.22610.140661139500077.1DB925A5@webmail.messagingengine.com> Caros, Entendo que o ES de hoje furou :/ Quem quiser puxar um ESX em outubro, fique à vontade... senão, nos vemos no próximo ES ou Hackathon!.... ou semana que vem, no YAPC::Brasil 2012, em SP! http://www.yapcbrasil.org.br/2012/ Abraço, Nuba On Wed, Oct 10, 2012, at 06:15 PM, Nuba Princigalli wrote: > Perlssoal, > > *Quase* passou batido!!! > É amanhã!!! > E agora!?! > Teremos ES?!?! > E onde?!?! > > Abraço! > > Nuba > -- > Nuba R. Princigalli nuba em pauleira.com http://pauleira.com > @nprincigalli > Discipline is not an end in itself, just a means to an end. - King > Crimson > > _______________________________________________ > Rio-pm mailing list > Rio-pm em pm.org > http://mail.pm.org/mailman/listinfo/rio-pm -- Nuba R. Princigalli nuba em pauleira.com http://pauleira.com @nprincigalli Discipline is not an end in itself, just a means to an end. - King Crimson From gabriel.vieira em gmail.com Thu Oct 11 11:20:17 2012 From: gabriel.vieira em gmail.com (Gabriel Vieira) Date: Thu, 11 Oct 2012 15:20:17 -0300 Subject: [Rio-pm] [SP-pm] YAPC::Brasil 2012 - Parceria com o 155 Hotel In-Reply-To: References: Message-ID: Atenção! Não será mais necessário apresentar comprovante de inscrição no YAPC::Brasil 2012 ao hotel. Enviaremos a lista dos participantes para que eles possam gerenciar as reservas. De tal forma, para garantir diárias de R$ 140,00 basta se inscrever no YAPC::Brasil 2012 (http://www.yapcbrasil.org.br/) e realizar a reserva online (http://www.155hotel.com.br/) ou por telefone (11) 3150 1555 - opção 2. No hora do checkin, informar que o nome consta na lista de participantes do evento. 2012/10/10 Nilson Santos Figueiredo Jr. > Dúvida: o que vem a ser o comprovante de inscrição no YAPC::Brasil 2012? > Eu fiz minha inscrição mas não tenho nenhum comprovante. > > -Nilson > > 2012/10/10 Gabriel Vieira : > > O YAPC::Brasil 2012 (http://www.yapcbrasil.org.br/2012) conseguiu preços > > diferenciados no 155 Hotel (http://www.155hotel.com.br/), localizado a > > apenas 850 metros do Shopping Frei Caneca (http://goo.gl/maps/UfHup). > > > > As diárias diárias serão de apenas R$ 140,00, sem cobrança de impostos ou > > taxa de serviço, para uma ou duas pessoas, com check-in às 14h e > check-out > > às 13h, com café da manhã, sendo de 2ª a 6ª feira das 06h30 às 10h30 e > aos > > sábados e domingos das 06h30 às 12h00. > > > > ******************************************** > > Como garantir o desconto: > > 1) Acessar http://www.155hotel.com.br/ e realizar a reserva online (não > se > > preocupe com o valor apresentado, o pagamento é efetuado apenas na hora > do > > check in); > > 2) Ao chegar ao hotel e realizar o check in, apresentar o comprovante de > > inscrição no YAPC::Brasil 2012, será informado o valor total já com o > > desconto. > > > > Observações: > > 1) Não será fornecido desconto a quem não apresentar o comprovante de > > inscrição no YAPC::Brasil 2012; > > 2) Não haverá devolução de dinheiro para quem realizar a inscrição no > > YAPC::Brasil 2012 após feito o check in; > > 3) Acredito que a reserva poderá ser realizada também pelo telefone (11) > > 3150 1555. > > ******************************************** > > > > Informações retiradas do site do Hotel: > > > > ------------------------------------------------------- > > 155 HOTEL - São Paulo > > > > Conforto e Praticidade por preço Justo > > > > Um cantinho tranquilo no meio da correria de São Paulo, o 155 Hotel > trabalha > > com o conceito de Low Cost de hotel econômico, oferecendo praticidade e > > comodidade a um baixo custo. Está localizado no bairro Consolação nas > > proximidades da famosa rua Augusta, o hotel é uma aconchegante opção para > > quem busca um quarto confortável para desfrutar de São Paulo e que não > fique > > pesado no bolso. > > > > Além de oferecer aos seus hóspedes um espaço incomparável em São Paulo, o > > Hotel 155 busca através de novas tecnologias de inteligência ambiental > > manter-se como uma instituição sustentável com o reuso das águas da > chuva e > > também sistema economizador de energia. Juntos estes fatores permitem o > 155 > > a ser um hotel econômico, oferecendo um preço justo aos visitantes da > cidade > > de São Paulo. > > > > Todos os quartos dispõe de: > > - TV LCD 32" com SKY > > - Internet wireless grátis > > - Ar condicionado inteligente > > - Frigobar > > - Janelas Antirruido > > - Cama box spring > > - Roupa de cama antialérgica > > - Cofre digital > > - Fechadura eletrônica > > - Estação de trabalho > > - Detector de fumaça (100% antifumo) > > - Água do chuveiro aquecida a gás > > ------------------------------------------------------- > > > > > > -- > > Gabriel Vieira > > > > =begin disclaimer > > Sao Paulo Perl Mongers: http://sao-paulo.pm.org/ > > SaoPaulo-pm mailing list: SaoPaulo-pm em pm.org > > L > > =end disclaimer > > > =begin disclaimer > Sao Paulo Perl Mongers: http://sao-paulo.pm.org/ > SaoPaulo-pm mailing list: SaoPaulo-pm em pm.org > L > =end disclaimer > -- Gabriel Vieira -------------- Próxima Parte ---------- Um anexo em HTML foi limpo... URL: From gabriel.vieira em gmail.com Thu Oct 18 08:28:58 2012 From: gabriel.vieira em gmail.com (Gabriel Vieira) Date: Thu, 18 Oct 2012 12:28:58 -0300 Subject: [Rio-pm] [SP-pm] YAPC::Brasil 2012 - Parceria com o 155 Hotel In-Reply-To: References: Message-ID: Senhores e senhoras. Os quartos já estão liberados. Existe uma lista temporária no saguão, basta informar o nome para conseguir o valor da diária com desconto. Com certeza é o melhor custo x benefício da região. Excelente hotel com um preço bem bacana. 2012/10/11 Gabriel Vieira > Atenção! > > Não será mais necessário apresentar comprovante de inscrição no > YAPC::Brasil 2012 ao hotel. > > Enviaremos a lista dos participantes para que eles possam gerenciar as > reservas. > > De tal forma, para garantir diárias de R$ 140,00 basta se inscrever no > YAPC::Brasil 2012 (http://www.yapcbrasil.org.br/) e realizar a reserva > online (http://www.155hotel.com.br/) ou por telefone (11) 3150 1555 - > opção 2. > > No hora do checkin, informar que o nome consta na lista de participantes > do evento. > > 2012/10/10 Nilson Santos Figueiredo Jr. > > Dúvida: o que vem a ser o comprovante de inscrição no YAPC::Brasil 2012? >> Eu fiz minha inscrição mas não tenho nenhum comprovante. >> >> -Nilson >> >> 2012/10/10 Gabriel Vieira : >> > O YAPC::Brasil 2012 (http://www.yapcbrasil.org.br/2012) conseguiu >> preços >> > diferenciados no 155 Hotel (http://www.155hotel.com.br/), localizado a >> > apenas 850 metros do Shopping Frei Caneca (http://goo.gl/maps/UfHup). >> > >> > As diárias diárias serão de apenas R$ 140,00, sem cobrança de impostos >> ou >> > taxa de serviço, para uma ou duas pessoas, com check-in às 14h e >> check-out >> > às 13h, com café da manhã, sendo de 2ª a 6ª feira das 06h30 às 10h30 e >> aos >> > sábados e domingos das 06h30 às 12h00. >> > >> > ******************************************** >> > Como garantir o desconto: >> > 1) Acessar http://www.155hotel.com.br/ e realizar a reserva online >> (não se >> > preocupe com o valor apresentado, o pagamento é efetuado apenas na hora >> do >> > check in); >> > 2) Ao chegar ao hotel e realizar o check in, apresentar o comprovante de >> > inscrição no YAPC::Brasil 2012, será informado o valor total já com o >> > desconto. >> > >> > Observações: >> > 1) Não será fornecido desconto a quem não apresentar o comprovante de >> > inscrição no YAPC::Brasil 2012; >> > 2) Não haverá devolução de dinheiro para quem realizar a inscrição no >> > YAPC::Brasil 2012 após feito o check in; >> > 3) Acredito que a reserva poderá ser realizada também pelo telefone (11) >> > 3150 1555. >> > ******************************************** >> > >> > Informações retiradas do site do Hotel: >> > >> > ------------------------------------------------------- >> > 155 HOTEL - São Paulo >> > >> > Conforto e Praticidade por preço Justo >> > >> > Um cantinho tranquilo no meio da correria de São Paulo, o 155 Hotel >> trabalha >> > com o conceito de Low Cost de hotel econômico, oferecendo praticidade e >> > comodidade a um baixo custo. Está localizado no bairro Consolação nas >> > proximidades da famosa rua Augusta, o hotel é uma aconchegante opção >> para >> > quem busca um quarto confortável para desfrutar de São Paulo e que não >> fique >> > pesado no bolso. >> > >> > Além de oferecer aos seus hóspedes um espaço incomparável em São Paulo, >> o >> > Hotel 155 busca através de novas tecnologias de inteligência ambiental >> > manter-se como uma instituição sustentável com o reuso das águas da >> chuva e >> > também sistema economizador de energia. Juntos estes fatores permitem >> o 155 >> > a ser um hotel econômico, oferecendo um preço justo aos visitantes da >> cidade >> > de São Paulo. >> > >> > Todos os quartos dispõe de: >> > - TV LCD 32" com SKY >> > - Internet wireless grátis >> > - Ar condicionado inteligente >> > - Frigobar >> > - Janelas Antirruido >> > - Cama box spring >> > - Roupa de cama antialérgica >> > - Cofre digital >> > - Fechadura eletrônica >> > - Estação de trabalho >> > - Detector de fumaça (100% antifumo) >> > - Água do chuveiro aquecida a gás >> > ------------------------------------------------------- >> > >> > >> > -- >> > Gabriel Vieira >> > >> > =begin disclaimer >> > Sao Paulo Perl Mongers: http://sao-paulo.pm.org/ >> > SaoPaulo-pm mailing list: SaoPaulo-pm em pm.org >> > L >> > =end disclaimer >> > >> =begin disclaimer >> Sao Paulo Perl Mongers: http://sao-paulo.pm.org/ >> SaoPaulo-pm mailing list: SaoPaulo-pm em pm.org >> L >> =end disclaimer >> > > > > -- > Gabriel Vieira > -- Gabriel Vieira -------------- Próxima Parte ---------- Um anexo em HTML foi limpo... URL: From tiago.peczenyj em gmail.com Thu Oct 18 08:56:00 2012 From: tiago.peczenyj em gmail.com (Tiago Peczenyj) Date: Thu, 18 Oct 2012 12:56:00 -0300 Subject: [Rio-pm] [SP-pm] YAPC::Brasil 2012 - Parceria com o 155 Hotel In-Reply-To: References: Message-ID: Galera Surgiu um grande imprevisto e não poderei comparecer ao evento. Tinha até comprado passagem. Sinto muito. Divirtam-se rapazes. -------------- Próxima Parte ---------- Um anexo em HTML foi limpo... URL: From leonardo.balter em gmail.com Thu Oct 18 09:06:37 2012 From: leonardo.balter em gmail.com (Leo Balter) Date: Thu, 18 Oct 2012 13:06:37 -0300 Subject: [Rio-pm] YAPC::Brasil 2012 - Parceria com o 155 Hotel In-Reply-To: References: Message-ID: Quem vai ficar no 155? []s Em 10 de outubro de 2012 18:18, Gabriel Vieira escreveu: > O YAPC::Brasil 2012 (http://www.yapcbrasil.org.br/2012) conseguiu preços > diferenciados no 155 Hotel (http://www.155hotel.com.br/), localizado a > apenas 850 metros do Shopping Frei Caneca (http://goo.gl/maps/UfHup). > > As diárias diárias serão de apenas R$ 140,00, sem cobrança de impostos ou > taxa de serviço, para uma ou duas pessoas, com check-in às 14h e check-out > às 13h, com café da manhã, sendo de 2ª a 6ª feira das 06h30 às 10h30 e aos > sábados e domingos das 06h30 às 12h00. > > ******************************************** > Como garantir o desconto: > 1) Acessar http://www.155hotel.com.br/ e realizar a reserva online (não > se preocupe com o valor apresentado, o pagamento é efetuado apenas na hora > do check in); > 2) Ao chegar ao hotel e realizar o check in, apresentar o comprovante de > inscrição no YAPC::Brasil 2012, será informado o valor total já com o > desconto. > > Observações: > 1) Não será fornecido desconto a quem não apresentar o comprovante de > inscrição no YAPC::Brasil 2012; > 2) Não haverá devolução de dinheiro para quem realizar a inscrição no > YAPC::Brasil 2012 após feito o check in; > 3) Acredito que a reserva poderá ser realizada também pelo telefone (11) > 3150 1555. > ******************************************** > > Informações retiradas do site do Hotel: > > ------------------------------------------------------- > 155 HOTEL - São Paulo > > Conforto e Praticidade por preço Justo > > Um cantinho tranquilo no meio da correria de São Paulo, o 155 Hotel > trabalha com o conceito de Low Cost de hotel econômico, oferecendo > praticidade e comodidade a um baixo custo. Está localizado no bairro > Consolação nas proximidades da famosa rua Augusta, o hotel é uma > aconchegante opção para quem busca um quarto confortável para desfrutar de > São Paulo e que não fique pesado no bolso. > > Além de oferecer aos seus hóspedes um espaço incomparável em São Paulo, o > Hotel 155 busca através de novas tecnologias de inteligência ambiental > manter-se como uma instituição sustentável com o reuso das águas da chuva e > também sistema economizador de energia. Juntos estes fatores permitem o > 155 a ser um hotel econômico, oferecendo um preço justo aos visitantes da > cidade de São Paulo. > > Todos os quartos dispõe de: > - TV LCD 32" com SKY > - Internet wireless grátis > - Ar condicionado inteligente > - Frigobar > - Janelas Antirruido > - Cama box spring > - Roupa de cama antialérgica > - Cofre digital > - Fechadura eletrônica > - Estação de trabalho > - Detector de fumaça (100% antifumo) > - Água do chuveiro aquecida a gás > ------------------------------------------------------- > > > -- > Gabriel Vieira > > _______________________________________________ > Rio-pm mailing list > Rio-pm em pm.org > http://mail.pm.org/mailman/listinfo/rio-pm > -------------- Próxima Parte ---------- Um anexo em HTML foi limpo... URL: From diana.g.a.rosa em gmail.com Thu Oct 18 09:11:30 2012 From: diana.g.a.rosa em gmail.com (Diana Rosa) Date: Thu, 18 Oct 2012 13:11:30 -0300 Subject: [Rio-pm] YAPC::Brasil 2012 - Parceria com o 155 Hotel In-Reply-To: References: Message-ID: vou ficar no hostel okupe ;) vejo vcs la no evento! Em 18 de outubro de 2012 13:06, Leo Balter escreveu: > Quem vai ficar no 155? > > []s > > Em 10 de outubro de 2012 18:18, Gabriel Vieira escreveu: > >> O YAPC::Brasil 2012 (http://www.yapcbrasil.org.br/2012) conseguiu preços >> diferenciados no 155 Hotel (http://www.155hotel.com.br/), localizado a >> apenas 850 metros do Shopping Frei Caneca (http://goo.gl/maps/UfHup). >> >> As diárias diárias serão de apenas R$ 140,00, sem cobrança de impostos ou >> taxa de serviço, para uma ou duas pessoas, com check-in às 14h e check-out >> às 13h, com café da manhã, sendo de 2ª a 6ª feira das 06h30 às 10h30 e aos >> sábados e domingos das 06h30 às 12h00. >> >> ******************************************** >> Como garantir o desconto: >> 1) Acessar http://www.155hotel.com.br/ e realizar a reserva online (não >> se preocupe com o valor apresentado, o pagamento é efetuado apenas na hora >> do check in); >> 2) Ao chegar ao hotel e realizar o check in, apresentar o comprovante de >> inscrição no YAPC::Brasil 2012, será informado o valor total já com o >> desconto. >> >> Observações: >> 1) Não será fornecido desconto a quem não apresentar o comprovante de >> inscrição no YAPC::Brasil 2012; >> 2) Não haverá devolução de dinheiro para quem realizar a inscrição no >> YAPC::Brasil 2012 após feito o check in; >> 3) Acredito que a reserva poderá ser realizada também pelo telefone (11) >> 3150 1555. >> ******************************************** >> >> Informações retiradas do site do Hotel: >> >> ------------------------------------------------------- >> 155 HOTEL - São Paulo >> >> Conforto e Praticidade por preço Justo >> >> Um cantinho tranquilo no meio da correria de São Paulo, o 155 Hotel >> trabalha com o conceito de Low Cost de hotel econômico, oferecendo >> praticidade e comodidade a um baixo custo. Está localizado no bairro >> Consolação nas proximidades da famosa rua Augusta, o hotel é uma >> aconchegante opção para quem busca um quarto confortável para desfrutar de >> São Paulo e que não fique pesado no bolso. >> >> Além de oferecer aos seus hóspedes um espaço incomparável em São Paulo, o >> Hotel 155 busca através de novas tecnologias de inteligência ambiental >> manter-se como uma instituição sustentável com o reuso das águas da chuva e >> também sistema economizador de energia. Juntos estes fatores permitem o >> 155 a ser um hotel econômico, oferecendo um preço justo aos visitantes da >> cidade de São Paulo. >> >> Todos os quartos dispõe de: >> - TV LCD 32" com SKY >> - Internet wireless grátis >> - Ar condicionado inteligente >> - Frigobar >> - Janelas Antirruido >> - Cama box spring >> - Roupa de cama antialérgica >> - Cofre digital >> - Fechadura eletrônica >> - Estação de trabalho >> - Detector de fumaça (100% antifumo) >> - Água do chuveiro aquecida a gás >> ------------------------------------------------------- >> >> >> -- >> Gabriel Vieira >> >> _______________________________________________ >> Rio-pm mailing list >> Rio-pm em pm.org >> http://mail.pm.org/mailman/listinfo/rio-pm >> > > > _______________________________________________ > Rio-pm mailing list > Rio-pm em pm.org > http://mail.pm.org/mailman/listinfo/rio-pm > -------------- Próxima Parte ---------- Um anexo em HTML foi limpo... URL: From diana.g.a.rosa em gmail.com Thu Oct 18 09:18:27 2012 From: diana.g.a.rosa em gmail.com (Diana Rosa) Date: Thu, 18 Oct 2012 13:18:27 -0300 Subject: [Rio-pm] YAPC::Brasil 2012 - Parceria com o 155 Hotel In-Reply-To: References: Message-ID: correcao ... estarei no beatshostel ! Em 18 de outubro de 2012 13:11, Diana Rosa escreveu: > vou ficar no hostel okupe ;) > vejo vcs la no evento! > > Em 18 de outubro de 2012 13:06, Leo Balter escreveu: > > Quem vai ficar no 155? >> >> []s >> >> Em 10 de outubro de 2012 18:18, Gabriel Vieira escreveu: >> >>> O YAPC::Brasil 2012 (http://www.yapcbrasil.org.br/2012) conseguiu >>> preços diferenciados no 155 Hotel (http://www.155hotel.com.br/), >>> localizado a apenas 850 metros do Shopping Frei Caneca ( >>> http://goo.gl/maps/UfHup). >>> >>> As diárias diárias serão de apenas R$ 140,00, sem cobrança de impostos >>> ou taxa de serviço, para uma ou duas pessoas, com check-in às 14h e >>> check-out às 13h, com café da manhã, sendo de 2ª a 6ª feira das 06h30 às >>> 10h30 e aos sábados e domingos das 06h30 às 12h00. >>> >>> ******************************************** >>> Como garantir o desconto: >>> 1) Acessar http://www.155hotel.com.br/ e realizar a reserva online (não >>> se preocupe com o valor apresentado, o pagamento é efetuado apenas na hora >>> do check in); >>> 2) Ao chegar ao hotel e realizar o check in, apresentar o comprovante de >>> inscrição no YAPC::Brasil 2012, será informado o valor total já com o >>> desconto. >>> >>> Observações: >>> 1) Não será fornecido desconto a quem não apresentar o comprovante de >>> inscrição no YAPC::Brasil 2012; >>> 2) Não haverá devolução de dinheiro para quem realizar a inscrição no >>> YAPC::Brasil 2012 após feito o check in; >>> 3) Acredito que a reserva poderá ser realizada também pelo telefone (11) >>> 3150 1555. >>> ******************************************** >>> >>> Informações retiradas do site do Hotel: >>> >>> ------------------------------------------------------- >>> 155 HOTEL - São Paulo >>> >>> Conforto e Praticidade por preço Justo >>> >>> Um cantinho tranquilo no meio da correria de São Paulo, o 155 Hotel >>> trabalha com o conceito de Low Cost de hotel econômico, oferecendo >>> praticidade e comodidade a um baixo custo. Está localizado no bairro >>> Consolação nas proximidades da famosa rua Augusta, o hotel é uma >>> aconchegante opção para quem busca um quarto confortável para desfrutar de >>> São Paulo e que não fique pesado no bolso. >>> >>> Além de oferecer aos seus hóspedes um espaço incomparável em São Paulo, >>> o Hotel 155 busca através de novas tecnologias de inteligência ambiental >>> manter-se como uma instituição sustentável com o reuso das águas da chuva e >>> também sistema economizador de energia. Juntos estes fatores permitem o >>> 155 a ser um hotel econômico, oferecendo um preço justo aos visitantes da >>> cidade de São Paulo. >>> >>> Todos os quartos dispõe de: >>> - TV LCD 32" com SKY >>> - Internet wireless grátis >>> - Ar condicionado inteligente >>> - Frigobar >>> - Janelas Antirruido >>> - Cama box spring >>> - Roupa de cama antialérgica >>> - Cofre digital >>> - Fechadura eletrônica >>> - Estação de trabalho >>> - Detector de fumaça (100% antifumo) >>> - Água do chuveiro aquecida a gás >>> ------------------------------------------------------- >>> >>> >>> -- >>> Gabriel Vieira >>> >>> _______________________________________________ >>> Rio-pm mailing list >>> Rio-pm em pm.org >>> http://mail.pm.org/mailman/listinfo/rio-pm >>> >> >> >> _______________________________________________ >> Rio-pm mailing list >> Rio-pm em pm.org >> http://mail.pm.org/mailman/listinfo/rio-pm >> > > -------------- Próxima Parte ---------- Um anexo em HTML foi limpo... URL: From gabriel.vieira em gmail.com Thu Oct 18 16:07:01 2012 From: gabriel.vieira em gmail.com (Gabriel Vieira) Date: Thu, 18 Oct 2012 20:07:01 -0300 Subject: [Rio-pm] YAPC::Brasil 2012 - Parceria com o 155 Hotel In-Reply-To: References: Message-ID: Eu estou aqui já, acredito que o Nilson também venha. 2012/10/18 Leo Balter > Quem vai ficar no 155? > > []s > > Em 10 de outubro de 2012 18:18, Gabriel Vieira escreveu: > >> O YAPC::Brasil 2012 (http://www.yapcbrasil.org.br/2012) conseguiu preços >> diferenciados no 155 Hotel (http://www.155hotel.com.br/), localizado a >> apenas 850 metros do Shopping Frei Caneca (http://goo.gl/maps/UfHup). >> >> As diárias diárias serão de apenas R$ 140,00, sem cobrança de impostos ou >> taxa de serviço, para uma ou duas pessoas, com check-in às 14h e check-out >> às 13h, com café da manhã, sendo de 2ª a 6ª feira das 06h30 às 10h30 e aos >> sábados e domingos das 06h30 às 12h00. >> >> ******************************************** >> Como garantir o desconto: >> 1) Acessar http://www.155hotel.com.br/ e realizar a reserva online (não >> se preocupe com o valor apresentado, o pagamento é efetuado apenas na hora >> do check in); >> 2) Ao chegar ao hotel e realizar o check in, apresentar o comprovante de >> inscrição no YAPC::Brasil 2012, será informado o valor total já com o >> desconto. >> >> Observações: >> 1) Não será fornecido desconto a quem não apresentar o comprovante de >> inscrição no YAPC::Brasil 2012; >> 2) Não haverá devolução de dinheiro para quem realizar a inscrição no >> YAPC::Brasil 2012 após feito o check in; >> 3) Acredito que a reserva poderá ser realizada também pelo telefone (11) >> 3150 1555. >> ******************************************** >> >> Informações retiradas do site do Hotel: >> >> ------------------------------------------------------- >> 155 HOTEL - São Paulo >> >> Conforto e Praticidade por preço Justo >> >> Um cantinho tranquilo no meio da correria de São Paulo, o 155 Hotel >> trabalha com o conceito de Low Cost de hotel econômico, oferecendo >> praticidade e comodidade a um baixo custo. Está localizado no bairro >> Consolação nas proximidades da famosa rua Augusta, o hotel é uma >> aconchegante opção para quem busca um quarto confortável para desfrutar de >> São Paulo e que não fique pesado no bolso. >> >> Além de oferecer aos seus hóspedes um espaço incomparável em São Paulo, o >> Hotel 155 busca através de novas tecnologias de inteligência ambiental >> manter-se como uma instituição sustentável com o reuso das águas da chuva e >> também sistema economizador de energia. Juntos estes fatores permitem o >> 155 a ser um hotel econômico, oferecendo um preço justo aos visitantes da >> cidade de São Paulo. >> >> Todos os quartos dispõe de: >> - TV LCD 32" com SKY >> - Internet wireless grátis >> - Ar condicionado inteligente >> - Frigobar >> - Janelas Antirruido >> - Cama box spring >> - Roupa de cama antialérgica >> - Cofre digital >> - Fechadura eletrônica >> - Estação de trabalho >> - Detector de fumaça (100% antifumo) >> - Água do chuveiro aquecida a gás >> ------------------------------------------------------- >> >> >> -- >> Gabriel Vieira >> >> _______________________________________________ >> Rio-pm mailing list >> Rio-pm em pm.org >> http://mail.pm.org/mailman/listinfo/rio-pm >> > > > _______________________________________________ > Rio-pm mailing list > Rio-pm em pm.org > http://mail.pm.org/mailman/listinfo/rio-pm > -- Gabriel Vieira -------------- Próxima Parte ---------- Um anexo em HTML foi limpo... URL: From nuba em fastmail.fm Thu Oct 18 16:45:24 2012 From: nuba em fastmail.fm (Nuba Princigalli) Date: Thu, 18 Oct 2012 20:45:24 -0300 Subject: [Rio-pm] Fwd: [SP-pm] YAPC::Brasil::2012 - Esta chegando a hora! References: <439E1D4A5AD44A31A2AC2A1C51053B7E@aware.com.br> Message-ID: <1350603924.20168.140661142604705.79EC4CA7@webmail.messagingengine.com> Perlsoal, começa amanhã, em SP, o YAPC::Brasil 2012!! Quem está de bobeira, ainda dá pra ir! No http://matrix.itasoftware.com/ tem ida + volta com a Azul por R$ 359,00! E de ônibus, pela Cometa, tem ida + volta por R$ 149,00! E ainda tem vaga no evento! :) Bora lá? Abraço, Nuba ----- Original message ----- From: Thiago Rondon To: Mongers Sao Subject: [SP-pm] YAPC::Brasil::2012 - Esta chegando a hora! Date: Thu, 18 Oct 2012 18:37:40 -0300 Olá Pessoal! Apenas avisando, amanhã começa o YAPC::Brasil::2012 ! Acabei de sair do local do evento e deixei o Leonardo por lá. :-) Esta tudo no jeito, espero que todos possam chegar um pouco mais cedo para poder receber as pessoas de outras comunidades, façam um esforço para estarem lá às 08:30 ! E é isto aí pessoal, espero que todos aproveitem, se divirtam e colaborem com este nosso evento. Estou muito contente em poder estar participando deste movimento em torno do YAPC, olhando para grade e os bares ao redor, temos tudo para termos um grande evento. ;-) Lembrando, que possivelmente o evento de sexta será bem diferente do de sábado, pois no sábado teremos dois eventos dentro do YAPC, com a participação de bastante gente de fora da comunidade, durante a manhã será um evento da comunidade de javascript, a BrazilJS, e durante a tarde com a comunidade HacksHackers, que deve ter um bom número de designers e jornalistas. É isto, bora !! Abs! -Thiago Rondon =begin disclaimer Sao Paulo Perl Mongers: http://sao-paulo.pm.org/ SaoPaulo-pm mailing list: SaoPaulo-pm em pm.org L =end disclaimer -- Nuba R. Princigalli nuba em pauleira.com http://pauleira.com @nprincigalli Discipline is not an end in itself, just a means to an end. - King Crimson From acid06 em gmail.com Fri Oct 19 05:21:33 2012 From: acid06 em gmail.com (Nilson Santos Figueiredo Jr.) Date: Fri, 19 Oct 2012 09:21:33 -0300 Subject: [Rio-pm] YAPC::Brasil 2012 - Parceria com o 155 Hotel In-Reply-To: References: Message-ID: Na verdade, minha empresa fez reserva pra mim no ibis budget, que fica mais longe. Ao chegar aí vou ver de ainda consigo pegar a promoção do YAPC nesse hotel, mesmo sem reserva... -Nilson On Oct 18, 2012 8:07 PM, "Gabriel Vieira" wrote: > Eu estou aqui já, acredito que o Nilson também venha. > > 2012/10/18 Leo Balter > >> Quem vai ficar no 155? >> >> []s >> >> Em 10 de outubro de 2012 18:18, Gabriel Vieira escreveu: >> >>> O YAPC::Brasil 2012 (http://www.yapcbrasil.org.br/2012) conseguiu >>> preços diferenciados no 155 Hotel (http://www.155hotel.com.br/), >>> localizado a apenas 850 metros do Shopping Frei Caneca ( >>> http://goo.gl/maps/UfHup). >>> >>> As diárias diárias serão de apenas R$ 140,00, sem cobrança de impostos >>> ou taxa de serviço, para uma ou duas pessoas, com check-in às 14h e >>> check-out às 13h, com café da manhã, sendo de 2ª a 6ª feira das 06h30 às >>> 10h30 e aos sábados e domingos das 06h30 às 12h00. >>> >>> ******************************************** >>> Como garantir o desconto: >>> 1) Acessar http://www.155hotel.com.br/ e realizar a reserva online (não >>> se preocupe com o valor apresentado, o pagamento é efetuado apenas na hora >>> do check in); >>> 2) Ao chegar ao hotel e realizar o check in, apresentar o comprovante de >>> inscrição no YAPC::Brasil 2012, será informado o valor total já com o >>> desconto. >>> >>> Observações: >>> 1) Não será fornecido desconto a quem não apresentar o comprovante de >>> inscrição no YAPC::Brasil 2012; >>> 2) Não haverá devolução de dinheiro para quem realizar a inscrição no >>> YAPC::Brasil 2012 após feito o check in; >>> 3) Acredito que a reserva poderá ser realizada também pelo telefone (11) >>> 3150 1555. >>> ******************************************** >>> >>> Informações retiradas do site do Hotel: >>> >>> ------------------------------------------------------- >>> 155 HOTEL - São Paulo >>> >>> Conforto e Praticidade por preço Justo >>> >>> Um cantinho tranquilo no meio da correria de São Paulo, o 155 Hotel >>> trabalha com o conceito de Low Cost de hotel econômico, oferecendo >>> praticidade e comodidade a um baixo custo. Está localizado no bairro >>> Consolação nas proximidades da famosa rua Augusta, o hotel é uma >>> aconchegante opção para quem busca um quarto confortável para desfrutar de >>> São Paulo e que não fique pesado no bolso. >>> >>> Além de oferecer aos seus hóspedes um espaço incomparável em São Paulo, >>> o Hotel 155 busca através de novas tecnologias de inteligência ambiental >>> manter-se como uma instituição sustentável com o reuso das águas da chuva e >>> também sistema economizador de energia. Juntos estes fatores permitem o >>> 155 a ser um hotel econômico, oferecendo um preço justo aos visitantes da >>> cidade de São Paulo. >>> >>> Todos os quartos dispõe de: >>> - TV LCD 32" com SKY >>> - Internet wireless grátis >>> - Ar condicionado inteligente >>> - Frigobar >>> - Janelas Antirruido >>> - Cama box spring >>> - Roupa de cama antialérgica >>> - Cofre digital >>> - Fechadura eletrônica >>> - Estação de trabalho >>> - Detector de fumaça (100% antifumo) >>> - Água do chuveiro aquecida a gás >>> ------------------------------------------------------- >>> >>> >>> -- >>> Gabriel Vieira >>> >>> _______________________________________________ >>> Rio-pm mailing list >>> Rio-pm em pm.org >>> http://mail.pm.org/mailman/listinfo/rio-pm >>> >> >> >> _______________________________________________ >> Rio-pm mailing list >> Rio-pm em pm.org >> http://mail.pm.org/mailman/listinfo/rio-pm >> > > > > -- > Gabriel Vieira > > _______________________________________________ > Rio-pm mailing list > Rio-pm em pm.org > http://mail.pm.org/mailman/listinfo/rio-pm > -------------- next part -------------- An HTML attachment was scrubbed... URL: From gabriel.vieira em gmail.com Fri Oct 19 06:02:43 2012 From: gabriel.vieira em gmail.com (Gabriel Vieira) Date: Fri, 19 Oct 2012 10:02:43 -0300 Subject: [Rio-pm] YAPC::Brasil 2012 - Parceria com o 155 Hotel In-Reply-To: References: Message-ID: Tenta ligar lá.. pode ser que facilite 2012/10/19 Nilson Santos Figueiredo Jr. > Na verdade, minha empresa fez reserva pra mim no ibis budget, que fica > mais longe. Ao chegar aí vou ver de ainda consigo pegar a promoção do YAPC > nesse hotel, mesmo sem reserva... > > -Nilson > On Oct 18, 2012 8:07 PM, "Gabriel Vieira" > wrote: > >> Eu estou aqui já, acredito que o Nilson também venha. >> >> 2012/10/18 Leo Balter >> >>> Quem vai ficar no 155? >>> >>> []s >>> >>> Em 10 de outubro de 2012 18:18, Gabriel Vieira >> > escreveu: >>> >>>> O YAPC::Brasil 2012 (http://www.yapcbrasil.org.br/2012) conseguiu >>>> preços diferenciados no 155 Hotel (http://www.155hotel.com.br/), >>>> localizado a apenas 850 metros do Shopping Frei Caneca ( >>>> http://goo.gl/maps/UfHup). >>>> >>>> As diárias diárias serão de apenas R$ 140,00, sem cobrança de impostos >>>> ou taxa de serviço, para uma ou duas pessoas, com check-in às 14h e >>>> check-out às 13h, com café da manhã, sendo de 2ª a 6ª feira das 06h30 às >>>> 10h30 e aos sábados e domingos das 06h30 às 12h00. >>>> >>>> ******************************************** >>>> Como garantir o desconto: >>>> 1) Acessar http://www.155hotel.com.br/ e realizar a reserva online >>>> (não se preocupe com o valor apresentado, o pagamento é efetuado apenas na >>>> hora do check in); >>>> 2) Ao chegar ao hotel e realizar o check in, apresentar o comprovante >>>> de inscrição no YAPC::Brasil 2012, será informado o valor total já com o >>>> desconto. >>>> >>>> Observações: >>>> 1) Não será fornecido desconto a quem não apresentar o comprovante de >>>> inscrição no YAPC::Brasil 2012; >>>> 2) Não haverá devolução de dinheiro para quem realizar a inscrição no >>>> YAPC::Brasil 2012 após feito o check in; >>>> 3) Acredito que a reserva poderá ser realizada também pelo telefone (11) >>>> 3150 1555. >>>> ******************************************** >>>> >>>> Informações retiradas do site do Hotel: >>>> >>>> ------------------------------------------------------- >>>> 155 HOTEL - São Paulo >>>> >>>> Conforto e Praticidade por preço Justo >>>> >>>> Um cantinho tranquilo no meio da correria de São Paulo, o 155 Hotel >>>> trabalha com o conceito de Low Cost de hotel econômico, oferecendo >>>> praticidade e comodidade a um baixo custo. Está localizado no bairro >>>> Consolação nas proximidades da famosa rua Augusta, o hotel é uma >>>> aconchegante opção para quem busca um quarto confortável para desfrutar de >>>> São Paulo e que não fique pesado no bolso. >>>> >>>> Além de oferecer aos seus hóspedes um espaço incomparável em São Paulo, >>>> o Hotel 155 busca através de novas tecnologias de inteligência ambiental >>>> manter-se como uma instituição sustentável com o reuso das águas da chuva e >>>> também sistema economizador de energia. Juntos estes fatores permitem o >>>> 155 a ser um hotel econômico, oferecendo um preço justo aos visitantes da >>>> cidade de São Paulo. >>>> >>>> Todos os quartos dispõe de: >>>> - TV LCD 32" com SKY >>>> - Internet wireless grátis >>>> - Ar condicionado inteligente >>>> - Frigobar >>>> - Janelas Antirruido >>>> - Cama box spring >>>> - Roupa de cama antialérgica >>>> - Cofre digital >>>> - Fechadura eletrônica >>>> - Estação de trabalho >>>> - Detector de fumaça (100% antifumo) >>>> - Água do chuveiro aquecida a gás >>>> ------------------------------------------------------- >>>> >>>> >>>> -- >>>> Gabriel Vieira >>>> >>>> _______________________________________________ >>>> Rio-pm mailing list >>>> Rio-pm em pm.org >>>> http://mail.pm.org/mailman/listinfo/rio-pm >>>> >>> >>> >>> _______________________________________________ >>> Rio-pm mailing list >>> Rio-pm em pm.org >>> http://mail.pm.org/mailman/listinfo/rio-pm >>> >> >> >> >> -- >> Gabriel Vieira >> >> _______________________________________________ >> Rio-pm mailing list >> Rio-pm em pm.org >> http://mail.pm.org/mailman/listinfo/rio-pm >> > > _______________________________________________ > Rio-pm mailing list > Rio-pm em pm.org > http://mail.pm.org/mailman/listinfo/rio-pm > -- Gabriel Vieira -------------- Próxima Parte ---------- Um anexo em HTML foi limpo... URL: From guedes_1000 em hotmail.com Fri Oct 19 10:22:41 2012 From: guedes_1000 em hotmail.com (Aureliano Guedes) Date: Fri, 19 Oct 2012 17:22:41 +0000 Subject: [Rio-pm] HTML::Parse In-Reply-To: <1350603924.20168.140661142604705.79EC4CA7@webmail.messagingengine.com> References: <439E1D4A5AD44A31A2AC2A1C51053B7E@aware.com.br>, <1350603924.20168.140661142604705.79EC4CA7@webmail.messagingengine.com> Message-ID: Ola monges, tudo bem? Qual um bom modulo para buscar string em um HTML? Vocês aconselham o HTML::Parse? Eu não entendo muito de html, mas estou tentando pegar um link dentro de uma pagina. Um exemplo é esse: http://www.buscamp3.org/busca/Thaeme+e+Thiago+-+Ai+que+do/ Os Links estão nesse formato: O Problema é que no caso dessa pagina tem 4 links desse modelo e eu queria pegar apenas o primeiro. Poderia usar regexp mas anteriormente me disseram que não é muito elegante parsear HTML na unha. Sei que a duvida é banal, mas se puderem me dar uma dica agradeço. Att, Aureliano Guedes. -------------- Próxima Parte ---------- Um anexo em HTML foi limpo... URL: From juniiior182 em gmail.com Fri Oct 19 10:31:37 2012 From: juniiior182 em gmail.com (Junior Moraes) Date: Fri, 19 Oct 2012 14:31:37 -0300 Subject: [Rio-pm] HTML::Parse In-Reply-To: References: <439E1D4A5AD44A31A2AC2A1C51053B7E@aware.com.br> <1350603924.20168.140661142604705.79EC4CA7@webmail.messagingengine.com> Message-ID: Hi. https://metacpan.org/module/HTML::TreeBuilder::XPath https://metacpan.org/module/Web::Scraper::LibXML Aliás, Web::Scraper em si já cai como uma luva. []'s Em 19 de outubro de 2012 14:22, Aureliano Guedes escreveu: > Ola monges, > tudo bem? > > Qual um bom modulo para buscar string em um HTML? > Vocês aconselham o HTML::Parse? > > Eu não entendo muito de html, mas estou tentando pegar um link dentro de > uma pagina. > > Um exemplo é esse: > http://www.buscamp3.org/busca/Thaeme+e+Thiago+-+Ai+que+do/ > > Os Links estão nesse formato: > > > > > O Problema é que no caso dessa pagina tem 4 links desse modelo e eu queria > pegar apenas o primeiro. > Poderia usar regexp mas anteriormente me disseram que não é muito elegante > parsear HTML na unha. > > Sei que a duvida é banal, mas se puderem me dar uma dica agradeço. > > Att, > Aureliano Guedes. > > _______________________________________________ > Rio-pm mailing list > Rio-pm em pm.org > http://mail.pm.org/mailman/listinfo/rio-pm > -------------- Próxima Parte ---------- Um anexo em HTML foi limpo... URL: From andregarciacarneiro em gmail.com Fri Oct 19 10:47:38 2012 From: andregarciacarneiro em gmail.com (Andre Carneiro) Date: Fri, 19 Oct 2012 14:47:38 -0300 Subject: [Rio-pm] HTML::Parse In-Reply-To: References: <439E1D4A5AD44A31A2AC2A1C51053B7E@aware.com.br> <1350603924.20168.140661142604705.79EC4CA7@webmail.messagingengine.com> Message-ID: Vários módulos e vários jeitos de fazer! Se eu entendi o que você precisa, pode ser assim: use common::sense; use WWW::Mechanize; my $m = WWW::Mechanize->new(); $m->get('http://www.google.com '); my @Links = $m->links(); foreach my $link(@Links){ say $link->text; } undef $m; #Por favor, RTFM aqui: http://search.cpan.org/~jesse/WWW-Mechanize-1.72/lib/WWW/Mechanize/Link.pm Caso não seja isso o que você quer, explique melhor por gentileza! 2012/10/19 Aureliano Guedes > Ola monges, > tudo bem? > > Qual um bom modulo para buscar string em um HTML? > Vocês aconselham o HTML::Parse? > > Eu não entendo muito de html, mas estou tentando pegar um link dentro de > uma pagina. > > Um exemplo é esse: > http://www.buscamp3.org/busca/Thaeme+e+Thiago+-+Ai+que+do/ > > Os Links estão nesse formato: > > > > > O Problema é que no caso dessa pagina tem 4 links desse modelo e eu queria > pegar apenas o primeiro. > Poderia usar regexp mas anteriormente me disseram que não é muito elegante > parsear HTML na unha. > > Sei que a duvida é banal, mas se puderem me dar uma dica agradeço. > > Att, > Aureliano Guedes. > > _______________________________________________ > Rio-pm mailing list > Rio-pm em pm.org > http://mail.pm.org/mailman/listinfo/rio-pm > -- André Garcia Carneiro Software Engineer (11)982907780 -------------- Próxima Parte ---------- Um anexo em HTML foi limpo... URL: From guedes_1000 em hotmail.com Fri Oct 19 10:56:34 2012 From: guedes_1000 em hotmail.com (Aureliano Guedes) Date: Fri, 19 Oct 2012 17:56:34 +0000 Subject: [Rio-pm] HTML::Parse In-Reply-To: References: <439E1D4A5AD44A31A2AC2A1C51053B7E@aware.com.br>, <1350603924.20168.140661142604705.79EC4CA7@webmail.messagingengine.com>, , Message-ID: Isso, é mais ou menos isso mesmo. No caso você usou o WWW:Mechanize, que apesar de eu usar como navegador nunca tinha parado para ver essa propriedade dele. Mas será que não fica um pouco pesado não usar o Mechanize? Eu não entendi como usar o Web::Scraper indicado pelo Junior. Mas ja me ajudaram, obrigado. Date: Fri, 19 Oct 2012 14:47:38 -0300 From: andregarciacarneiro em gmail.com To: rio-pm em pm.org Subject: Re: [Rio-pm] HTML::Parse Vários módulos e vários jeitos de fazer! Se eu entendi o que você precisa, pode ser assim: use common::sense;use WWW::Mechanize; my $m = WWW::Mechanize->new();$m->get('http://www.google.com');my @Links = $m->links();foreach my $link(@Links){ say $link->text; }undef $m; #Por favor, RTFM aqui: http://search.cpan.org/~jesse/WWW-Mechanize-1.72/lib/WWW/Mechanize/Link.pm Caso não seja isso o que você quer, explique melhor por gentileza! 2012/10/19 Aureliano Guedes Ola monges, tudo bem? Qual um bom modulo para buscar string em um HTML? Vocês aconselham o HTML::Parse? Eu não entendo muito de html, mas estou tentando pegar um link dentro de uma pagina. Um exemplo é esse: http://www.buscamp3.org/busca/Thaeme+e+Thiago+-+Ai+que+do/ Os Links estão nesse formato: O Problema é que no caso dessa pagina tem 4 links desse modelo e eu queria pegar apenas o primeiro. Poderia usar regexp mas anteriormente me disseram que não é muito elegante parsear HTML na unha. Sei que a duvida é banal, mas se puderem me dar uma dica agradeço. Att, Aureliano Guedes. _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm -- André Garcia Carneiro Software Engineer (11)982907780 _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm -------------- Próxima Parte ---------- Um anexo em HTML foi limpo... URL: From guedes_1000 em hotmail.com Fri Oct 19 11:19:01 2012 From: guedes_1000 em hotmail.com (Aureliano Guedes) Date: Fri, 19 Oct 2012 18:19:01 +0000 Subject: [Rio-pm] HTML::Parse In-Reply-To: References: <439E1D4A5AD44A31A2AC2A1C51053B7E@aware.com.br>, , <1350603924.20168.140661142604705.79EC4CA7@webmail.messagingengine.com>, , , , , Message-ID: Acho que estou cometendo algum erro. #!/usr/bin/env perl use strict; use warnings; use WWW::Mechanize; sub parse { my ($self) = shift; $self =~ s/\s+/\+/g; chomp $self; chop $self; return $self; } sub link_gen { my $self = shift; my $link = "http://www.buscamp3.org/busca/" . $self; return $link; } sub get_donwloader_link { my $self = shift; my $m = WWW::Mechanize->new(); $m->get($self); my @Links = $m->links(); foreach my $link(@Links){ print $link->text(); } undef $m; } open IN, $ARGV[0] or die; foreach (){ print "Search for: " . $_ . "\n"; print get_donwloader_link (link_gen (parse ($_))); print "\n__________________________________________________\n"; } From: guedes_1000 em hotmail.com To: rio-pm em pm.org Date: Fri, 19 Oct 2012 17:56:34 +0000 Subject: Re: [Rio-pm] HTML::Parse Isso, é mais ou menos isso mesmo. No caso você usou o WWW:Mechanize, que apesar de eu usar como navegador nunca tinha parado para ver essa propriedade dele. Mas será que não fica um pouco pesado não usar o Mechanize? Eu não entendi como usar o Web::Scraper indicado pelo Junior. Mas ja me ajudaram, obrigado. Date: Fri, 19 Oct 2012 14:47:38 -0300 From: andregarciacarneiro em gmail.com To: rio-pm em pm.org Subject: Re: [Rio-pm] HTML::Parse Vários módulos e vários jeitos de fazer! Se eu entendi o que você precisa, pode ser assim: use common::sense;use WWW::Mechanize; my $m = WWW::Mechanize->new();$m->get('http://www.google.com');my @Links = $m->links();foreach my $link(@Links){ say $link->text; }undef $m; #Por favor, RTFM aqui: http://search.cpan.org/~jesse/WWW-Mechanize-1.72/lib/WWW/Mechanize/Link.pm Caso não seja isso o que você quer, explique melhor por gentileza! 2012/10/19 Aureliano Guedes Ola monges, tudo bem? Qual um bom modulo para buscar string em um HTML? Vocês aconselham o HTML::Parse? Eu não entendo muito de html, mas estou tentando pegar um link dentro de uma pagina. Um exemplo é esse: http://www.buscamp3.org/busca/Thaeme+e+Thiago+-+Ai+que+do/ Os Links estão nesse formato: O Problema é que no caso dessa pagina tem 4 links desse modelo e eu queria pegar apenas o primeiro. Poderia usar regexp mas anteriormente me disseram que não é muito elegante parsear HTML na unha. Sei que a duvida é banal, mas se puderem me dar uma dica agradeço. Att, Aureliano Guedes. _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm -- André Garcia Carneiro Software Engineer (11)982907780 _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm -------------- Próxima Parte ---------- Um anexo em HTML foi limpo... URL: From gabriel.vieira em gmail.com Fri Oct 19 11:48:03 2012 From: gabriel.vieira em gmail.com (Gabriel Vieira) Date: Fri, 19 Oct 2012 15:48:03 -0300 Subject: [Rio-pm] HTML::Parse In-Reply-To: References: <439E1D4A5AD44A31A2AC2A1C51053B7E@aware.com.br> <1350603924.20168.140661142604705.79EC4CA7@webmail.messagingengine.com> Message-ID: -----------8<----------- perl -MMojo::UserAgent -E 'say Mojo::UserAgent->new->get(" http://www.buscamp3.org/busca/Thaeme+e+Thiago+-+Ai+que+do/ ")->res->dom("table.linhas_lista")->[0]->find("a")->[0]->{href}' ----------->8----------- ou -----------8<----------- mojo get http://www.buscamp3.org/busca/Thaeme+e+Thiago+-+Ai+que+do/ a 12 attr href ----------->8----------- 2012/10/19 Aureliano Guedes > Ola monges, > tudo bem? > > Qual um bom modulo para buscar string em um HTML? > Vocês aconselham o HTML::Parse? > > Eu não entendo muito de html, mas estou tentando pegar um link dentro de > uma pagina. > > Um exemplo é esse: > http://www.buscamp3.org/busca/Thaeme+e+Thiago+-+Ai+que+do/ > > Os Links estão nesse formato: > > > > > O Problema é que no caso dessa pagina tem 4 links desse modelo e eu queria > pegar apenas o primeiro. > Poderia usar regexp mas anteriormente me disseram que não é muito elegante > parsear HTML na unha. > > Sei que a duvida é banal, mas se puderem me dar uma dica agradeço. > > Att, > Aureliano Guedes. > > _______________________________________________ > Rio-pm mailing list > Rio-pm em pm.org > http://mail.pm.org/mailman/listinfo/rio-pm > -- Gabriel Vieira -------------- Próxima Parte ---------- Um anexo em HTML foi limpo... URL: From guedes_1000 em hotmail.com Fri Oct 19 12:16:26 2012 From: guedes_1000 em hotmail.com (Aureliano Guedes) Date: Fri, 19 Oct 2012 19:16:26 +0000 Subject: [Rio-pm] HTML::Parse In-Reply-To: References: <439E1D4A5AD44A31A2AC2A1C51053B7E@aware.com.br>, <1350603924.20168.140661142604705.79EC4CA7@webmail.messagingengine.com>, , Message-ID: Opa, valeu mesmo a ajuda. Eu consegui o que queria nessa primeira etapa, ficou assim: http://pastebin.com/GzAnaCK1 Agora tenho outro problema. O link direciona para uma pagina de download, seguindo nosso exemplo temo a seguinte pagina: http://www.buscamp3.org/download/thaeme+e+thiago+ai+que+do_3473494b6c3636334d55.html Dentro dessa pagina é que esta o link do download, como no caso: www.buscamp3.org/dl/3473494b6c3636334d55/554545485125135/thaeme+e+thiago+ai+que+do.mp3 A duvida agora continua sendo banal: "Como faço para salvar esse arquivo em um diretorio?". No momento que requisitar a pagina virá o arquivo normalmente?? Pois eu tentei dar um get no arquivo dessa forma e não deu certo: use LWP::Simple; my $url = get ('www.buscamp3.org/dl/3473494b6c3636334d55/554545485125135/thaeme+e+thiago+ai+que+do.mp3'); open OUT,">". 'abcde.mp3'; print OUT $url; Tentei usar: binmode $url; Nenhuma dessas tentativas deu certo. Tem alguma forma especial de fazer download de arquivo *.mp3? From: gabriel.vieira em gmail.com Date: Fri, 19 Oct 2012 15:48:03 -0300 To: rio-pm em pm.org Subject: Re: [Rio-pm] HTML::Parse -----------8<-----------perl -MMojo::UserAgent -E 'say Mojo::UserAgent->new->get("http://www.buscamp3.org/busca/Thaeme+e+Thiago+-+Ai+que+do/")->res->dom("table.linhas_lista")->[0]->find("a")->[0]->{href}' ----------->8----------- ou -----------8<-----------mojo get http://www.buscamp3.org/busca/Thaeme+e+Thiago+-+Ai+que+do/ a 12 attr href ----------->8----------- 2012/10/19 Aureliano Guedes Ola monges, tudo bem? Qual um bom modulo para buscar string em um HTML? Vocês aconselham o HTML::Parse? Eu não entendo muito de html, mas estou tentando pegar um link dentro de uma pagina. Um exemplo é esse: http://www.buscamp3.org/busca/Thaeme+e+Thiago+-+Ai+que+do/ Os Links estão nesse formato: O Problema é que no caso dessa pagina tem 4 links desse modelo e eu queria pegar apenas o primeiro. Poderia usar regexp mas anteriormente me disseram que não é muito elegante parsear HTML na unha. Sei que a duvida é banal, mas se puderem me dar uma dica agradeço. Att, Aureliano Guedes. _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm -- Gabriel Vieira _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm -------------- Próxima Parte ---------- Um anexo em HTML foi limpo... URL: From ricardo_filipo em yahoo.com.br Fri Oct 19 12:46:28 2012 From: ricardo_filipo em yahoo.com.br (Ricardo Filipo) Date: Fri, 19 Oct 2012 12:46:28 -0700 (PDT) Subject: [Rio-pm] HTML::Parse In-Reply-To: References: <439E1D4A5AD44A31A2AC2A1C51053B7E@aware.com.br>, <1350603924.20168.140661142604705.79EC4CA7@webmail.messagingengine.com> Message-ID: <1350675988.79169.YahooMailNeo@web125202.mail.ne1.yahoo.com> Eu gosto do HTML::TreeBuilder pois dá uma visão mais organizada do DOM. Veja um exemplo de uso: https://github.com/rfilipo/WebService-EBC/blob/master/lib/WebService/EBC/News.pm >________________________________ > De: Aureliano Guedes >Para: Rio PM >Enviadas: Sexta-feira, 19 de Outubro de 2012 13:22 >Assunto: [Rio-pm] HTML::Parse > > > >Ola monges, >tudo bem? > >Qual um bom modulo para buscar string em um HTML? >Vocês aconselham o HTML::Parse? > >Eu não entendo muito de html, mas estou tentando pegar um link dentro de uma pagina. > >Um exemplo é esse: http://www.buscamp3.org/busca/Thaeme+e+Thiago+-+Ai+que+do/ > >Os Links estão nesse formato: > > >O Problema é que no caso dessa pagina tem 4 links desse modelo e eu queria pegar apenas o primeiro. >Poderia usar regexp mas anteriormente me disseram que não é muito elegante parsear HTML na unha. > >Sei que a duvida é banal, mas se puderem me dar uma dica agradeço. > >Att, >Aureliano Guedes. > >_______________________________________________ >Rio-pm mailing list >Rio-pm em pm.org >http://mail.pm.org/mailman/listinfo/rio-pm > > -------------- Próxima Parte ---------- Um anexo em HTML foi limpo... URL: From rafaelprenzier em gmail.com Fri Oct 19 13:17:52 2012 From: rafaelprenzier em gmail.com (Rafael Prenzier) Date: Fri, 19 Oct 2012 17:17:52 -0300 Subject: [Rio-pm] HTML::Parse In-Reply-To: <1350675988.79169.YahooMailNeo@web125202.mail.ne1.yahoo.com> References: <439E1D4A5AD44A31A2AC2A1C51053B7E@aware.com.br> <1350603924.20168.140661142604705.79EC4CA7@webmail.messagingengine.com> <1350675988.79169.YahooMailNeo@web125202.mail.ne1.yahoo.com> Message-ID: WWW::Mechanize ++ 2012/10/19 Ricardo Filipo > Eu gosto do HTML::TreeBuilder pois dá uma visão mais organizada do DOM. > > Veja um exemplo de uso: > > https://github.com/rfilipo/WebService-EBC/blob/master/lib/WebService/EBC/News.pm > > ------------------------------ > *De:* Aureliano Guedes > *Para:* Rio PM > *Enviadas:* Sexta-feira, 19 de Outubro de 2012 13:22 > *Assunto:* [Rio-pm] HTML::Parse > > Ola monges, > tudo bem? > > Qual um bom modulo para buscar string em um HTML? > Vocês aconselham o HTML::Parse? > > Eu não entendo muito de html, mas estou tentando pegar um link dentro de > uma pagina. > > Um exemplo é esse: > http://www.buscamp3.org/busca/Thaeme+e+Thiago+-+Ai+que+do/ > > Os Links estão nesse formato: > > > > > O Problema é que no caso dessa pagina tem 4 links desse modelo e eu queria > pegar apenas o primeiro. > Poderia usar regexp mas anteriormente me disseram que não é muito elegante > parsear HTML na unha. > > Sei que a duvida é banal, mas se puderem me dar uma dica agradeço. > > Att, > Aureliano Guedes. > > _______________________________________________ > Rio-pm mailing list > Rio-pm em pm.org > http://mail.pm.org/mailman/listinfo/rio-pm > > > _______________________________________________ > Rio-pm mailing list > Rio-pm em pm.org > http://mail.pm.org/mailman/listinfo/rio-pm > -- Rafael Prenzier dos Santos | Engenheiro e Perl Monger (11) 5209-0847 www.prenzier.com -------------- Próxima Parte ---------- Um anexo em HTML foi limpo... URL: From marciodesouzaferreira em gmail.com Fri Oct 19 17:14:53 2012 From: marciodesouzaferreira em gmail.com (Marcio Ferreira) Date: Fri, 19 Oct 2012 21:14:53 -0300 Subject: [Rio-pm] HTML::Parse In-Reply-To: References: <439E1D4A5AD44A31A2AC2A1C51053B7E@aware.com.br> <1350603924.20168.140661142604705.79EC4CA7@webmail.messagingengine.com> <1350675988.79169.YahooMailNeo@web125202.mail.ne1.yahoo.com> Message-ID: estou cansado pra implementar, mas o Web::Scraper é tipo um néctar dos deuses, vc faz um crawler em 5' com ele, bem estilo Perl(que sai da frente e deixa você focar na solução) isso se o HTML não for um monstrengo =) []s, Marcio Ferreira @_marcioferreira (11) 8567-1482 skype: marcio.ferreir4 marciodesouzaferreira.blogspot.com 2012/10/19 Rafael Prenzier > WWW::Mechanize ++ > > > 2012/10/19 Ricardo Filipo > >> Eu gosto do HTML::TreeBuilder pois dá uma visão mais organizada do DOM. >> >> Veja um exemplo de uso: >> >> https://github.com/rfilipo/WebService-EBC/blob/master/lib/WebService/EBC/News.pm >> >> ------------------------------ >> *De:* Aureliano Guedes >> *Para:* Rio PM >> *Enviadas:* Sexta-feira, 19 de Outubro de 2012 13:22 >> *Assunto:* [Rio-pm] HTML::Parse >> >> Ola monges, >> tudo bem? >> >> Qual um bom modulo para buscar string em um HTML? >> Vocês aconselham o HTML::Parse? >> >> Eu não entendo muito de html, mas estou tentando pegar um link dentro de >> uma pagina. >> >> Um exemplo é esse: >> http://www.buscamp3.org/busca/Thaeme+e+Thiago+-+Ai+que+do/ >> >> Os Links estão nesse formato: >> >> >> >> >> O Problema é que no caso dessa pagina tem 4 links desse modelo e eu >> queria pegar apenas o primeiro. >> Poderia usar regexp mas anteriormente me disseram que não é muito >> elegante parsear HTML na unha. >> >> Sei que a duvida é banal, mas se puderem me dar uma dica agradeço. >> >> Att, >> Aureliano Guedes. >> >> _______________________________________________ >> Rio-pm mailing list >> Rio-pm em pm.org >> http://mail.pm.org/mailman/listinfo/rio-pm >> >> >> _______________________________________________ >> Rio-pm mailing list >> Rio-pm em pm.org >> http://mail.pm.org/mailman/listinfo/rio-pm >> > > > > -- > Rafael Prenzier dos Santos | Engenheiro e Perl Monger > > (11) 5209-0847 > > www.prenzier.com > > > > > > > > > > > > _______________________________________________ > Rio-pm mailing list > Rio-pm em pm.org > http://mail.pm.org/mailman/listinfo/rio-pm > -------------- next part -------------- An HTML attachment was scrubbed... URL: From guedes_1000 em hotmail.com Fri Oct 19 19:11:54 2012 From: guedes_1000 em hotmail.com (Aureliano Guedes) Date: Sat, 20 Oct 2012 02:11:54 +0000 Subject: [Rio-pm] HTML::Parse In-Reply-To: References: <439E1D4A5AD44A31A2AC2A1C51053B7E@aware.com.br>, <1350603924.20168.140661142604705.79EC4CA7@webmail.messagingengine.com>, , <1350675988.79169.YahooMailNeo@web125202.mail.ne1.yahoo.com>, , Message-ID: Parece interessante mesmo, mas dificil de entender, principalmente quando é alguem que como eu não sabe nada de HTML. Realmente não entendi como faria tudo isso com o Web::Scraper. From: marciodesouzaferreira em gmail.com Date: Fri, 19 Oct 2012 21:14:53 -0300 To: rio-pm em pm.org Subject: Re: [Rio-pm] HTML::Parse estou cansado pra implementar, mas o Web::Scraper é tipo um néctar dos deuses, vc faz um crawler em 5' com ele, bem estilo Perl(que sai da frente e deixa você focar na solução) isso se o HTML não for um monstrengo =) []s, Marcio Ferreira em _marcioferreira(11) 8567-1482 skype: marcio.ferreir4marciodesouzaferreira.blogspot.com 2012/10/19 Rafael Prenzier WWW::Mechanize ++ 2012/10/19 Ricardo Filipo Eu gosto do HTML::TreeBuilder pois dá uma visão mais organizada do DOM. Veja um exemplo de uso: https://github.com/rfilipo/WebService-EBC/blob/master/lib/WebService/EBC/News.pm De: Aureliano Guedes Para: Rio PM Enviadas: Sexta-feira, 19 de Outubro de 2012 13:22 Assunto: [Rio-pm] HTML::Parse Ola monges, tudo bem? Qual um bom modulo para buscar string em um HTML? Vocês aconselham o HTML::Parse? Eu não entendo muito de html, mas estou tentando pegar um link dentro de uma pagina. Um exemplo é esse: http://www.buscamp3.org/busca/Thaeme+e+Thiago+-+Ai+que+do/ Os Links estão nesse formato: O Problema é que no caso dessa pagina tem 4 links desse modelo e eu queria pegar apenas o primeiro. Poderia usar regexp mas anteriormente me disseram que não é muito elegante parsear HTML na unha. Sei que a duvida é banal, mas se puderem me dar uma dica agradeço. Att, Aureliano Guedes. _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm -- Rafael Prenzier dos Santos | Engenheiro e Perl Monger (11) 5209-0847 www.prenzier.com _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm -------------- Próxima Parte ---------- Um anexo em HTML foi limpo... URL: From creaktive em gmail.com Fri Oct 19 20:13:10 2012 From: creaktive em gmail.com (Stanislaw Pusep) Date: Sat, 20 Oct 2012 00:13:10 -0300 Subject: [Rio-pm] HTML::Parse In-Reply-To: References: <439E1D4A5AD44A31A2AC2A1C51053B7E@aware.com.br> <1350603924.20168.140661142604705.79EC4CA7@webmail.messagingengine.com> <1350675988.79169.YahooMailNeo@web125202.mail.ne1.yahoo.com> Message-ID: Web::Scraper requer conhecimento de XPath e/ou seletores CSS. No caso do link que você passou, URL do primeiro MP3 pode ser obtida via XPath: //table[@class='linhas_lista'][1]//tr/td[2]/a/@href De onde tirei isso? De uma extensão pro Chrome, chamada XPath Helper: https://chrome.google.com/webstore/detail/xpath-helper/hgimnogjllphhhkhlmebbmlgjoejdpjl Firefox tem (tinha?) um tal do XPather: https://addons.mozilla.org/en-US/firefox/addon/xpather/ Provando o que o Marcio disse: stas em Stanislaws-MacBook-Pro:~$ perl -CADS -MDDP -MURI -MWeb::Scraper -e 'p scraper{process q(//h1/strong),title=>q(text);process q(//a[@href=~/\.mp3$/]),q(url[])=>q(@href)}->scrape((URI->new(q( http://www.buscamp3.org/busca/Thaeme+e+Thiago+-+Ai+que+do/))) x 2)' Printing in line 1 of -e: \ { title "Baixar Thaeme e Thiago - Ai que do/ grátis", url [ [0] http://www.buscamp3.org/dl/3473494b6c3636334d55/554545485125135/Thaeme+E+Thiago+-+Ai+Que+Do.mp3 , [1] http://www.buscamp3.org/dl/3473674c78687936326f/554545485125135/Thaeme+E+Thiago+-+Ai+Que+Do.mp3 , [2] http://www.buscamp3.org/dl/34736943505352494374/554545485125135/Thaeme+E+Thiago+-+Ai+Que+Do.mp3 , [3] http://www.buscamp3.org/dl/34734c6f727448494d71/554545485125135/Thaeme+E+Thiago+-+Ai+Que+Do.mp3 , [4] http://www.buscamp3.org/dl/3473644e636d6f345245/554545485125135/Thaeme+E+Thiago+-+Ai+Que+Do.mp3 ] } Sem ser one-liner maldito: #!/usr/bin/env perl use common::sense; use Data::Printer; use URI; use Web::Scraper; my $url = URI->new(' http://www.buscamp3.org/busca/Thaeme+e+Thiago+-+Ai+que+do/'); p scraper { process q(//h1/strong), title => 'text'; process q(//a[@href=~/\\.mp3$/]), 'url[]' => '@href'; }->scrape($url, $url); ABS() 2012/10/19 Aureliano Guedes > Parece interessante mesmo, mas dificil de entender, principalmente quando > é alguem que como eu não sabe nada de HTML. > Realmente não entendi como faria tudo isso com o Web::Scraper. > > ------------------------------ > From: marciodesouzaferreira em gmail.com > Date: Fri, 19 Oct 2012 21:14:53 -0300 > > To: rio-pm em pm.org > Subject: Re: [Rio-pm] HTML::Parse > > estou cansado pra implementar, mas o Web::Scraper é tipo um néctar dos > deuses, vc faz um crawler em 5' com ele, bem estilo Perl(que sai da frente > e deixa você focar na solução) isso se o HTML não for um monstrengo =) > > []s, > > Marcio Ferreira > @_marcioferreira > (11) 8567-1482 skype: marcio.ferreir4 > marciodesouzaferreira.blogspot.com > > > > 2012/10/19 Rafael Prenzier > > WWW::Mechanize ++ > > > 2012/10/19 Ricardo Filipo > > Eu gosto do HTML::TreeBuilder pois dá uma visão mais organizada do DOM. > > Veja um exemplo de uso: > > https://github.com/rfilipo/WebService-EBC/blob/master/lib/WebService/EBC/News.pm > > ------------------------------ > *De:* Aureliano Guedes > *Para:* Rio PM > *Enviadas:* Sexta-feira, 19 de Outubro de 2012 13:22 > *Assunto:* [Rio-pm] HTML::Parse > > Ola monges, > tudo bem? > > Qual um bom modulo para buscar string em um HTML? > Vocês aconselham o HTML::Parse? > > Eu não entendo muito de html, mas estou tentando pegar um link dentro de > uma pagina. > > Um exemplo é esse: > http://www.buscamp3.org/busca/Thaeme+e+Thiago+-+Ai+que+do/ > > Os Links estão nesse formato: > > > > > O Problema é que no caso dessa pagina tem 4 links desse modelo e eu queria > pegar apenas o primeiro. > Poderia usar regexp mas anteriormente me disseram que não é muito elegante > parsear HTML na unha. > > Sei que a duvida é banal, mas se puderem me dar uma dica agradeço. > > Att, > Aureliano Guedes. > > _______________________________________________ > Rio-pm mailing list > Rio-pm em pm.org > http://mail.pm.org/mailman/listinfo/rio-pm > > > _______________________________________________ > Rio-pm mailing list > Rio-pm em pm.org > http://mail.pm.org/mailman/listinfo/rio-pm > > > > > -- > Rafael Prenzier dos Santos | Engenheiro e Perl Monger > > (11) 5209-0847 > > www.prenzier.com > > > > > > > > > > > > _______________________________________________ > Rio-pm mailing list > Rio-pm em pm.org > http://mail.pm.org/mailman/listinfo/rio-pm > > > > _______________________________________________ Rio-pm mailing list > Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm > > _______________________________________________ > Rio-pm mailing list > Rio-pm em pm.org > http://mail.pm.org/mailman/listinfo/rio-pm > -------------- Próxima Parte ---------- Um anexo em HTML foi limpo... URL: From marciodesouzaferreira em gmail.com Fri Oct 19 20:37:19 2012 From: marciodesouzaferreira em gmail.com (marcio souza ferreira) Date: Sat, 20 Oct 2012 00:37:19 -0300 Subject: [Rio-pm] HTML::Parse In-Reply-To: References: <439E1D4A5AD44A31A2AC2A1C51053B7E@aware.com.br> <1350603924.20168.140661142604705.79EC4CA7@webmail.messagingengine.com> <1350675988.79169.YahooMailNeo@web125202.mail.ne1.yahoo.com> Message-ID: admiro alguns da lista, meia-noite de uma sexta-feira e a nerdaiada postando código e outros lendo KKKKK forever alone level master! Em 20 de outubro de 2012 00:13, Stanislaw Pusep escreveu: > Web::Scraper requer conhecimento de XPath e/ou seletores CSS. > No caso do link que você passou, URL do primeiro MP3 pode ser obtida via > XPath: > > //table[@class='linhas_lista'][1]//tr/td[2]/a/@href > > De onde tirei isso? De uma extensão pro Chrome, chamada XPath Helper: > https://chrome.google.com/webstore/detail/xpath-helper/hgimnogjllphhhkhlmebbmlgjoejdpjl > Firefox tem (tinha?) um tal do XPather: > https://addons.mozilla.org/en-US/firefox/addon/xpather/ > > Provando o que o Marcio disse: > > stas em Stanislaws-MacBook-Pro:~$ perl -CADS -MDDP -MURI -MWeb::Scraper -e > 'p scraper{process q(//h1/strong),title=>q(text);process > q(//a[@href=~/\.mp3$/]),q(url[])=>q(@href)}->scrape((URI->new(q( > http://www.buscamp3.org/busca/Thaeme+e+Thiago+-+Ai+que+do/))) x 2)' > Printing in line 1 of -e: > \ { > title "Baixar Thaeme e Thiago - Ai que do/ grátis", > url [ > [0] > http://www.buscamp3.org/dl/3473494b6c3636334d55/554545485125135/Thaeme+E+Thiago+-+Ai+Que+Do.mp3 > , > [1] > http://www.buscamp3.org/dl/3473674c78687936326f/554545485125135/Thaeme+E+Thiago+-+Ai+Que+Do.mp3 > , > [2] > http://www.buscamp3.org/dl/34736943505352494374/554545485125135/Thaeme+E+Thiago+-+Ai+Que+Do.mp3 > , > [3] > http://www.buscamp3.org/dl/34734c6f727448494d71/554545485125135/Thaeme+E+Thiago+-+Ai+Que+Do.mp3 > , > [4] > http://www.buscamp3.org/dl/3473644e636d6f345245/554545485125135/Thaeme+E+Thiago+-+Ai+Que+Do.mp3 > ] > } > > Sem ser one-liner maldito: > > #!/usr/bin/env perl > use common::sense; > use Data::Printer; > use URI; > use Web::Scraper; > > my $url = URI->new(' > http://www.buscamp3.org/busca/Thaeme+e+Thiago+-+Ai+que+do/'); > > p scraper { > process q(//h1/strong), > title => 'text'; > process q(//a[@href=~/\\.mp3$/]), > 'url[]' => '@href'; > }->scrape($url, $url); > > ABS() > > > > > 2012/10/19 Aureliano Guedes > >> Parece interessante mesmo, mas dificil de entender, principalmente >> quando é alguem que como eu não sabe nada de HTML. >> Realmente não entendi como faria tudo isso com o Web::Scraper. >> >> ------------------------------ >> From: marciodesouzaferreira em gmail.com >> Date: Fri, 19 Oct 2012 21:14:53 -0300 >> >> To: rio-pm em pm.org >> Subject: Re: [Rio-pm] HTML::Parse >> >> estou cansado pra implementar, mas o Web::Scraper é tipo um néctar dos >> deuses, vc faz um crawler em 5' com ele, bem estilo Perl(que sai da frente >> e deixa você focar na solução) isso se o HTML não for um monstrengo =) >> >> []s, >> >> Marcio Ferreira >> @_marcioferreira >> (11) 8567-1482 skype: marcio.ferreir4 >> marciodesouzaferreira.blogspot.com >> >> >> >> 2012/10/19 Rafael Prenzier >> >> WWW::Mechanize ++ >> >> >> 2012/10/19 Ricardo Filipo >> >> Eu gosto do HTML::TreeBuilder pois dá uma visão mais organizada do DOM. >> >> Veja um exemplo de uso: >> >> https://github.com/rfilipo/WebService-EBC/blob/master/lib/WebService/EBC/News.pm >> >> ------------------------------ >> *De:* Aureliano Guedes >> *Para:* Rio PM >> *Enviadas:* Sexta-feira, 19 de Outubro de 2012 13:22 >> *Assunto:* [Rio-pm] HTML::Parse >> >> Ola monges, >> tudo bem? >> >> Qual um bom modulo para buscar string em um HTML? >> Vocês aconselham o HTML::Parse? >> >> Eu não entendo muito de html, mas estou tentando pegar um link dentro de >> uma pagina. >> >> Um exemplo é esse: >> http://www.buscamp3.org/busca/Thaeme+e+Thiago+-+Ai+que+do/ >> >> Os Links estão nesse formato: >> >> >> >> >> O Problema é que no caso dessa pagina tem 4 links desse modelo e eu >> queria pegar apenas o primeiro. >> Poderia usar regexp mas anteriormente me disseram que não é muito >> elegante parsear HTML na unha. >> >> Sei que a duvida é banal, mas se puderem me dar uma dica agradeço. >> >> Att, >> Aureliano Guedes. >> >> _______________________________________________ >> Rio-pm mailing list >> Rio-pm em pm.org >> http://mail.pm.org/mailman/listinfo/rio-pm >> >> >> _______________________________________________ >> Rio-pm mailing list >> Rio-pm em pm.org >> http://mail.pm.org/mailman/listinfo/rio-pm >> >> >> >> >> -- >> Rafael Prenzier dos Santos | Engenheiro e Perl Monger >> >> (11) 5209-0847 >> >> www.prenzier.com >> >> >> >> >> >> >> >> >> >> >> >> _______________________________________________ >> Rio-pm mailing list >> Rio-pm em pm.org >> http://mail.pm.org/mailman/listinfo/rio-pm >> >> >> >> _______________________________________________ Rio-pm mailing list >> Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm >> >> _______________________________________________ >> Rio-pm mailing list >> Rio-pm em pm.org >> http://mail.pm.org/mailman/listinfo/rio-pm >> > > > _______________________________________________ > Rio-pm mailing list > Rio-pm em pm.org > http://mail.pm.org/mailman/listinfo/rio-pm > -------------- next part -------------- An HTML attachment was scrubbed... URL: From creaktive em gmail.com Fri Oct 19 21:08:04 2012 From: creaktive em gmail.com (Stanislaw Pusep) Date: Sat, 20 Oct 2012 01:08:04 -0300 Subject: [Rio-pm] HTML::Parse In-Reply-To: References: <439E1D4A5AD44A31A2AC2A1C51053B7E@aware.com.br> <1350603924.20168.140661142604705.79EC4CA7@webmail.messagingengine.com> <1350675988.79169.YahooMailNeo@web125202.mail.ne1.yahoo.com> Message-ID: É a inspiração trazida pelo YAPC::Brasil, transbordando ;) ABS() 2012/10/20 marcio souza ferreira > admiro alguns da lista, meia-noite de uma sexta-feira e a nerdaiada > postando código e outros lendo KKKKK > > forever alone level master! > > Em 20 de outubro de 2012 00:13, Stanislaw Pusep escreveu: > > Web::Scraper requer conhecimento de XPath e/ou seletores CSS. >> No caso do link que você passou, URL do primeiro MP3 pode ser obtida via >> XPath: >> >> //table[@class='linhas_lista'][1]//tr/td[2]/a/@href >> >> De onde tirei isso? De uma extensão pro Chrome, chamada XPath Helper: >> https://chrome.google.com/webstore/detail/xpath-helper/hgimnogjllphhhkhlmebbmlgjoejdpjl >> Firefox tem (tinha?) um tal do XPather: >> https://addons.mozilla.org/en-US/firefox/addon/xpather/ >> >> Provando o que o Marcio disse: >> >> stas em Stanislaws-MacBook-Pro:~$ perl -CADS -MDDP -MURI -MWeb::Scraper -e >> 'p scraper{process q(//h1/strong),title=>q(text);process >> q(//a[@href=~/\.mp3$/]),q(url[])=>q(@href)}->scrape((URI->new(q( >> http://www.buscamp3.org/busca/Thaeme+e+Thiago+-+Ai+que+do/))) x 2)' >> Printing in line 1 of -e: >> \ { >> title "Baixar Thaeme e Thiago - Ai que do/ grátis", >> url [ >> [0] >> http://www.buscamp3.org/dl/3473494b6c3636334d55/554545485125135/Thaeme+E+Thiago+-+Ai+Que+Do.mp3 >> , >> [1] >> http://www.buscamp3.org/dl/3473674c78687936326f/554545485125135/Thaeme+E+Thiago+-+Ai+Que+Do.mp3 >> , >> [2] >> http://www.buscamp3.org/dl/34736943505352494374/554545485125135/Thaeme+E+Thiago+-+Ai+Que+Do.mp3 >> , >> [3] >> http://www.buscamp3.org/dl/34734c6f727448494d71/554545485125135/Thaeme+E+Thiago+-+Ai+Que+Do.mp3 >> , >> [4] >> http://www.buscamp3.org/dl/3473644e636d6f345245/554545485125135/Thaeme+E+Thiago+-+Ai+Que+Do.mp3 >> ] >> } >> >> Sem ser one-liner maldito: >> >> #!/usr/bin/env perl >> use common::sense; >> use Data::Printer; >> use URI; >> use Web::Scraper; >> >> my $url = URI->new(' >> http://www.buscamp3.org/busca/Thaeme+e+Thiago+-+Ai+que+do/'); >> >> p scraper { >> process q(//h1/strong), >> title => 'text'; >> process q(//a[@href=~/\\.mp3$/]), >> 'url[]' => '@href'; >> }->scrape($url, $url); >> >> ABS() >> >> >> >> >> 2012/10/19 Aureliano Guedes >> >>> Parece interessante mesmo, mas dificil de entender, principalmente >>> quando é alguem que como eu não sabe nada de HTML. >>> Realmente não entendi como faria tudo isso com o Web::Scraper. >>> >>> ------------------------------ >>> From: marciodesouzaferreira em gmail.com >>> Date: Fri, 19 Oct 2012 21:14:53 -0300 >>> >>> To: rio-pm em pm.org >>> Subject: Re: [Rio-pm] HTML::Parse >>> >>> estou cansado pra implementar, mas o Web::Scraper é tipo um néctar dos >>> deuses, vc faz um crawler em 5' com ele, bem estilo Perl(que sai da frente >>> e deixa você focar na solução) isso se o HTML não for um monstrengo =) >>> >>> []s, >>> >>> Marcio Ferreira >>> @_marcioferreira >>> (11) 8567-1482 skype: marcio.ferreir4 >>> marciodesouzaferreira.blogspot.com >>> >>> >>> >>> 2012/10/19 Rafael Prenzier >>> >>> WWW::Mechanize ++ >>> >>> >>> 2012/10/19 Ricardo Filipo >>> >>> Eu gosto do HTML::TreeBuilder pois dá uma visão mais organizada do DOM. >>> >>> Veja um exemplo de uso: >>> >>> https://github.com/rfilipo/WebService-EBC/blob/master/lib/WebService/EBC/News.pm >>> >>> ------------------------------ >>> *De:* Aureliano Guedes >>> *Para:* Rio PM >>> *Enviadas:* Sexta-feira, 19 de Outubro de 2012 13:22 >>> *Assunto:* [Rio-pm] HTML::Parse >>> >>> Ola monges, >>> tudo bem? >>> >>> Qual um bom modulo para buscar string em um HTML? >>> Vocês aconselham o HTML::Parse? >>> >>> Eu não entendo muito de html, mas estou tentando pegar um link dentro de >>> uma pagina. >>> >>> Um exemplo é esse: >>> http://www.buscamp3.org/busca/Thaeme+e+Thiago+-+Ai+que+do/ >>> >>> Os Links estão nesse formato: >>> >>> >>> >>> >>> O Problema é que no caso dessa pagina tem 4 links desse modelo e eu >>> queria pegar apenas o primeiro. >>> Poderia usar regexp mas anteriormente me disseram que não é muito >>> elegante parsear HTML na unha. >>> >>> Sei que a duvida é banal, mas se puderem me dar uma dica agradeço. >>> >>> Att, >>> Aureliano Guedes. >>> >>> _______________________________________________ >>> Rio-pm mailing list >>> Rio-pm em pm.org >>> http://mail.pm.org/mailman/listinfo/rio-pm >>> >>> >>> _______________________________________________ >>> Rio-pm mailing list >>> Rio-pm em pm.org >>> http://mail.pm.org/mailman/listinfo/rio-pm >>> >>> >>> >>> >>> -- >>> Rafael Prenzier dos Santos | Engenheiro e Perl Monger >>> >>> (11) 5209-0847 >>> >>> www.prenzier.com >>> >>> >>> >>> >>> >>> >>> >>> >>> >>> >>> >>> _______________________________________________ >>> Rio-pm mailing list >>> Rio-pm em pm.org >>> http://mail.pm.org/mailman/listinfo/rio-pm >>> >>> >>> >>> _______________________________________________ Rio-pm mailing list >>> Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm >>> >>> _______________________________________________ >>> Rio-pm mailing list >>> Rio-pm em pm.org >>> http://mail.pm.org/mailman/listinfo/rio-pm >>> >> >> >> _______________________________________________ >> Rio-pm mailing list >> Rio-pm em pm.org >> http://mail.pm.org/mailman/listinfo/rio-pm >> > > > _______________________________________________ > Rio-pm mailing list > Rio-pm em pm.org > http://mail.pm.org/mailman/listinfo/rio-pm > -------------- Próxima Parte ---------- Um anexo em HTML foi limpo... URL: From guedes_1000 em hotmail.com Sat Oct 20 08:25:29 2012 From: guedes_1000 em hotmail.com (Aureliano Guedes) Date: Sat, 20 Oct 2012 15:25:29 +0000 Subject: [Rio-pm] HTML::Parse In-Reply-To: References: <439E1D4A5AD44A31A2AC2A1C51053B7E@aware.com.br>, <1350603924.20168.140661142604705.79EC4CA7@webmail.messagingengine.com>, , <1350675988.79169.YahooMailNeo@web125202.mail.ne1.yahoo.com>, , , , Message-ID: Web::Scraper requer conhecimento de XPath e/ou seletores CSS. Nesse caso não é pra mim, não retenho esses conmhecimentos. From: creaktive em gmail.com Date: Sat, 20 Oct 2012 00:13:10 -0300 To: rio-pm em pm.org Subject: Re: [Rio-pm] HTML::Parse Web::Scraper requer conhecimento de XPath e/ou seletores CSS.No caso do link que você passou, URL do primeiro MP3 pode ser obtida via XPath: //table[@class='linhas_lista'][1]//tr/td[2]/a/@href De onde tirei isso? De uma extensão pro Chrome, chamada XPath Helper: https://chrome.google.com/webstore/detail/xpath-helper/hgimnogjllphhhkhlmebbmlgjoejdpjl Firefox tem (tinha?) um tal do XPather: https://addons.mozilla.org/en-US/firefox/addon/xpather/ Provando o que o Marcio disse: stas em Stanislaws-MacBook-Pro:~$ perl -CADS -MDDP -MURI -MWeb::Scraper -e 'p scraper{process q(//h1/strong),title=>q(text);process q(//a[@href=~/\.mp3$/]),q(url[])=>q(@href)}->scrape((URI->new(q(http://www.buscamp3.org/busca/Thaeme+e+Thiago+-+Ai+que+do/))) x 2)' Printing in line 1 of -e:\ { title "Baixar Thaeme e Thiago - Ai que do/ grátis", url [ [0] http://www.buscamp3.org/dl/3473494b6c3636334d55/554545485125135/Thaeme+E+Thiago+-+Ai+Que+Do.mp3, [1] http://www.buscamp3.org/dl/3473674c78687936326f/554545485125135/Thaeme+E+Thiago+-+Ai+Que+Do.mp3, [2] http://www.buscamp3.org/dl/34736943505352494374/554545485125135/Thaeme+E+Thiago+-+Ai+Que+Do.mp3, [3] http://www.buscamp3.org/dl/34734c6f727448494d71/554545485125135/Thaeme+E+Thiago+-+Ai+Que+Do.mp3, [4] http://www.buscamp3.org/dl/3473644e636d6f345245/554545485125135/Thaeme+E+Thiago+-+Ai+Que+Do.mp3 ]} Sem ser one-liner maldito: #!/usr/bin/env perluse common::sense;use Data::Printer;use URI;use Web::Scraper; my $url = URI->new('http://www.buscamp3.org/busca/Thaeme+e+Thiago+-+Ai+que+do/'); p scraper { process q(//h1/strong), title => 'text'; process q(//a[@href=~/\\.mp3$/]), 'url[]' => '@href';}->scrape($url, $url); ABS() 2012/10/19 Aureliano Guedes Parece interessante mesmo, mas dificil de entender, principalmente quando é alguem que como eu não sabe nada de HTML. Realmente não entendi como faria tudo isso com o Web::Scraper. From: marciodesouzaferreira em gmail.com Date: Fri, 19 Oct 2012 21:14:53 -0300 To: rio-pm em pm.org Subject: Re: [Rio-pm] HTML::Parse estou cansado pra implementar, mas o Web::Scraper é tipo um néctar dos deuses, vc faz um crawler em 5' com ele, bem estilo Perl(que sai da frente e deixa você focar na solução) isso se o HTML não for um monstrengo =) []s, Marcio Ferreira em _marcioferreira(11) 8567-1482 skype: marcio.ferreir4marciodesouzaferreira.blogspot.com 2012/10/19 Rafael Prenzier WWW::Mechanize ++ 2012/10/19 Ricardo Filipo Eu gosto do HTML::TreeBuilder pois dá uma visão mais organizada do DOM. Veja um exemplo de uso: https://github.com/rfilipo/WebService-EBC/blob/master/lib/WebService/EBC/News.pm De: Aureliano Guedes Para: Rio PM Enviadas: Sexta-feira, 19 de Outubro de 2012 13:22 Assunto: [Rio-pm] HTML::Parse Ola monges, tudo bem? Qual um bom modulo para buscar string em um HTML? Vocês aconselham o HTML::Parse? Eu não entendo muito de html, mas estou tentando pegar um link dentro de uma pagina. Um exemplo é esse: http://www.buscamp3.org/busca/Thaeme+e+Thiago+-+Ai+que+do/ Os Links estão nesse formato: O Problema é que no caso dessa pagina tem 4 links desse modelo e eu queria pegar apenas o primeiro. Poderia usar regexp mas anteriormente me disseram que não é muito elegante parsear HTML na unha. Sei que a duvida é banal, mas se puderem me dar uma dica agradeço. Att, Aureliano Guedes. _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm -- Rafael Prenzier dos Santos | Engenheiro e Perl Monger (11) 5209-0847 www.prenzier.com _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm -------------- Próxima Parte ---------- Um anexo em HTML foi limpo... URL: From guedes_1000 em hotmail.com Sat Oct 20 08:29:24 2012 From: guedes_1000 em hotmail.com (Aureliano Guedes) Date: Sat, 20 Oct 2012 15:29:24 +0000 Subject: [Rio-pm] HTML::Parse In-Reply-To: References: <439E1D4A5AD44A31A2AC2A1C51053B7E@aware.com.br>, , <1350603924.20168.140661142604705.79EC4CA7@webmail.messagingengine.com>, , , , <1350675988.79169.YahooMailNeo@web125202.mail.ne1.yahoo.com>, , , , , , , , , Message-ID: Eu tinha chegado nesses links do mp3, o problema é que fazer o download deles não funciona. No caso: use LWP::Simple; my @url = get ('www.buscamp3.org/dl/34736943505352494374/554545485125135/Thaeme+E+Thiago+-+Ai+Que+Do.mp3'); open OUT,">". 'abcde.mp3'; print OUT $_ foreach (@url); Obtive um arquivo vazio. Oque pode ser?? From: guedes_1000 em hotmail.com To: rio-pm em pm.org Date: Sat, 20 Oct 2012 15:25:29 +0000 Subject: Re: [Rio-pm] HTML::Parse Web::Scraper requer conhecimento de XPath e/ou seletores CSS. Nesse caso não é pra mim, não retenho esses conmhecimentos. From: creaktive em gmail.com Date: Sat, 20 Oct 2012 00:13:10 -0300 To: rio-pm em pm.org Subject: Re: [Rio-pm] HTML::Parse Web::Scraper requer conhecimento de XPath e/ou seletores CSS.No caso do link que você passou, URL do primeiro MP3 pode ser obtida via XPath: //table[@class='linhas_lista'][1]//tr/td[2]/a/@href De onde tirei isso? De uma extensão pro Chrome, chamada XPath Helper: https://chrome.google.com/webstore/detail/xpath-helper/hgimnogjllphhhkhlmebbmlgjoejdpjl Firefox tem (tinha?) um tal do XPather: https://addons.mozilla.org/en-US/firefox/addon/xpather/ Provando o que o Marcio disse: stas em Stanislaws-MacBook-Pro:~$ perl -CADS -MDDP -MURI -MWeb::Scraper -e 'p scraper{process q(//h1/strong),title=>q(text);process q(//a[@href=~/\.mp3$/]),q(url[])=>q(@href)}->scrape((URI->new(q(http://www.buscamp3.org/busca/Thaeme+e+Thiago+-+Ai+que+do/))) x 2)' Printing in line 1 of -e:\ { title "Baixar Thaeme e Thiago - Ai que do/ grátis", url [ [0] http://www.buscamp3.org/dl/3473494b6c3636334d55/554545485125135/Thaeme+E+Thiago+-+Ai+Que+Do.mp3, [1] http://www.buscamp3.org/dl/3473674c78687936326f/554545485125135/Thaeme+E+Thiago+-+Ai+Que+Do.mp3, [2] http://www.buscamp3.org/dl/34736943505352494374/554545485125135/Thaeme+E+Thiago+-+Ai+Que+Do.mp3, [3] http://www.buscamp3.org/dl/34734c6f727448494d71/554545485125135/Thaeme+E+Thiago+-+Ai+Que+Do.mp3, [4] http://www.buscamp3.org/dl/3473644e636d6f345245/554545485125135/Thaeme+E+Thiago+-+Ai+Que+Do.mp3 ]} Sem ser one-liner maldito: #!/usr/bin/env perluse common::sense;use Data::Printer;use URI;use Web::Scraper; my $url = URI->new('http://www.buscamp3.org/busca/Thaeme+e+Thiago+-+Ai+que+do/'); p scraper { process q(//h1/strong), title => 'text'; process q(//a[@href=~/\\.mp3$/]), 'url[]' => '@href';}->scrape($url, $url); ABS() 2012/10/19 Aureliano Guedes Parece interessante mesmo, mas dificil de entender, principalmente quando é alguem que como eu não sabe nada de HTML. Realmente não entendi como faria tudo isso com o Web::Scraper. From: marciodesouzaferreira em gmail.com Date: Fri, 19 Oct 2012 21:14:53 -0300 To: rio-pm em pm.org Subject: Re: [Rio-pm] HTML::Parse estou cansado pra implementar, mas o Web::Scraper é tipo um néctar dos deuses, vc faz um crawler em 5' com ele, bem estilo Perl(que sai da frente e deixa você focar na solução) isso se o HTML não for um monstrengo =) []s, Marcio Ferreira em _marcioferreira(11) 8567-1482 skype: marcio.ferreir4marciodesouzaferreira.blogspot.com 2012/10/19 Rafael Prenzier WWW::Mechanize ++ 2012/10/19 Ricardo Filipo Eu gosto do HTML::TreeBuilder pois dá uma visão mais organizada do DOM. Veja um exemplo de uso: https://github.com/rfilipo/WebService-EBC/blob/master/lib/WebService/EBC/News.pm De: Aureliano Guedes Para: Rio PM Enviadas: Sexta-feira, 19 de Outubro de 2012 13:22 Assunto: [Rio-pm] HTML::Parse Ola monges, tudo bem? Qual um bom modulo para buscar string em um HTML? Vocês aconselham o HTML::Parse? Eu não entendo muito de html, mas estou tentando pegar um link dentro de uma pagina. Um exemplo é esse: http://www.buscamp3.org/busca/Thaeme+e+Thiago+-+Ai+que+do/ Os Links estão nesse formato: O Problema é que no caso dessa pagina tem 4 links desse modelo e eu queria pegar apenas o primeiro. Poderia usar regexp mas anteriormente me disseram que não é muito elegante parsear HTML na unha. Sei que a duvida é banal, mas se puderem me dar uma dica agradeço. Att, Aureliano Guedes. _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm -- Rafael Prenzier dos Santos | Engenheiro e Perl Monger (11) 5209-0847 www.prenzier.com _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm -------------- Próxima Parte ---------- Um anexo em HTML foi limpo... URL: From marciodesouzaferreira em gmail.com Sat Oct 20 08:37:46 2012 From: marciodesouzaferreira em gmail.com (Marcio Ferreira) Date: Sat, 20 Oct 2012 12:37:46 -0300 Subject: [Rio-pm] HTML::Parse In-Reply-To: References: <439E1D4A5AD44A31A2AC2A1C51053B7E@aware.com.br> <1350603924.20168.140661142604705.79EC4CA7@webmail.messagingengine.com> <1350675988.79169.YahooMailNeo@web125202.mail.ne1.yahoo.com> Message-ID: nao entendi pq vc escreveu esse código, tente algo do tipo getstore( $url, "$path/$file" ); []s, Marcio Ferreira @_marcioferreira (11) 8567-1482 skype: marcio.ferreir4 marciodesouzaferreira.blogspot.com 2012/10/20 Aureliano Guedes > Eu tinha chegado nesses links do mp3, o problema é que fazer o download > deles não funciona. > > No caso: > > use LWP::Simple; > my @url = get (' > www.buscamp3.org/dl/34736943505352494374/554545485125135/Thaeme+E+Thiago+-+Ai+Que+Do.mp3' > ); > open OUT,">". 'abcde.mp3'; > print OUT $_ foreach (@url); > > Obtive um arquivo vazio. > > Oque pode ser?? > ------------------------------ > From: guedes_1000 em hotmail.com > To: rio-pm em pm.org > Date: Sat, 20 Oct 2012 15:25:29 +0000 > > Subject: Re: [Rio-pm] HTML::Parse > > Web::Scraper requer conhecimento de XPath e/ou seletores CSS. > > Nesse caso não é pra mim, não retenho esses conmhecimentos. > > ------------------------------ > From: creaktive em gmail.com > Date: Sat, 20 Oct 2012 00:13:10 -0300 > To: rio-pm em pm.org > Subject: Re: [Rio-pm] HTML::Parse > > Web::Scraper requer conhecimento de XPath e/ou seletores CSS. > No caso do link que você passou, URL do primeiro MP3 pode ser obtida via > XPath: > > //table[@class='linhas_lista'][1]//tr/td[2]/a/@href > > De onde tirei isso? De uma extensão pro Chrome, chamada XPath Helper: > https://chrome.google.com/webstore/detail/xpath-helper/hgimnogjllphhhkhlmebbmlgjoejdpjl > Firefox tem (tinha?) um tal do XPather: > https://addons.mozilla.org/en-US/firefox/addon/xpather/ > > Provando o que o Marcio disse: > > stas em Stanislaws-MacBook-Pro:~$ perl -CADS -MDDP -MURI -MWeb::Scraper -e > 'p scraper{process q(//h1/strong),title=>q(text);process > q(//a[@href=~/\.mp3$/]),q(url[])=>q(@href)}->scrape((URI->new(q( > http://www.buscamp3.org/busca/Thaeme+e+Thiago+-+Ai+que+do/))) > x 2)' > Printing in line 1 of -e: > \ { > title "Baixar Thaeme e Thiago - Ai que do/ grátis", > url [ > [0] > http://www.buscamp3.org/dl/3473494b6c3636334d55/554545485125135/Thaeme+E+Thiago+-+Ai+Que+Do.mp3 > , > [1] > http://www.buscamp3.org/dl/3473674c78687936326f/554545485125135/Thaeme+E+Thiago+-+Ai+Que+Do.mp3 > , > [2] > http://www.buscamp3.org/dl/34736943505352494374/554545485125135/Thaeme+E+Thiago+-+Ai+Que+Do.mp3 > , > [3] > http://www.buscamp3.org/dl/34734c6f727448494d71/554545485125135/Thaeme+E+Thiago+-+Ai+Que+Do.mp3 > , > [4] > http://www.buscamp3.org/dl/3473644e636d6f345245/554545485125135/Thaeme+E+Thiago+-+Ai+Que+Do.mp3 > ] > } > > Sem ser one-liner maldito: > > #!/usr/bin/env perl > use common::sense; > use Data::Printer; > use URI; > use Web::Scraper; > > my $url = URI->new(' > http://www.buscamp3.org/busca/Thaeme+e+Thiago+-+Ai+que+do/' > ); > > p scraper { > process q(//h1/strong), > title => 'text'; > process q(//a[@href=~/\\.mp3$/]), > 'url[]' => '@href'; > }->scrape($url, $url); > > ABS() > > > > 2012/10/19 Aureliano Guedes > > Parece interessante mesmo, mas dificil de entender, principalmente quando > é alguem que como eu não sabe nada de HTML. > Realmente não entendi como faria tudo isso com o Web::Scraper. > > ------------------------------ > From: marciodesouzaferreira em gmail.com > Date: Fri, 19 Oct 2012 21:14:53 -0300 > > To: rio-pm em pm.org > Subject: Re: [Rio-pm] HTML::Parse > > estou cansado pra implementar, mas o Web::Scraper é tipo um néctar dos > deuses, vc faz um crawler em 5' com ele, bem estilo Perl(que sai da frente > e deixa você focar na solução) isso se o HTML não for um monstrengo =) > > []s, > > Marcio Ferreira > @_marcioferreira > (11) 8567-1482 skype: marcio.ferreir4 > marciodesouzaferreira.blogspot.com > > > > 2012/10/19 Rafael Prenzier > > WWW::Mechanize ++ > > > 2012/10/19 Ricardo Filipo > > Eu gosto do HTML::TreeBuilder pois dá uma visão mais organizada do DOM. > > Veja um exemplo de uso: > > https://github.com/rfilipo/WebService-EBC/blob/master/lib/WebService/EBC/News.pm > > ------------------------------ > *De:* Aureliano Guedes > *Para:* Rio PM > *Enviadas:* Sexta-feira, 19 de Outubro de 2012 13:22 > *Assunto:* [Rio-pm] HTML::Parse > > Ola monges, > tudo bem? > > Qual um bom modulo para buscar string em um HTML? > Vocês aconselham o HTML::Parse? > > Eu não entendo muito de html, mas estou tentando pegar um link dentro de > uma pagina. > > Um exemplo é esse: > http://www.buscamp3.org/busca/Thaeme+e+Thiago+-+Ai+que+do/ > > Os Links estão nesse formato: > > > > > O Problema é que no caso dessa pagina tem 4 links desse modelo e eu queria > pegar apenas o primeiro. > Poderia usar regexp mas anteriormente me disseram que não é muito elegante > parsear HTML na unha. > > Sei que a duvida é banal, mas se puderem me dar uma dica agradeço. > > Att, > Aureliano Guedes. > > _______________________________________________ > Rio-pm mailing list > Rio-pm em pm.org > http://mail.pm.org/mailman/listinfo/rio-pm > > > _______________________________________________ > Rio-pm mailing list > Rio-pm em pm.org > http://mail.pm.org/mailman/listinfo/rio-pm > > > > > -- > Rafael Prenzier dos Santos | Engenheiro e Perl Monger > > (11) 5209-0847 > > www.prenzier.com > > > > > > > > > > > > _______________________________________________ > Rio-pm mailing list > Rio-pm em pm.org > http://mail.pm.org/mailman/listinfo/rio-pm > > > > _______________________________________________ Rio-pm mailing list > Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm > > _______________________________________________ > Rio-pm mailing list > Rio-pm em pm.org > http://mail.pm.org/mailman/listinfo/rio-pm > > > > _______________________________________________ Rio-pm mailing list > Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm > > _______________________________________________ Rio-pm mailing list > Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm > > _______________________________________________ > Rio-pm mailing list > Rio-pm em pm.org > http://mail.pm.org/mailman/listinfo/rio-pm > -------------- next part -------------- An HTML attachment was scrubbed... URL: From bruno.buss em gmail.com Sat Oct 20 08:39:02 2012 From: bruno.buss em gmail.com (Bruno Buss) Date: Sat, 20 Oct 2012 12:39:02 -0300 Subject: [Rio-pm] HTML::Parse In-Reply-To: References: <439E1D4A5AD44A31A2AC2A1C51053B7E@aware.com.br> <1350603924.20168.140661142604705.79EC4CA7@webmail.messagingengine.com> <1350675988.79169.YahooMailNeo@web125202.mail.ne1.yahoo.com> Message-ID: Você consegue fazer o download desse arquivo manualmente, colando o endereço no seu próprio browser? Aqui esse link da erro... [ ]'s 2012/10/20 Aureliano Guedes > Eu tinha chegado nesses links do mp3, o problema é que fazer o download > deles não funciona. > > No caso: > > use LWP::Simple; > my @url = get (' > www.buscamp3.org/dl/34736943505352494374/554545485125135/Thaeme+E+Thiago+-+Ai+Que+Do.mp3' > ); > open OUT,">". 'abcde.mp3'; > print OUT $_ foreach (@url); > > Obtive um arquivo vazio. > > Oque pode ser?? > ------------------------------ > From: guedes_1000 em hotmail.com > To: rio-pm em pm.org > Date: Sat, 20 Oct 2012 15:25:29 +0000 > > Subject: Re: [Rio-pm] HTML::Parse > > Web::Scraper requer conhecimento de XPath e/ou seletores CSS. > > Nesse caso não é pra mim, não retenho esses conmhecimentos. > > ------------------------------ > From: creaktive em gmail.com > Date: Sat, 20 Oct 2012 00:13:10 -0300 > To: rio-pm em pm.org > Subject: Re: [Rio-pm] HTML::Parse > > Web::Scraper requer conhecimento de XPath e/ou seletores CSS. > No caso do link que você passou, URL do primeiro MP3 pode ser obtida via > XPath: > > //table[@class='linhas_lista'][1]//tr/td[2]/a/@href > > De onde tirei isso? De uma extensão pro Chrome, chamada XPath Helper: > https://chrome.google.com/webstore/detail/xpath-helper/hgimnogjllphhhkhlmebbmlgjoejdpjl > Firefox tem (tinha?) um tal do XPather: > https://addons.mozilla.org/en-US/firefox/addon/xpather/ > > Provando o que o Marcio disse: > > stas em Stanislaws-MacBook-Pro:~$ perl -CADS -MDDP -MURI -MWeb::Scraper -e > 'p scraper{process q(//h1/strong),title=>q(text);process > q(//a[@href=~/\.mp3$/]),q(url[])=>q(@href)}->scrape((URI->new(q( > http://www.buscamp3.org/busca/Thaeme+e+Thiago+-+Ai+que+do/))) > x 2)' > Printing in line 1 of -e: > \ { > title "Baixar Thaeme e Thiago - Ai que do/ grátis", > url [ > [0] > http://www.buscamp3.org/dl/3473494b6c3636334d55/554545485125135/Thaeme+E+Thiago+-+Ai+Que+Do.mp3 > , > [1] > http://www.buscamp3.org/dl/3473674c78687936326f/554545485125135/Thaeme+E+Thiago+-+Ai+Que+Do.mp3 > , > [2] > http://www.buscamp3.org/dl/34736943505352494374/554545485125135/Thaeme+E+Thiago+-+Ai+Que+Do.mp3 > , > [3] > http://www.buscamp3.org/dl/34734c6f727448494d71/554545485125135/Thaeme+E+Thiago+-+Ai+Que+Do.mp3 > , > [4] > http://www.buscamp3.org/dl/3473644e636d6f345245/554545485125135/Thaeme+E+Thiago+-+Ai+Que+Do.mp3 > ] > } > > Sem ser one-liner maldito: > > #!/usr/bin/env perl > use common::sense; > use Data::Printer; > use URI; > use Web::Scraper; > > my $url = URI->new(' > http://www.buscamp3.org/busca/Thaeme+e+Thiago+-+Ai+que+do/' > ); > > p scraper { > process q(//h1/strong), > title => 'text'; > process q(//a[@href=~/\\.mp3$/]), > 'url[]' => '@href'; > }->scrape($url, $url); > > ABS() > > > > 2012/10/19 Aureliano Guedes > > Parece interessante mesmo, mas dificil de entender, principalmente quando > é alguem que como eu não sabe nada de HTML. > Realmente não entendi como faria tudo isso com o Web::Scraper. > > ------------------------------ > From: marciodesouzaferreira em gmail.com > Date: Fri, 19 Oct 2012 21:14:53 -0300 > > To: rio-pm em pm.org > Subject: Re: [Rio-pm] HTML::Parse > > estou cansado pra implementar, mas o Web::Scraper é tipo um néctar dos > deuses, vc faz um crawler em 5' com ele, bem estilo Perl(que sai da frente > e deixa você focar na solução) isso se o HTML não for um monstrengo =) > > []s, > > Marcio Ferreira > @_marcioferreira > (11) 8567-1482 skype: marcio.ferreir4 > marciodesouzaferreira.blogspot.com > > > > 2012/10/19 Rafael Prenzier > > WWW::Mechanize ++ > > > 2012/10/19 Ricardo Filipo > > Eu gosto do HTML::TreeBuilder pois dá uma visão mais organizada do DOM. > > Veja um exemplo de uso: > > https://github.com/rfilipo/WebService-EBC/blob/master/lib/WebService/EBC/News.pm > > ------------------------------ > *De:* Aureliano Guedes > *Para:* Rio PM > *Enviadas:* Sexta-feira, 19 de Outubro de 2012 13:22 > *Assunto:* [Rio-pm] HTML::Parse > > Ola monges, > tudo bem? > > Qual um bom modulo para buscar string em um HTML? > Vocês aconselham o HTML::Parse? > > Eu não entendo muito de html, mas estou tentando pegar um link dentro de > uma pagina. > > Um exemplo é esse: > http://www.buscamp3.org/busca/Thaeme+e+Thiago+-+Ai+que+do/ > > Os Links estão nesse formato: > > > > > O Problema é que no caso dessa pagina tem 4 links desse modelo e eu queria > pegar apenas o primeiro. > Poderia usar regexp mas anteriormente me disseram que não é muito elegante > parsear HTML na unha. > > Sei que a duvida é banal, mas se puderem me dar uma dica agradeço. > > Att, > Aureliano Guedes. > > _______________________________________________ > Rio-pm mailing list > Rio-pm em pm.org > http://mail.pm.org/mailman/listinfo/rio-pm > > > _______________________________________________ > Rio-pm mailing list > Rio-pm em pm.org > http://mail.pm.org/mailman/listinfo/rio-pm > > > > > -- > Rafael Prenzier dos Santos | Engenheiro e Perl Monger > > (11) 5209-0847 > > www.prenzier.com > > > > > > > > > > > > _______________________________________________ > Rio-pm mailing list > Rio-pm em pm.org > http://mail.pm.org/mailman/listinfo/rio-pm > > > > _______________________________________________ Rio-pm mailing list > Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm > > _______________________________________________ > Rio-pm mailing list > Rio-pm em pm.org > http://mail.pm.org/mailman/listinfo/rio-pm > > > > _______________________________________________ Rio-pm mailing list > Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm > > _______________________________________________ Rio-pm mailing list > Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm > > _______________________________________________ > Rio-pm mailing list > Rio-pm em pm.org > http://mail.pm.org/mailman/listinfo/rio-pm > -- Bruno C. Buss http://www.brunobuss.net -------------- Próxima Parte ---------- Um anexo em HTML foi limpo... URL: From guedes_1000 em hotmail.com Sat Oct 20 09:27:32 2012 From: guedes_1000 em hotmail.com (Aureliano Guedes) Date: Sat, 20 Oct 2012 16:27:32 +0000 Subject: [Rio-pm] HTML::Parse In-Reply-To: References: <439E1D4A5AD44A31A2AC2A1C51053B7E@aware.com.br>, <1350603924.20168.140661142604705.79EC4CA7@webmail.messagingengine.com>, , <1350675988.79169.YahooMailNeo@web125202.mail.ne1.yahoo.com>, , , , , , , Message-ID: Pois é Bruno, aqui tambem da erro, mas se eu entrar nessa pagina http://www.buscamp3.org/busca/Thaeme+e+Thiago+-+Ai+que+do/ e clicar no link o download inicia, e aparentemente é esse o link, a não ser que esse link que eu esteja pegando da pagina esteja errado é o link de download seja outro. From: bruno.buss em gmail.com Date: Sat, 20 Oct 2012 12:39:02 -0300 To: rio-pm em pm.org Subject: Re: [Rio-pm] HTML::Parse Você consegue fazer o download desse arquivo manualmente, colando o endereço no seu próprio browser?Aqui esse link da erro... [ ]'s 2012/10/20 Aureliano Guedes Eu tinha chegado nesses links do mp3, o problema é que fazer o download deles não funciona. No caso: use LWP::Simple; my @url = get ('www.buscamp3.org/dl/34736943505352494374/554545485125135/Thaeme+E+Thiago+-+Ai+Que+Do.mp3'); open OUT,">". 'abcde.mp3'; print OUT $_ foreach (@url); Obtive um arquivo vazio. Oque pode ser?? From: guedes_1000 em hotmail.com To: rio-pm em pm.org Date: Sat, 20 Oct 2012 15:25:29 +0000 Subject: Re: [Rio-pm] HTML::Parse Web::Scraper requer conhecimento de XPath e/ou seletores CSS. Nesse caso não é pra mim, não retenho esses conmhecimentos. From: creaktive em gmail.com Date: Sat, 20 Oct 2012 00:13:10 -0300 To: rio-pm em pm.org Subject: Re: [Rio-pm] HTML::Parse Web::Scraper requer conhecimento de XPath e/ou seletores CSS. No caso do link que você passou, URL do primeiro MP3 pode ser obtida via XPath: //table[@class='linhas_lista'][1]//tr/td[2]/a/@href De onde tirei isso? De uma extensão pro Chrome, chamada XPath Helper: https://chrome.google.com/webstore/detail/xpath-helper/hgimnogjllphhhkhlmebbmlgjoejdpjl Firefox tem (tinha?) um tal do XPather: https://addons.mozilla.org/en-US/firefox/addon/xpather/ Provando o que o Marcio disse: stas em Stanislaws-MacBook-Pro:~$ perl -CADS -MDDP -MURI -MWeb::Scraper -e 'p scraper{process q(//h1/strong),title=>q(text);process q(//a[@href=~/\.mp3$/]),q(url[])=>q(@href)}->scrape((URI->new(q(http://www.buscamp3.org/busca/Thaeme+e+Thiago+-+Ai+que+do/))) x 2)' Printing in line 1 of -e:\ { title "Baixar Thaeme e Thiago - Ai que do/ grátis", url [ [0] http://www.buscamp3.org/dl/3473494b6c3636334d55/554545485125135/Thaeme+E+Thiago+-+Ai+Que+Do.mp3, [1] http://www.buscamp3.org/dl/3473674c78687936326f/554545485125135/Thaeme+E+Thiago+-+Ai+Que+Do.mp3, [2] http://www.buscamp3.org/dl/34736943505352494374/554545485125135/Thaeme+E+Thiago+-+Ai+Que+Do.mp3, [3] http://www.buscamp3.org/dl/34734c6f727448494d71/554545485125135/Thaeme+E+Thiago+-+Ai+Que+Do.mp3, [4] http://www.buscamp3.org/dl/3473644e636d6f345245/554545485125135/Thaeme+E+Thiago+-+Ai+Que+Do.mp3 ]} Sem ser one-liner maldito: #!/usr/bin/env perluse common::sense;use Data::Printer;use URI;use Web::Scraper; my $url = URI->new('http://www.buscamp3.org/busca/Thaeme+e+Thiago+-+Ai+que+do/'); p scraper { process q(//h1/strong), title => 'text'; process q(//a[@href=~/\\.mp3$/]), 'url[]' => '@href';}->scrape($url, $url); ABS() 2012/10/19 Aureliano Guedes Parece interessante mesmo, mas dificil de entender, principalmente quando é alguem que como eu não sabe nada de HTML. Realmente não entendi como faria tudo isso com o Web::Scraper. From: marciodesouzaferreira em gmail.com Date: Fri, 19 Oct 2012 21:14:53 -0300 To: rio-pm em pm.org Subject: Re: [Rio-pm] HTML::Parse estou cansado pra implementar, mas o Web::Scraper é tipo um néctar dos deuses, vc faz um crawler em 5' com ele, bem estilo Perl(que sai da frente e deixa você focar na solução) isso se o HTML não for um monstrengo =) []s, Marcio Ferreira em _marcioferreira(11) 8567-1482 skype: marcio.ferreir4marciodesouzaferreira.blogspot.com 2012/10/19 Rafael Prenzier WWW::Mechanize ++ 2012/10/19 Ricardo Filipo Eu gosto do HTML::TreeBuilder pois dá uma visão mais organizada do DOM. Veja um exemplo de uso: https://github.com/rfilipo/WebService-EBC/blob/master/lib/WebService/EBC/News.pm De: Aureliano Guedes Para: Rio PM Enviadas: Sexta-feira, 19 de Outubro de 2012 13:22 Assunto: [Rio-pm] HTML::Parse Ola monges, tudo bem? Qual um bom modulo para buscar string em um HTML? Vocês aconselham o HTML::Parse? Eu não entendo muito de html, mas estou tentando pegar um link dentro de uma pagina. Um exemplo é esse: http://www.buscamp3.org/busca/Thaeme+e+Thiago+-+Ai+que+do/ Os Links estão nesse formato: O Problema é que no caso dessa pagina tem 4 links desse modelo e eu queria pegar apenas o primeiro. Poderia usar regexp mas anteriormente me disseram que não é muito elegante parsear HTML na unha. Sei que a duvida é banal, mas se puderem me dar uma dica agradeço. Att, Aureliano Guedes. _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm -- Rafael Prenzier dos Santos | Engenheiro e Perl Monger (11) 5209-0847 www.prenzier.com _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm -- Bruno C. Buss http://www.brunobuss.net _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm -------------- Próxima Parte ---------- Um anexo em HTML foi limpo... URL: From bruno.buss em gmail.com Sat Oct 20 09:44:45 2012 From: bruno.buss em gmail.com (Bruno Buss) Date: Sat, 20 Oct 2012 13:44:45 -0300 Subject: [Rio-pm] HTML::Parse In-Reply-To: References: <439E1D4A5AD44A31A2AC2A1C51053B7E@aware.com.br> <1350603924.20168.140661142604705.79EC4CA7@webmail.messagingengine.com> <1350675988.79169.YahooMailNeo@web125202.mail.ne1.yahoo.com> Message-ID: Então provavelmente eles estão verificando pelo referer no header do request HTTP [1]. Não sei como funciona o LWP::Simple, mas com o LWP::UserAgent você consegue setar parametros pro header a ser enviado. No caso você deveria setar o referer para ' http://www.buscamp3.org/download/thaeme+e+thiago+ai+que+do_3473494b6c3636334d55.html '. Outra opção talvez seja usar o WWW::Mechanize, acho que ele faz isso automaticamente para você, se você utilizar as funções de "navegação" dele. No mais, deixe-me discordar da seguinte frase que você escreveu anteriormente (sobre XPath e seletores CSS): "Nesse caso não é pra mim, não retenho esses conhecimentos." Se você não conhece XPath e/ou seletores CSS, você deveria procurar dar uma olhada/estudada breve neles se isso for necessário para resolver um problema seu. É uma mentalidade melhor do que assumir que você não sabe, nem vai apreender e por isso limitar o seu leque de opções para fazer o que você quer ;) [ ]'s [1] https://en.wikipedia.org/wiki/HTTP_referer 2012/10/20 Aureliano Guedes > Pois é Bruno, aqui tambem da erro, mas se eu entrar nessa pagina > http://www.buscamp3.org/busca/Thaeme+e+Thiago+-+Ai+que+do/e clicar no link o download inicia, e aparentemente é esse o link, a não > ser que esse link que eu esteja pegando da pagina esteja errado é o link de > download seja outro. > > ------------------------------ > From: bruno.buss em gmail.com > Date: Sat, 20 Oct 2012 12:39:02 -0300 > > To: rio-pm em pm.org > Subject: Re: [Rio-pm] HTML::Parse > > Você consegue fazer o download desse arquivo manualmente, colando o > endereço no seu próprio browser? > Aqui esse link da erro... > > [ ]'s > > 2012/10/20 Aureliano Guedes > > Eu tinha chegado nesses links do mp3, o problema é que fazer o download > deles não funciona. > > No caso: > > use LWP::Simple; > my @url = get (' > www.buscamp3.org/dl/34736943505352494374/554545485125135/Thaeme+E+Thiago+-+Ai+Que+Do.mp3' > ); > open OUT,">". 'abcde.mp3'; > print OUT $_ foreach (@url); > > Obtive um arquivo vazio. > > Oque pode ser?? > ------------------------------ > From: guedes_1000 em hotmail.com > To: rio-pm em pm.org > Date: Sat, 20 Oct 2012 15:25:29 +0000 > > Subject: Re: [Rio-pm] HTML::Parse > > Web::Scraper requer conhecimento de XPath e/ou seletores CSS. > > Nesse caso não é pra mim, não retenho esses conmhecimentos. > > ------------------------------ > From: creaktive em gmail.com > Date: Sat, 20 Oct 2012 00:13:10 -0300 > To: rio-pm em pm.org > Subject: Re: [Rio-pm] HTML::Parse > > Web::Scraper requer conhecimento de XPath e/ou seletores CSS. > No caso do link que você passou, URL do primeiro MP3 pode ser obtida via > XPath: > > //table[@class='linhas_lista'][1]//tr/td[2]/a/@href > > De onde tirei isso? De uma extensão pro Chrome, chamada XPath Helper: > https://chrome.google.com/webstore/detail/xpath-helper/hgimnogjllphhhkhlmebbmlgjoejdpjl > Firefox tem (tinha?) um tal do XPather: > https://addons.mozilla.org/en-US/firefox/addon/xpather/ > > Provando o que o Marcio disse: > > stas em Stanislaws-MacBook-Pro:~$ perl -CADS -MDDP -MURI -MWeb::Scraper -e > 'p scraper{process q(//h1/strong),title=>q(text);process > q(//a[@href=~/\.mp3$/]),q(url[])=>q(@href)}->scrape((URI->new(q( > http://www.buscamp3.org/busca/Thaeme+e+Thiago+-+Ai+que+do/))) > x 2)' > Printing in line 1 of -e: > \ { > title "Baixar Thaeme e Thiago - Ai que do/ grátis", > url [ > [0] > http://www.buscamp3.org/dl/3473494b6c3636334d55/554545485125135/Thaeme+E+Thiago+-+Ai+Que+Do.mp3 > , > [1] > http://www.buscamp3.org/dl/3473674c78687936326f/554545485125135/Thaeme+E+Thiago+-+Ai+Que+Do.mp3 > , > [2] > http://www.buscamp3.org/dl/34736943505352494374/554545485125135/Thaeme+E+Thiago+-+Ai+Que+Do.mp3 > , > [3] > http://www.buscamp3.org/dl/34734c6f727448494d71/554545485125135/Thaeme+E+Thiago+-+Ai+Que+Do.mp3 > , > [4] > http://www.buscamp3.org/dl/3473644e636d6f345245/554545485125135/Thaeme+E+Thiago+-+Ai+Que+Do.mp3 > ] > } > > Sem ser one-liner maldito: > > #!/usr/bin/env perl > use common::sense; > use Data::Printer; > use URI; > use Web::Scraper; > > my $url = URI->new(' > http://www.buscamp3.org/busca/Thaeme+e+Thiago+-+Ai+que+do/' > ); > > p scraper { > process q(//h1/strong), > title => 'text'; > process q(//a[@href=~/\\.mp3$/]), > 'url[]' => '@href'; > }->scrape($url, $url); > > ABS() > > > > 2012/10/19 Aureliano Guedes > > Parece interessante mesmo, mas dificil de entender, principalmente quando > é alguem que como eu não sabe nada de HTML. > Realmente não entendi como faria tudo isso com o Web::Scraper. > > ------------------------------ > From: marciodesouzaferreira em gmail.com > Date: Fri, 19 Oct 2012 21:14:53 -0300 > > To: rio-pm em pm.org > Subject: Re: [Rio-pm] HTML::Parse > > estou cansado pra implementar, mas o Web::Scraper é tipo um néctar dos > deuses, vc faz um crawler em 5' com ele, bem estilo Perl(que sai da frente > e deixa você focar na solução) isso se o HTML não for um monstrengo =) > > []s, > > Marcio Ferreira > @_marcioferreira > (11) 8567-1482 skype: marcio.ferreir4 > marciodesouzaferreira.blogspot.com > > > > 2012/10/19 Rafael Prenzier > > WWW::Mechanize ++ > > > 2012/10/19 Ricardo Filipo > > Eu gosto do HTML::TreeBuilder pois dá uma visão mais organizada do DOM. > > Veja um exemplo de uso: > > https://github.com/rfilipo/WebService-EBC/blob/master/lib/WebService/EBC/News.pm > > ------------------------------ > *De:* Aureliano Guedes > *Para:* Rio PM > *Enviadas:* Sexta-feira, 19 de Outubro de 2012 13:22 > *Assunto:* [Rio-pm] HTML::Parse > > Ola monges, > tudo bem? > > Qual um bom modulo para buscar string em um HTML? > Vocês aconselham o HTML::Parse? > > Eu não entendo muito de html, mas estou tentando pegar um link dentro de > uma pagina. > > Um exemplo é esse: > http://www.buscamp3.org/busca/Thaeme+e+Thiago+-+Ai+que+do/ > > Os Links estão nesse formato: > > > > > O Problema é que no caso dessa pagina tem 4 links desse modelo e eu queria > pegar apenas o primeiro. > Poderia usar regexp mas anteriormente me disseram que não é muito elegante > parsear HTML na unha. > > Sei que a duvida é banal, mas se puderem me dar uma dica agradeço. > > Att, > Aureliano Guedes. > > _______________________________________________ > Rio-pm mailing list > Rio-pm em pm.org > http://mail.pm.org/mailman/listinfo/rio-pm > > > _______________________________________________ > Rio-pm mailing list > Rio-pm em pm.org > http://mail.pm.org/mailman/listinfo/rio-pm > > > > > -- > Rafael Prenzier dos Santos | Engenheiro e Perl Monger > > (11) 5209-0847 > > www.prenzier.com > > > > > > > > > > > > _______________________________________________ > Rio-pm mailing list > Rio-pm em pm.org > http://mail.pm.org/mailman/listinfo/rio-pm > > > > _______________________________________________ Rio-pm mailing list > Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm > > _______________________________________________ > Rio-pm mailing list > Rio-pm em pm.org > http://mail.pm.org/mailman/listinfo/rio-pm > > > > _______________________________________________ Rio-pm mailing list > Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm > > _______________________________________________ Rio-pm mailing list > Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm > > _______________________________________________ > Rio-pm mailing list > Rio-pm em pm.org > http://mail.pm.org/mailman/listinfo/rio-pm > > > > > -- > Bruno C. Buss > http://www.brunobuss.net > > _______________________________________________ Rio-pm mailing list > Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm > > _______________________________________________ > Rio-pm mailing list > Rio-pm em pm.org > http://mail.pm.org/mailman/listinfo/rio-pm > -- Bruno C. Buss http://www.brunobuss.net -------------- Próxima Parte ---------- Um anexo em HTML foi limpo... URL: From guedes_1000 em hotmail.com Sat Oct 20 10:28:46 2012 From: guedes_1000 em hotmail.com (Aureliano Guedes) Date: Sat, 20 Oct 2012 17:28:46 +0000 Subject: [Rio-pm] HTML::Parse In-Reply-To: References: <439E1D4A5AD44A31A2AC2A1C51053B7E@aware.com.br>, <1350603924.20168.140661142604705.79EC4CA7@webmail.messagingengine.com>, , <1350675988.79169.YahooMailNeo@web125202.mail.ne1.yahoo.com>, , , , , , , , , Message-ID: Opa, Bruno, obrigado pela resposta sua e de todos os outros que estão me ajudando. Irei tentar seguir o que me falaram e depois darei um feedback dos resultados. From: bruno.buss em gmail.com Date: Sat, 20 Oct 2012 13:44:45 -0300 To: rio-pm em pm.org Subject: Re: [Rio-pm] HTML::Parse Então provavelmente eles estão verificando pelo referer no header do request HTTP [1]. Não sei como funciona o LWP::Simple, mas com o LWP::UserAgent você consegue setar parametros pro header a ser enviado. No caso você deveria setar o referer para 'http://www.buscamp3.org/download/thaeme+e+thiago+ai+que+do_3473494b6c3636334d55.html'. Outra opção talvez seja usar o WWW::Mechanize, acho que ele faz isso automaticamente para você, se você utilizar as funções de "navegação" dele. No mais, deixe-me discordar da seguinte frase que você escreveu anteriormente (sobre XPath e seletores CSS): "Nesse caso não é pra mim, não retenho esses conhecimentos." Se você não conhece XPath e/ou seletores CSS, você deveria procurar dar uma olhada/estudada breve neles se isso for necessário para resolver um problema seu. É uma mentalidade melhor do que assumir que você não sabe, nem vai apreender e por isso limitar o seu leque de opções para fazer o que você quer ;) [ ]'s [1] https://en.wikipedia.org/wiki/HTTP_referer 2012/10/20 Aureliano Guedes Pois é Bruno, aqui tambem da erro, mas se eu entrar nessa pagina http://www.buscamp3.org/busca/Thaeme+e+Thiago+-+Ai+que+do/ e clicar no link o download inicia, e aparentemente é esse o link, a não ser que esse link que eu esteja pegando da pagina esteja errado é o link de download seja outro. From: bruno.buss em gmail.com Date: Sat, 20 Oct 2012 12:39:02 -0300 To: rio-pm em pm.org Subject: Re: [Rio-pm] HTML::Parse Você consegue fazer o download desse arquivo manualmente, colando o endereço no seu próprio browser?Aqui esse link da erro... [ ]'s 2012/10/20 Aureliano Guedes Eu tinha chegado nesses links do mp3, o problema é que fazer o download deles não funciona. No caso: use LWP::Simple; my @url = get ('www.buscamp3.org/dl/34736943505352494374/554545485125135/Thaeme+E+Thiago+-+Ai+Que+Do.mp3'); open OUT,">". 'abcde.mp3'; print OUT $_ foreach (@url); Obtive um arquivo vazio. Oque pode ser?? From: guedes_1000 em hotmail.com To: rio-pm em pm.org Date: Sat, 20 Oct 2012 15:25:29 +0000 Subject: Re: [Rio-pm] HTML::Parse Web::Scraper requer conhecimento de XPath e/ou seletores CSS. Nesse caso não é pra mim, não retenho esses conmhecimentos. From: creaktive em gmail.com Date: Sat, 20 Oct 2012 00:13:10 -0300 To: rio-pm em pm.org Subject: Re: [Rio-pm] HTML::Parse Web::Scraper requer conhecimento de XPath e/ou seletores CSS. No caso do link que você passou, URL do primeiro MP3 pode ser obtida via XPath: //table[@class='linhas_lista'][1]//tr/td[2]/a/@href De onde tirei isso? De uma extensão pro Chrome, chamada XPath Helper: https://chrome.google.com/webstore/detail/xpath-helper/hgimnogjllphhhkhlmebbmlgjoejdpjl Firefox tem (tinha?) um tal do XPather: https://addons.mozilla.org/en-US/firefox/addon/xpather/ Provando o que o Marcio disse: stas em Stanislaws-MacBook-Pro:~$ perl -CADS -MDDP -MURI -MWeb::Scraper -e 'p scraper{process q(//h1/strong),title=>q(text);process q(//a[@href=~/\.mp3$/]),q(url[])=>q(@href)}->scrape((URI->new(q(http://www.buscamp3.org/busca/Thaeme+e+Thiago+-+Ai+que+do/))) x 2)' Printing in line 1 of -e:\ { title "Baixar Thaeme e Thiago - Ai que do/ grátis", url [ [0] http://www.buscamp3.org/dl/3473494b6c3636334d55/554545485125135/Thaeme+E+Thiago+-+Ai+Que+Do.mp3, [1] http://www.buscamp3.org/dl/3473674c78687936326f/554545485125135/Thaeme+E+Thiago+-+Ai+Que+Do.mp3, [2] http://www.buscamp3.org/dl/34736943505352494374/554545485125135/Thaeme+E+Thiago+-+Ai+Que+Do.mp3, [3] http://www.buscamp3.org/dl/34734c6f727448494d71/554545485125135/Thaeme+E+Thiago+-+Ai+Que+Do.mp3, [4] http://www.buscamp3.org/dl/3473644e636d6f345245/554545485125135/Thaeme+E+Thiago+-+Ai+Que+Do.mp3 ]} Sem ser one-liner maldito: #!/usr/bin/env perluse common::sense;use Data::Printer;use URI;use Web::Scraper; my $url = URI->new('http://www.buscamp3.org/busca/Thaeme+e+Thiago+-+Ai+que+do/'); p scraper { process q(//h1/strong), title => 'text'; process q(//a[@href=~/\\.mp3$/]), 'url[]' => '@href';}->scrape($url, $url); ABS() 2012/10/19 Aureliano Guedes Parece interessante mesmo, mas dificil de entender, principalmente quando é alguem que como eu não sabe nada de HTML. Realmente não entendi como faria tudo isso com o Web::Scraper. From: marciodesouzaferreira em gmail.com Date: Fri, 19 Oct 2012 21:14:53 -0300 To: rio-pm em pm.org Subject: Re: [Rio-pm] HTML::Parse estou cansado pra implementar, mas o Web::Scraper é tipo um néctar dos deuses, vc faz um crawler em 5' com ele, bem estilo Perl(que sai da frente e deixa você focar na solução) isso se o HTML não for um monstrengo =) []s, Marcio Ferreira em _marcioferreira(11) 8567-1482 skype: marcio.ferreir4marciodesouzaferreira.blogspot.com 2012/10/19 Rafael Prenzier WWW::Mechanize ++ 2012/10/19 Ricardo Filipo Eu gosto do HTML::TreeBuilder pois dá uma visão mais organizada do DOM. Veja um exemplo de uso: https://github.com/rfilipo/WebService-EBC/blob/master/lib/WebService/EBC/News.pm De: Aureliano Guedes Para: Rio PM Enviadas: Sexta-feira, 19 de Outubro de 2012 13:22 Assunto: [Rio-pm] HTML::Parse Ola monges, tudo bem? Qual um bom modulo para buscar string em um HTML? Vocês aconselham o HTML::Parse? Eu não entendo muito de html, mas estou tentando pegar um link dentro de uma pagina. Um exemplo é esse: http://www.buscamp3.org/busca/Thaeme+e+Thiago+-+Ai+que+do/ Os Links estão nesse formato: O Problema é que no caso dessa pagina tem 4 links desse modelo e eu queria pegar apenas o primeiro. Poderia usar regexp mas anteriormente me disseram que não é muito elegante parsear HTML na unha. Sei que a duvida é banal, mas se puderem me dar uma dica agradeço. Att, Aureliano Guedes. _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm -- Rafael Prenzier dos Santos | Engenheiro e Perl Monger (11) 5209-0847 www.prenzier.com _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm -- Bruno C. Buss http://www.brunobuss.net _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm -- Bruno C. Buss http://www.brunobuss.net _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm -------------- Próxima Parte ---------- Um anexo em HTML foi limpo... URL: From guedes_1000 em hotmail.com Sun Oct 21 07:48:19 2012 From: guedes_1000 em hotmail.com (Aureliano Guedes) Date: Sun, 21 Oct 2012 14:48:19 +0000 Subject: [Rio-pm] HTML::Parse In-Reply-To: References: <439E1D4A5AD44A31A2AC2A1C51053B7E@aware.com.br>, , <1350603924.20168.140661142604705.79EC4CA7@webmail.messagingengine.com>, , , , <1350675988.79169.YahooMailNeo@web125202.mail.ne1.yahoo.com>, , , , , , , , , , , , , , , , , , , Message-ID: Ola. Eu estoiu tentando usar o WWW::Mechanize, mas não estou entendendo uma coisa. Eu tenho um botão: Baixar Fernando E Sorocaba Tenso Como eu faço para clicar nele usando o metodo click_button? Como faço para setar esse botão? Eu tentei: $m->click_button(value=>/dl/347357664b655256724e/554545485125135/Fernando+E+Sorocaba+++++Tenso.mp3); Mas não da certo. From: guedes_1000 em hotmail.com To: rio-pm em pm.org Date: Sat, 20 Oct 2012 17:28:46 +0000 Subject: Re: [Rio-pm] HTML::Parse Opa, Bruno, obrigado pela resposta sua e de todos os outros que estão me ajudando. Irei tentar seguir o que me falaram e depois darei um feedback dos resultados. From: bruno.buss em gmail.com Date: Sat, 20 Oct 2012 13:44:45 -0300 To: rio-pm em pm.org Subject: Re: [Rio-pm] HTML::Parse Então provavelmente eles estão verificando pelo referer no header do request HTTP [1]. Não sei como funciona o LWP::Simple, mas com o LWP::UserAgent você consegue setar parametros pro header a ser enviado. No caso você deveria setar o referer para 'http://www.buscamp3.org/download/thaeme+e+thiago+ai+que+do_3473494b6c3636334d55.html'. Outra opção talvez seja usar o WWW::Mechanize, acho que ele faz isso automaticamente para você, se você utilizar as funções de "navegação" dele. No mais, deixe-me discordar da seguinte frase que você escreveu anteriormente (sobre XPath e seletores CSS): "Nesse caso não é pra mim, não retenho esses conhecimentos." Se você não conhece XPath e/ou seletores CSS, você deveria procurar dar uma olhada/estudada breve neles se isso for necessário para resolver um problema seu. É uma mentalidade melhor do que assumir que você não sabe, nem vai apreender e por isso limitar o seu leque de opções para fazer o que você quer ;) [ ]'s [1] https://en.wikipedia.org/wiki/HTTP_referer 2012/10/20 Aureliano Guedes Pois é Bruno, aqui tambem da erro, mas se eu entrar nessa pagina http://www.buscamp3.org/busca/Thaeme+e+Thiago+-+Ai+que+do/ e clicar no link o download inicia, e aparentemente é esse o link, a não ser que esse link que eu esteja pegando da pagina esteja errado é o link de download seja outro. From: bruno.buss em gmail.com Date: Sat, 20 Oct 2012 12:39:02 -0300 To: rio-pm em pm.org Subject: Re: [Rio-pm] HTML::Parse Você consegue fazer o download desse arquivo manualmente, colando o endereço no seu próprio browser?Aqui esse link da erro... [ ]'s 2012/10/20 Aureliano Guedes Eu tinha chegado nesses links do mp3, o problema é que fazer o download deles não funciona. No caso: use LWP::Simple; my @url = get ('www.buscamp3.org/dl/34736943505352494374/554545485125135/Thaeme+E+Thiago+-+Ai+Que+Do.mp3'); open OUT,">". 'abcde.mp3'; print OUT $_ foreach (@url); Obtive um arquivo vazio. Oque pode ser?? From: guedes_1000 em hotmail.com To: rio-pm em pm.org Date: Sat, 20 Oct 2012 15:25:29 +0000 Subject: Re: [Rio-pm] HTML::Parse Web::Scraper requer conhecimento de XPath e/ou seletores CSS. Nesse caso não é pra mim, não retenho esses conmhecimentos. From: creaktive em gmail.com Date: Sat, 20 Oct 2012 00:13:10 -0300 To: rio-pm em pm.org Subject: Re: [Rio-pm] HTML::Parse Web::Scraper requer conhecimento de XPath e/ou seletores CSS. No caso do link que você passou, URL do primeiro MP3 pode ser obtida via XPath: //table[@class='linhas_lista'][1]//tr/td[2]/a/@href De onde tirei isso? De uma extensão pro Chrome, chamada XPath Helper: https://chrome.google.com/webstore/detail/xpath-helper/hgimnogjllphhhkhlmebbmlgjoejdpjl Firefox tem (tinha?) um tal do XPather: https://addons.mozilla.org/en-US/firefox/addon/xpather/ Provando o que o Marcio disse: stas em Stanislaws-MacBook-Pro:~$ perl -CADS -MDDP -MURI -MWeb::Scraper -e 'p scraper{process q(//h1/strong),title=>q(text);process q(//a[@href=~/\.mp3$/]),q(url[])=>q(@href)}->scrape((URI->new(q(http://www.buscamp3.org/busca/Thaeme+e+Thiago+-+Ai+que+do/))) x 2)' Printing in line 1 of -e:\ { title "Baixar Thaeme e Thiago - Ai que do/ grátis", url [ [0] http://www.buscamp3.org/dl/3473494b6c3636334d55/554545485125135/Thaeme+E+Thiago+-+Ai+Que+Do.mp3, [1] http://www.buscamp3.org/dl/3473674c78687936326f/554545485125135/Thaeme+E+Thiago+-+Ai+Que+Do.mp3, [2] http://www.buscamp3.org/dl/34736943505352494374/554545485125135/Thaeme+E+Thiago+-+Ai+Que+Do.mp3, [3] http://www.buscamp3.org/dl/34734c6f727448494d71/554545485125135/Thaeme+E+Thiago+-+Ai+Que+Do.mp3, [4] http://www.buscamp3.org/dl/3473644e636d6f345245/554545485125135/Thaeme+E+Thiago+-+Ai+Que+Do.mp3 ]} Sem ser one-liner maldito: #!/usr/bin/env perluse common::sense;use Data::Printer;use URI;use Web::Scraper; my $url = URI->new('http://www.buscamp3.org/busca/Thaeme+e+Thiago+-+Ai+que+do/'); p scraper { process q(//h1/strong), title => 'text'; process q(//a[@href=~/\\.mp3$/]), 'url[]' => '@href';}->scrape($url, $url); ABS() 2012/10/19 Aureliano Guedes Parece interessante mesmo, mas dificil de entender, principalmente quando é alguem que como eu não sabe nada de HTML. Realmente não entendi como faria tudo isso com o Web::Scraper. From: marciodesouzaferreira em gmail.com Date: Fri, 19 Oct 2012 21:14:53 -0300 To: rio-pm em pm.org Subject: Re: [Rio-pm] HTML::Parse estou cansado pra implementar, mas o Web::Scraper é tipo um néctar dos deuses, vc faz um crawler em 5' com ele, bem estilo Perl(que sai da frente e deixa você focar na solução) isso se o HTML não for um monstrengo =) []s, Marcio Ferreira em _marcioferreira(11) 8567-1482 skype: marcio.ferreir4marciodesouzaferreira.blogspot.com 2012/10/19 Rafael Prenzier WWW::Mechanize ++ 2012/10/19 Ricardo Filipo Eu gosto do HTML::TreeBuilder pois dá uma visão mais organizada do DOM. Veja um exemplo de uso: https://github.com/rfilipo/WebService-EBC/blob/master/lib/WebService/EBC/News.pm De: Aureliano Guedes Para: Rio PM Enviadas: Sexta-feira, 19 de Outubro de 2012 13:22 Assunto: [Rio-pm] HTML::Parse Ola monges, tudo bem? Qual um bom modulo para buscar string em um HTML? Vocês aconselham o HTML::Parse? Eu não entendo muito de html, mas estou tentando pegar um link dentro de uma pagina. Um exemplo é esse: http://www.buscamp3.org/busca/Thaeme+e+Thiago+-+Ai+que+do/ Os Links estão nesse formato: O Problema é que no caso dessa pagina tem 4 links desse modelo e eu queria pegar apenas o primeiro. Poderia usar regexp mas anteriormente me disseram que não é muito elegante parsear HTML na unha. Sei que a duvida é banal, mas se puderem me dar uma dica agradeço. Att, Aureliano Guedes. _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm -- Rafael Prenzier dos Santos | Engenheiro e Perl Monger (11) 5209-0847 www.prenzier.com _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm -- Bruno C. Buss http://www.brunobuss.net _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm -- Bruno C. Buss http://www.brunobuss.net _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm -------------- Próxima Parte ---------- Um anexo em HTML foi limpo... URL: From guedes_1000 em hotmail.com Sun Oct 21 09:10:16 2012 From: guedes_1000 em hotmail.com (Aureliano Guedes) Date: Sun, 21 Oct 2012 16:10:16 +0000 Subject: [Rio-pm] HTML::Parse In-Reply-To: References: <439E1D4A5AD44A31A2AC2A1C51053B7E@aware.com.br>, , , <1350603924.20168.140661142604705.79EC4CA7@webmail.messagingengine.com>, , , , ,,<1350675988.79169.YahooMailNeo@web125202.mail.ne1.yahoo.com>, , , , , , , , , , , , , , , , , ,,, , , , , , , , , , , , Message-ID: Bom, eu consegui completar o script. Ainda devo fazer algumas alterações. So um problema, se alguem puder testar vejam que apesar de baixar o arquivo ele vem meio que acelerado, estranho. Ainda para listas com mais de uma musica volta essa msg: plrint() on closed filehandle OUT at C:\User\AG\Desktop\mes.pl line 47. From: guedes_1000 em hotmail.com To: rio-pm em pm.org Date: Sun, 21 Oct 2012 14:48:19 +0000 Subject: Re: [Rio-pm] HTML::Parse Ola. Eu estoiu tentando usar o WWW::Mechanize, mas não estou entendendo uma coisa. Eu tenho um botão: Baixar Fernando E Sorocaba Tenso Como eu faço para clicar nele usando o metodo click_button? Como faço para setar esse botão? Eu tentei: $m->click_button(value=>/dl/347357664b655256724e/554545485125135/Fernando+E+Sorocaba+++++Tenso.mp3); Mas não da certo. From: guedes_1000 em hotmail.com To: rio-pm em pm.org Date: Sat, 20 Oct 2012 17:28:46 +0000 Subject: Re: [Rio-pm] HTML::Parse Opa, Bruno, obrigado pela resposta sua e de todos os outros que estão me ajudando. Irei tentar seguir o que me falaram e depois darei um feedback dos resultados. From: bruno.buss em gmail.com Date: Sat, 20 Oct 2012 13:44:45 -0300 To: rio-pm em pm.org Subject: Re: [Rio-pm] HTML::Parse Então provavelmente eles estão verificando pelo referer no header do request HTTP [1]. Não sei como funciona o LWP::Simple, mas com o LWP::UserAgent você consegue setar parametros pro header a ser enviado. No caso você deveria setar o referer para 'http://www.buscamp3.org/download/thaeme+e+thiago+ai+que+do_3473494b6c3636334d55.html'. Outra opção talvez seja usar o WWW::Mechanize, acho que ele faz isso automaticamente para você, se você utilizar as funções de "navegação" dele. No mais, deixe-me discordar da seguinte frase que você escreveu anteriormente (sobre XPath e seletores CSS): "Nesse caso não é pra mim, não retenho esses conhecimentos." Se você não conhece XPath e/ou seletores CSS, você deveria procurar dar uma olhada/estudada breve neles se isso for necessário para resolver um problema seu. É uma mentalidade melhor do que assumir que você não sabe, nem vai apreender e por isso limitar o seu leque de opções para fazer o que você quer ;) [ ]'s [1] https://en.wikipedia.org/wiki/HTTP_referer 2012/10/20 Aureliano Guedes Pois é Bruno, aqui tambem da erro, mas se eu entrar nessa pagina http://www.buscamp3.org/busca/Thaeme+e+Thiago+-+Ai+que+do/ e clicar no link o download inicia, e aparentemente é esse o link, a não ser que esse link que eu esteja pegando da pagina esteja errado é o link de download seja outro. From: bruno.buss em gmail.com Date: Sat, 20 Oct 2012 12:39:02 -0300 To: rio-pm em pm.org Subject: Re: [Rio-pm] HTML::Parse Você consegue fazer o download desse arquivo manualmente, colando o endereço no seu próprio browser?Aqui esse link da erro... [ ]'s 2012/10/20 Aureliano Guedes Eu tinha chegado nesses links do mp3, o problema é que fazer o download deles não funciona. No caso: use LWP::Simple; my @url = get ('www.buscamp3.org/dl/34736943505352494374/554545485125135/Thaeme+E+Thiago+-+Ai+Que+Do.mp3'); open OUT,">". 'abcde.mp3'; print OUT $_ foreach (@url); Obtive um arquivo vazio. Oque pode ser?? From: guedes_1000 em hotmail.com To: rio-pm em pm.org Date: Sat, 20 Oct 2012 15:25:29 +0000 Subject: Re: [Rio-pm] HTML::Parse Web::Scraper requer conhecimento de XPath e/ou seletores CSS. Nesse caso não é pra mim, não retenho esses conmhecimentos. From: creaktive em gmail.com Date: Sat, 20 Oct 2012 00:13:10 -0300 To: rio-pm em pm.org Subject: Re: [Rio-pm] HTML::Parse Web::Scraper requer conhecimento de XPath e/ou seletores CSS. No caso do link que você passou, URL do primeiro MP3 pode ser obtida via XPath: //table[@class='linhas_lista'][1]//tr/td[2]/a/@href De onde tirei isso? De uma extensão pro Chrome, chamada XPath Helper: https://chrome.google.com/webstore/detail/xpath-helper/hgimnogjllphhhkhlmebbmlgjoejdpjl Firefox tem (tinha?) um tal do XPather: https://addons.mozilla.org/en-US/firefox/addon/xpather/ Provando o que o Marcio disse: stas em Stanislaws-MacBook-Pro:~$ perl -CADS -MDDP -MURI -MWeb::Scraper -e 'p scraper{process q(//h1/strong),title=>q(text);process q(//a[@href=~/\.mp3$/]),q(url[])=>q(@href)}->scrape((URI->new(q(http://www.buscamp3.org/busca/Thaeme+e+Thiago+-+Ai+que+do/))) x 2)' Printing in line 1 of -e:\ { title "Baixar Thaeme e Thiago - Ai que do/ grátis", url [ [0] http://www.buscamp3.org/dl/3473494b6c3636334d55/554545485125135/Thaeme+E+Thiago+-+Ai+Que+Do.mp3, [1] http://www.buscamp3.org/dl/3473674c78687936326f/554545485125135/Thaeme+E+Thiago+-+Ai+Que+Do.mp3, [2] http://www.buscamp3.org/dl/34736943505352494374/554545485125135/Thaeme+E+Thiago+-+Ai+Que+Do.mp3, [3] http://www.buscamp3.org/dl/34734c6f727448494d71/554545485125135/Thaeme+E+Thiago+-+Ai+Que+Do.mp3, [4] http://www.buscamp3.org/dl/3473644e636d6f345245/554545485125135/Thaeme+E+Thiago+-+Ai+Que+Do.mp3 ]} Sem ser one-liner maldito: #!/usr/bin/env perluse common::sense;use Data::Printer;use URI;use Web::Scraper; my $url = URI->new('http://www.buscamp3.org/busca/Thaeme+e+Thiago+-+Ai+que+do/'); p scraper { process q(//h1/strong), title => 'text'; process q(//a[@href=~/\\.mp3$/]), 'url[]' => '@href';}->scrape($url, $url); ABS() 2012/10/19 Aureliano Guedes Parece interessante mesmo, mas dificil de entender, principalmente quando é alguem que como eu não sabe nada de HTML. Realmente não entendi como faria tudo isso com o Web::Scraper. From: marciodesouzaferreira em gmail.com Date: Fri, 19 Oct 2012 21:14:53 -0300 To: rio-pm em pm.org Subject: Re: [Rio-pm] HTML::Parse estou cansado pra implementar, mas o Web::Scraper é tipo um néctar dos deuses, vc faz um crawler em 5' com ele, bem estilo Perl(que sai da frente e deixa você focar na solução) isso se o HTML não for um monstrengo =) []s, Marcio Ferreira em _marcioferreira(11) 8567-1482 skype: marcio.ferreir4marciodesouzaferreira.blogspot.com 2012/10/19 Rafael Prenzier WWW::Mechanize ++ 2012/10/19 Ricardo Filipo Eu gosto do HTML::TreeBuilder pois dá uma visão mais organizada do DOM. Veja um exemplo de uso: https://github.com/rfilipo/WebService-EBC/blob/master/lib/WebService/EBC/News.pm De: Aureliano Guedes Para: Rio PM Enviadas: Sexta-feira, 19 de Outubro de 2012 13:22 Assunto: [Rio-pm] HTML::Parse Ola monges, tudo bem? Qual um bom modulo para buscar string em um HTML? Vocês aconselham o HTML::Parse? Eu não entendo muito de html, mas estou tentando pegar um link dentro de uma pagina. Um exemplo é esse: http://www.buscamp3.org/busca/Thaeme+e+Thiago+-+Ai+que+do/ Os Links estão nesse formato: O Problema é que no caso dessa pagina tem 4 links desse modelo e eu queria pegar apenas o primeiro. Poderia usar regexp mas anteriormente me disseram que não é muito elegante parsear HTML na unha. Sei que a duvida é banal, mas se puderem me dar uma dica agradeço. Att, Aureliano Guedes. _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm -- Rafael Prenzier dos Santos | Engenheiro e Perl Monger (11) 5209-0847 www.prenzier.com _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm -- Bruno C. Buss http://www.brunobuss.net _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm -- Bruno C. Buss http://www.brunobuss.net _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm -------------- Próxima Parte ---------- Um anexo em HTML foi limpo... URL: From guedes_1000 em hotmail.com Sun Oct 21 09:24:58 2012 From: guedes_1000 em hotmail.com (Aureliano Guedes) Date: Sun, 21 Oct 2012 16:24:58 +0000 Subject: [Rio-pm] HTML::Parse In-Reply-To: References: <439E1D4A5AD44A31A2AC2A1C51053B7E@aware.com.br>, , , , <1350603924.20168.140661142604705.79EC4CA7@webmail.messagingengine.com>, , , , , , , , <1350675988.79169.YahooMailNeo@web125202.mail.ne1.yahoo.com>, , , , , , , , , , , , , , ,,, , , , , , , , , , , , , , , , , , ,,, , , , , , , , Message-ID: Desculpa o flood esqueci do link -> http://pastebin.com/fgYhBrsp From: guedes_1000 em hotmail.com To: rio-pm em pm.org Date: Sun, 21 Oct 2012 16:10:16 +0000 Subject: Re: [Rio-pm] HTML::Parse Bom, eu consegui completar o script. Ainda devo fazer algumas alterações. So um problema, se alguem puder testar vejam que apesar de baixar o arquivo ele vem meio que acelerado, estranho. Ainda para listas com mais de uma musica volta essa msg: plrint() on closed filehandle OUT at C:\User\AG\Desktop\mes.pl line 47. From: guedes_1000 em hotmail.com To: rio-pm em pm.org Date: Sun, 21 Oct 2012 14:48:19 +0000 Subject: Re: [Rio-pm] HTML::Parse Ola. Eu estoiu tentando usar o WWW::Mechanize, mas não estou entendendo uma coisa. Eu tenho um botão: Baixar Fernando E Sorocaba Tenso Como eu faço para clicar nele usando o metodo click_button? Como faço para setar esse botão? Eu tentei: $m->click_button(value=>/dl/347357664b655256724e/554545485125135/Fernando+E+Sorocaba+++++Tenso.mp3); Mas não da certo. From: guedes_1000 em hotmail.com To: rio-pm em pm.org Date: Sat, 20 Oct 2012 17:28:46 +0000 Subject: Re: [Rio-pm] HTML::Parse Opa, Bruno, obrigado pela resposta sua e de todos os outros que estão me ajudando. Irei tentar seguir o que me falaram e depois darei um feedback dos resultados. From: bruno.buss em gmail.com Date: Sat, 20 Oct 2012 13:44:45 -0300 To: rio-pm em pm.org Subject: Re: [Rio-pm] HTML::Parse Então provavelmente eles estão verificando pelo referer no header do request HTTP [1]. Não sei como funciona o LWP::Simple, mas com o LWP::UserAgent você consegue setar parametros pro header a ser enviado. No caso você deveria setar o referer para 'http://www.buscamp3.org/download/thaeme+e+thiago+ai+que+do_3473494b6c3636334d55.html'. Outra opção talvez seja usar o WWW::Mechanize, acho que ele faz isso automaticamente para você, se você utilizar as funções de "navegação" dele. No mais, deixe-me discordar da seguinte frase que você escreveu anteriormente (sobre XPath e seletores CSS): "Nesse caso não é pra mim, não retenho esses conhecimentos." Se você não conhece XPath e/ou seletores CSS, você deveria procurar dar uma olhada/estudada breve neles se isso for necessário para resolver um problema seu. É uma mentalidade melhor do que assumir que você não sabe, nem vai apreender e por isso limitar o seu leque de opções para fazer o que você quer ;) [ ]'s [1] https://en.wikipedia.org/wiki/HTTP_referer 2012/10/20 Aureliano Guedes Pois é Bruno, aqui tambem da erro, mas se eu entrar nessa pagina http://www.buscamp3.org/busca/Thaeme+e+Thiago+-+Ai+que+do/ e clicar no link o download inicia, e aparentemente é esse o link, a não ser que esse link que eu esteja pegando da pagina esteja errado é o link de download seja outro. From: bruno.buss em gmail.com Date: Sat, 20 Oct 2012 12:39:02 -0300 To: rio-pm em pm.org Subject: Re: [Rio-pm] HTML::Parse Você consegue fazer o download desse arquivo manualmente, colando o endereço no seu próprio browser?Aqui esse link da erro... [ ]'s 2012/10/20 Aureliano Guedes Eu tinha chegado nesses links do mp3, o problema é que fazer o download deles não funciona. No caso: use LWP::Simple; my @url = get ('www.buscamp3.org/dl/34736943505352494374/554545485125135/Thaeme+E+Thiago+-+Ai+Que+Do.mp3'); open OUT,">". 'abcde.mp3'; print OUT $_ foreach (@url); Obtive um arquivo vazio. Oque pode ser?? From: guedes_1000 em hotmail.com To: rio-pm em pm.org Date: Sat, 20 Oct 2012 15:25:29 +0000 Subject: Re: [Rio-pm] HTML::Parse Web::Scraper requer conhecimento de XPath e/ou seletores CSS. Nesse caso não é pra mim, não retenho esses conmhecimentos. From: creaktive em gmail.com Date: Sat, 20 Oct 2012 00:13:10 -0300 To: rio-pm em pm.org Subject: Re: [Rio-pm] HTML::Parse Web::Scraper requer conhecimento de XPath e/ou seletores CSS. No caso do link que você passou, URL do primeiro MP3 pode ser obtida via XPath: //table[@class='linhas_lista'][1]//tr/td[2]/a/@href De onde tirei isso? De uma extensão pro Chrome, chamada XPath Helper: https://chrome.google.com/webstore/detail/xpath-helper/hgimnogjllphhhkhlmebbmlgjoejdpjl Firefox tem (tinha?) um tal do XPather: https://addons.mozilla.org/en-US/firefox/addon/xpather/ Provando o que o Marcio disse: stas em Stanislaws-MacBook-Pro:~$ perl -CADS -MDDP -MURI -MWeb::Scraper -e 'p scraper{process q(//h1/strong),title=>q(text);process q(//a[@href=~/\.mp3$/]),q(url[])=>q(@href)}->scrape((URI->new(q(http://www.buscamp3.org/busca/Thaeme+e+Thiago+-+Ai+que+do/))) x 2)' Printing in line 1 of -e:\ { title "Baixar Thaeme e Thiago - Ai que do/ grátis", url [ [0] http://www.buscamp3.org/dl/3473494b6c3636334d55/554545485125135/Thaeme+E+Thiago+-+Ai+Que+Do.mp3, [1] http://www.buscamp3.org/dl/3473674c78687936326f/554545485125135/Thaeme+E+Thiago+-+Ai+Que+Do.mp3, [2] http://www.buscamp3.org/dl/34736943505352494374/554545485125135/Thaeme+E+Thiago+-+Ai+Que+Do.mp3, [3] http://www.buscamp3.org/dl/34734c6f727448494d71/554545485125135/Thaeme+E+Thiago+-+Ai+Que+Do.mp3, [4] http://www.buscamp3.org/dl/3473644e636d6f345245/554545485125135/Thaeme+E+Thiago+-+Ai+Que+Do.mp3 ]} Sem ser one-liner maldito: #!/usr/bin/env perluse common::sense;use Data::Printer;use URI;use Web::Scraper; my $url = URI->new('http://www.buscamp3.org/busca/Thaeme+e+Thiago+-+Ai+que+do/'); p scraper { process q(//h1/strong), title => 'text'; process q(//a[@href=~/\\.mp3$/]), 'url[]' => '@href';}->scrape($url, $url); ABS() 2012/10/19 Aureliano Guedes Parece interessante mesmo, mas dificil de entender, principalmente quando é alguem que como eu não sabe nada de HTML. Realmente não entendi como faria tudo isso com o Web::Scraper. From: marciodesouzaferreira em gmail.com Date: Fri, 19 Oct 2012 21:14:53 -0300 To: rio-pm em pm.org Subject: Re: [Rio-pm] HTML::Parse estou cansado pra implementar, mas o Web::Scraper é tipo um néctar dos deuses, vc faz um crawler em 5' com ele, bem estilo Perl(que sai da frente e deixa você focar na solução) isso se o HTML não for um monstrengo =) []s, Marcio Ferreira em _marcioferreira(11) 8567-1482 skype: marcio.ferreir4marciodesouzaferreira.blogspot.com 2012/10/19 Rafael Prenzier WWW::Mechanize ++ 2012/10/19 Ricardo Filipo Eu gosto do HTML::TreeBuilder pois dá uma visão mais organizada do DOM. Veja um exemplo de uso: https://github.com/rfilipo/WebService-EBC/blob/master/lib/WebService/EBC/News.pm De: Aureliano Guedes Para: Rio PM Enviadas: Sexta-feira, 19 de Outubro de 2012 13:22 Assunto: [Rio-pm] HTML::Parse Ola monges, tudo bem? Qual um bom modulo para buscar string em um HTML? Vocês aconselham o HTML::Parse? Eu não entendo muito de html, mas estou tentando pegar um link dentro de uma pagina. Um exemplo é esse: http://www.buscamp3.org/busca/Thaeme+e+Thiago+-+Ai+que+do/ Os Links estão nesse formato: O Problema é que no caso dessa pagina tem 4 links desse modelo e eu queria pegar apenas o primeiro. Poderia usar regexp mas anteriormente me disseram que não é muito elegante parsear HTML na unha. Sei que a duvida é banal, mas se puderem me dar uma dica agradeço. Att, Aureliano Guedes. _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm -- Rafael Prenzier dos Santos | Engenheiro e Perl Monger (11) 5209-0847 www.prenzier.com _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm -- Bruno C. Buss http://www.brunobuss.net _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm -- Bruno C. Buss http://www.brunobuss.net _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm -------------- Próxima Parte ---------- Um anexo em HTML foi limpo... URL: From guedes_1000 em hotmail.com Sun Oct 21 11:38:34 2012 From: guedes_1000 em hotmail.com (Aureliano Guedes) Date: Sun, 21 Oct 2012 18:38:34 +0000 Subject: [Rio-pm] print() on closed filehandle Message-ID: Ola monges. Estou com problema para salvar arquivos *.mp3 recebidos via download. Ao salvar a mensagem retornada é 'print () on closed filehandle FH at C:\User\AG\Desktop\mes.pl line 31.'. O sistema so retorna 'Invalid argument' quando uso o $!. Então usei o autodie para ver o que me retornava: "Can't open '>Thaeme e Thiago - Ai que do.mp3' for writing: at 'Invalid argument' C:\User\AG\Desktop\mes.pl line 19." Enfim, não estou entendendo o erro retornado. http://pastebin.com/qxCMLv1V #!/usr/bin/env perl use common::sense; use WWW::Mechanize; use autodie; sub parse { my ($self) = shift; $self =~ s/\s+/\+/g; chomp $self; print "Now --> " . $self . "\n\n"; return ("http://www.buscamp3.org/busca/" . $self); } sub gd { my ($self, $name) = @_; print $self . " == " . $name . "\n\n"; open my $fh,">". $name . ".mp3"; my $m = WWW::Mechanize->new(); my $p = $m->get($self); $p = $p->decoded_content; $m->max_redirect(1); my @Links = $m->links(); my $w = 0; SWU: foreach my $link(@Links){ my @a = split ("/", $link->url()); if ($a[1] =~ m/dl/gi){ print "OK!\n"; my $c = $m->get("http://www.buscamp3.org" . $link->url()); print $fh $c->decoded_content; close $fh; $w = 1; } last SWU if ($w == 1); } undef $m; } open IN, $ARGV[0] or die; foreach (){ print "Search for: " . $_ . "\n"; my $a = parse($_); gd($a, $_); print "\n\n"; } -------------- Próxima Parte ---------- Um anexo em HTML foi limpo... URL: From ole.ufg em gmail.com Sun Oct 21 11:54:15 2012 From: ole.ufg em gmail.com (Ole Peter Smith) Date: Sun, 21 Oct 2012 16:54:15 -0200 Subject: [Rio-pm] print() on closed filehandle In-Reply-To: References: Message-ID: espacos no nome do arquivo? (sempre, como letras acentuadas, abominavel...) 0le Send via Android On Oct 21, 2012 3:38 PM, "Aureliano Guedes" wrote: > Ola monges. > > Estou com problema para salvar arquivos *.mp3 recebidos via download. > > Ao salvar a mensagem retornada é 'print () on closed filehandle FH at > C:\User\AG\Desktop\mes.pl line 31.'. > > O sistema so retorna 'Invalid argument' quando uso o $!. > > Então usei o autodie para ver o que me retornava: > "Can't open '>Thaeme e Thiago - Ai que do.mp3' for writing: at 'Invalid > argument' C:\User\AG\Desktop\mes.pl line 19." > > Enfim, não estou entendendo o erro retornado. > > http://pastebin.com/qxCMLv1V > > #!/usr/bin/env perl > > use common::sense; > use WWW::Mechanize; > use autodie; > > > sub parse { > my ($self) = shift; > $self =~ s/\s+/\+/g; > chomp $self; > print "Now --> " . $self . "\n\n"; > return ("http://www.buscamp3.org/busca/" . $self); > } > > sub gd { > my ($self, $name) = @_; > print $self . " == " . $name . "\n\n"; > open my $fh,">". $name . ".mp3"; > my $m = WWW::Mechanize->new(); > my $p = $m->get($self); > $p = $p->decoded_content; > $m->max_redirect(1); > my @Links = $m->links(); > my $w = 0; > SWU: foreach my $link(@Links){ > my @a = split ("/", $link->url()); > if ($a[1] =~ m/dl/gi){ > print "OK!\n"; > my $c = $m->get("http://www.buscamp3.org" . $link->url()); > print $fh $c->decoded_content; > close $fh; > $w = 1; > } > last SWU if ($w == 1); > } > undef $m; > } > > > open IN, $ARGV[0] or die; > > foreach (){ > print "Search for: " . $_ . "\n"; > my $a = parse($_); > gd($a, $_); > print "\n\n"; > } > > _______________________________________________ > Rio-pm mailing list > Rio-pm em pm.org > http://mail.pm.org/mailman/listinfo/rio-pm > -------------- Próxima Parte ---------- Um anexo em HTML foi limpo... URL: From tiago.peczenyj em gmail.com Sun Oct 21 11:57:12 2012 From: tiago.peczenyj em gmail.com (Tiago Peczenyj) Date: Sun, 21 Oct 2012 16:57:12 -0200 Subject: [Rio-pm] print() on closed filehandle In-Reply-To: References: Message-ID: sem falar que esta usando open com 2 argumentos. tente usar com 3 argumentos separando o modo de abrir do nome do arquivo com uma virgula ao inves de um ponto para concatenar. alias vc pode interpolar assim open my $fh,">","$nome.mp3"; ou open my $fh,">","${nome}.mp3"; On Sun, Oct 21, 2012 at 4:54 PM, Ole Peter Smith wrote: > espacos no nome do arquivo? (sempre, como letras acentuadas, abominavel...) > > 0le > > Send via Android > On Oct 21, 2012 3:38 PM, "Aureliano Guedes" > wrote: > >> Ola monges. >> >> Estou com problema para salvar arquivos *.mp3 recebidos via download. >> >> Ao salvar a mensagem retornada é 'print () on closed filehandle FH at >> C:\User\AG\Desktop\mes.pl line 31.'. >> >> O sistema so retorna 'Invalid argument' quando uso o $!. >> >> Então usei o autodie para ver o que me retornava: >> "Can't open '>Thaeme e Thiago - Ai que do.mp3' for writing: at 'Invalid >> argument' C:\User\AG\Desktop\mes.pl line 19." >> >> Enfim, não estou entendendo o erro retornado. >> >> http://pastebin.com/qxCMLv1V >> >> #!/usr/bin/env perl >> >> use common::sense; >> use WWW::Mechanize; >> use autodie; >> >> >> sub parse { >> my ($self) = shift; >> $self =~ s/\s+/\+/g; >> chomp $self; >> print "Now --> " . $self . "\n\n"; >> return ("http://www.buscamp3.org/busca/" . $self); >> } >> >> sub gd { >> my ($self, $name) = @_; >> print $self . " == " . $name . "\n\n"; >> open my $fh,">". $name . ".mp3"; >> my $m = WWW::Mechanize->new(); >> my $p = $m->get($self); >> $p = $p->decoded_content; >> $m->max_redirect(1); >> my @Links = $m->links(); >> my $w = 0; >> SWU: foreach my $link(@Links){ >> my @a = split ("/", $link->url()); >> if ($a[1] =~ m/dl/gi){ >> print "OK!\n"; >> my $c = $m->get("http://www.buscamp3.org" . $link->url()); >> print $fh $c->decoded_content; >> close $fh; >> $w = 1; >> } >> last SWU if ($w == 1); >> } >> undef $m; >> } >> >> >> open IN, $ARGV[0] or die; >> >> foreach (){ >> print "Search for: " . $_ . "\n"; >> my $a = parse($_); >> gd($a, $_); >> print "\n\n"; >> } >> >> _______________________________________________ >> Rio-pm mailing list >> Rio-pm em pm.org >> http://mail.pm.org/mailman/listinfo/rio-pm >> > > _______________________________________________ > Rio-pm mailing list > Rio-pm em pm.org > http://mail.pm.org/mailman/listinfo/rio-pm > -- Tiago B. Peczenyj Linux User #405772 http://pacman.blog.br -------------- Próxima Parte ---------- Um anexo em HTML foi limpo... URL: From guedes_1000 em hotmail.com Sun Oct 21 12:14:34 2012 From: guedes_1000 em hotmail.com (Aureliano Guedes) Date: Sun, 21 Oct 2012 19:14:34 +0000 Subject: [Rio-pm] print() on closed filehandle In-Reply-To: References: , , Message-ID: Realmente, um erro por falta de atenção. Agora deu certo. Contudo, os arquivos chegam com algum problema que não sei o que é. As musicas não tocam normalmente, elas ficam com um barulho estranho e quase não da para reconhecer a musica, é como se estivesse acelerado. Será que é problemas calsado devido a forma que estou manipulando esse tipo de arquivo? From: tiago.peczenyj em gmail.com Date: Sun, 21 Oct 2012 16:57:12 -0200 To: rio-pm em pm.org Subject: Re: [Rio-pm] print() on closed filehandle sem falar que esta usando open com 2 argumentos. tente usar com 3 argumentos separando o modo de abrir do nome do arquivo com uma virgula ao inves de um ponto para concatenar. alias vc pode interpolar assim open my $fh,">","$nome.mp3"; ou open my $fh,">","${nome}.mp3"; On Sun, Oct 21, 2012 at 4:54 PM, Ole Peter Smith wrote: espacos no nome do arquivo? (sempre, como letras acentuadas, abominavel...) 0le Send via Android On Oct 21, 2012 3:38 PM, "Aureliano Guedes" wrote: Ola monges. Estou com problema para salvar arquivos *.mp3 recebidos via download. Ao salvar a mensagem retornada é 'print () on closed filehandle FH at C:\User\AG\Desktop\mes.pl line 31.'. O sistema so retorna 'Invalid argument' quando uso o $!. Então usei o autodie para ver o que me retornava: "Can't open '>Thaeme e Thiago - Ai que do.mp3' for writing: at 'Invalid argument' C:\User\AG\Desktop\mes.pl line 19." Enfim, não estou entendendo o erro retornado. http://pastebin.com/qxCMLv1V #!/usr/bin/env perl use common::sense; use WWW::Mechanize; use autodie; sub parse { my ($self) = shift; $self =~ s/\s+/\+/g; chomp $self; print "Now --> " . $self . "\n\n"; return ("http://www.buscamp3.org/busca/" . $self); } sub gd { my ($self, $name) = @_; print $self . " == " . $name . "\n\n"; open my $fh,">". $name . ".mp3"; my $m = WWW::Mechanize->new(); my $p = $m->get($self); $p = $p->decoded_content; $m->max_redirect(1); my @Links = $m->links(); my $w = 0; SWU: foreach my $link(@Links){ my @a = split ("/", $link->url()); if ($a[1] =~ m/dl/gi){ print "OK!\n"; my $c = $m->get("http://www.buscamp3.org" . $link->url()); print $fh $c->decoded_content; close $fh; $w = 1; } last SWU if ($w == 1); } undef $m; } open IN, $ARGV[0] or die; foreach (){ print "Search for: " . $_ . "\n"; my $a = parse($_); gd($a, $_); print "\n\n"; } _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm -- Tiago B. Peczenyj Linux User #405772 http://pacman.blog.br _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm -------------- Próxima Parte ---------- Um anexo em HTML foi limpo... URL: From tiago.peczenyj em gmail.com Sun Oct 21 12:25:59 2012 From: tiago.peczenyj em gmail.com (Tiago Peczenyj) Date: Sun, 21 Oct 2012 17:25:59 -0200 Subject: [Rio-pm] print() on closed filehandle In-Reply-To: References: Message-ID: analise o arquivo original e o que vc esta salvando, vc pode ter corrompido algum byte. se o md5 dos dois for igual o problema é outro, se for diferente analise o que o ffmpeg -i diz do arquivo (ele vai analisar o cabeçalho do mp3). 2012/10/21 Aureliano Guedes > Realmente, um erro por falta de atenção. Agora deu certo. > > Contudo, os arquivos chegam com algum problema que não sei o que é. > > As musicas não tocam normalmente, elas ficam com um barulho estranho e > quase não da para reconhecer a musica, é como se estivesse acelerado. > > Será que é problemas calsado devido a forma que estou manipulando esse > tipo de arquivo? > > ------------------------------ > From: tiago.peczenyj em gmail.com > Date: Sun, 21 Oct 2012 16:57:12 -0200 > To: rio-pm em pm.org > Subject: Re: [Rio-pm] print() on closed filehandle > > > sem falar que esta usando open com 2 argumentos. tente usar com 3 > argumentos separando o modo de abrir do nome do arquivo com uma virgula ao > inves de um ponto para concatenar. alias vc pode interpolar assim > > open my $fh,">","$nome.mp3"; > > ou > > open my $fh,">","${nome}.mp3"; > > On Sun, Oct 21, 2012 at 4:54 PM, Ole Peter Smith wrote: > > espacos no nome do arquivo? (sempre, como letras acentuadas, abominavel...) > 0le > Send via Android > On Oct 21, 2012 3:38 PM, "Aureliano Guedes" > wrote: > > Ola monges. > > Estou com problema para salvar arquivos *.mp3 recebidos via download. > > Ao salvar a mensagem retornada é 'print () on closed filehandle FH at > C:\User\AG\Desktop\mes.pl line 31.'. > > O sistema so retorna 'Invalid argument' quando uso o $!. > > Então usei o autodie para ver o que me retornava: > "Can't open '>Thaeme e Thiago - Ai que do.mp3' for writing: at 'Invalid > argument' C:\User\AG\Desktop\mes.pl line 19." > > Enfim, não estou entendendo o erro retornado. > > http://pastebin.com/qxCMLv1V > > #!/usr/bin/env perl > > use common::sense; > use WWW::Mechanize; > use autodie; > > > sub parse { > my ($self) = shift; > $self =~ s/\s+/\+/g; > chomp $self; > print "Now --> " . $self . "\n\n"; > return ("http://www.buscamp3.org/busca/" . $self); > } > > sub gd { > my ($self, $name) = @_; > print $self . " == " . $name . "\n\n"; > open my $fh,">". $name . ".mp3"; > my $m = WWW::Mechanize->new(); > my $p = $m->get($self); > $p = $p->decoded_content; > $m->max_redirect(1); > my @Links = $m->links(); > my $w = 0; > SWU: foreach my $link(@Links){ > my @a = split ("/", $link->url()); > if ($a[1] =~ m/dl/gi){ > print "OK!\n"; > my $c = $m->get("http://www.buscamp3.org" . $link->url()); > print $fh $c->decoded_content; > close $fh; > $w = 1; > } > last SWU if ($w == 1); > } > undef $m; > } > > > open IN, $ARGV[0] or die; > > foreach (){ > print "Search for: " . $_ . "\n"; > my $a = parse($_); > gd($a, $_); > print "\n\n"; > } > > _______________________________________________ > Rio-pm mailing list > Rio-pm em pm.org > http://mail.pm.org/mailman/listinfo/rio-pm > > > _______________________________________________ > Rio-pm mailing list > Rio-pm em pm.org > http://mail.pm.org/mailman/listinfo/rio-pm > > > > > -- > Tiago B. Peczenyj > Linux User #405772 > > http://pacman.blog.br > > _______________________________________________ Rio-pm mailing list > Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm > > _______________________________________________ > Rio-pm mailing list > Rio-pm em pm.org > http://mail.pm.org/mailman/listinfo/rio-pm > -- Tiago B. Peczenyj Linux User #405772 http://pacman.blog.br -------------- Próxima Parte ---------- Um anexo em HTML foi limpo... URL: From guedes_1000 em hotmail.com Sun Oct 21 12:41:22 2012 From: guedes_1000 em hotmail.com (Aureliano Guedes) Date: Sun, 21 Oct 2012 19:41:22 +0000 Subject: [Rio-pm] print() on closed filehandle In-Reply-To: References: , , , , Message-ID: MD5 diferente, ate o tamanho do arquivo é diferente, baixei o original pelo FF e a musica esta normal, alem, de que tem o tamanho de 6,16MB. Em contrapartida o arquivo obtido pelo script fica com 6,19MB. Ja tentei baixar denovo, continua o mesmo problema. From: tiago.peczenyj em gmail.com Date: Sun, 21 Oct 2012 17:25:59 -0200 To: rio-pm em pm.org Subject: Re: [Rio-pm] print() on closed filehandle analise o arquivo original e o que vc esta salvando, vc pode ter corrompido algum byte. se o md5 dos dois for igual o problema é outro, se for diferente analise o que o ffmpeg -i diz do arquivo (ele vai analisar o cabeçalho do mp3). 2012/10/21 Aureliano Guedes Realmente, um erro por falta de atenção. Agora deu certo. Contudo, os arquivos chegam com algum problema que não sei o que é. As musicas não tocam normalmente, elas ficam com um barulho estranho e quase não da para reconhecer a musica, é como se estivesse acelerado. Será que é problemas calsado devido a forma que estou manipulando esse tipo de arquivo? From: tiago.peczenyj em gmail.com Date: Sun, 21 Oct 2012 16:57:12 -0200 To: rio-pm em pm.org Subject: Re: [Rio-pm] print() on closed filehandle sem falar que esta usando open com 2 argumentos. tente usar com 3 argumentos separando o modo de abrir do nome do arquivo com uma virgula ao inves de um ponto para concatenar. alias vc pode interpolar assim open my $fh,">","$nome.mp3"; ou open my $fh,">","${nome}.mp3"; On Sun, Oct 21, 2012 at 4:54 PM, Ole Peter Smith wrote: espacos no nome do arquivo? (sempre, como letras acentuadas, abominavel...) 0le Send via Android On Oct 21, 2012 3:38 PM, "Aureliano Guedes" wrote: Ola monges. Estou com problema para salvar arquivos *.mp3 recebidos via download. Ao salvar a mensagem retornada é 'print () on closed filehandle FH at C:\User\AG\Desktop\mes.pl line 31.'. O sistema so retorna 'Invalid argument' quando uso o $!. Então usei o autodie para ver o que me retornava: "Can't open '>Thaeme e Thiago - Ai que do.mp3' for writing: at 'Invalid argument' C:\User\AG\Desktop\mes.pl line 19." Enfim, não estou entendendo o erro retornado. http://pastebin.com/qxCMLv1V #!/usr/bin/env perl use common::sense; use WWW::Mechanize; use autodie; sub parse { my ($self) = shift; $self =~ s/\s+/\+/g; chomp $self; print "Now --> " . $self . "\n\n"; return ("http://www.buscamp3.org/busca/" . $self); } sub gd { my ($self, $name) = @_; print $self . " == " . $name . "\n\n"; open my $fh,">". $name . ".mp3"; my $m = WWW::Mechanize->new(); my $p = $m->get($self); $p = $p->decoded_content; $m->max_redirect(1); my @Links = $m->links(); my $w = 0; SWU: foreach my $link(@Links){ my @a = split ("/", $link->url()); if ($a[1] =~ m/dl/gi){ print "OK!\n"; my $c = $m->get("http://www.buscamp3.org" . $link->url()); print $fh $c->decoded_content; close $fh; $w = 1; } last SWU if ($w == 1); } undef $m; } open IN, $ARGV[0] or die; foreach (){ print "Search for: " . $_ . "\n"; my $a = parse($_); gd($a, $_); print "\n\n"; } _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm -- Tiago B. Peczenyj Linux User #405772 http://pacman.blog.br _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm -- Tiago B. Peczenyj Linux User #405772 http://pacman.blog.br _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm -------------- Próxima Parte ---------- Um anexo em HTML foi limpo... URL: From tiago.peczenyj em gmail.com Sun Oct 21 12:54:30 2012 From: tiago.peczenyj em gmail.com (Tiago Peczenyj) Date: Sun, 21 Oct 2012 17:54:30 -0200 Subject: [Rio-pm] print() on closed filehandle In-Reply-To: References: Message-ID: então alguma coisa acontece durante o transporte ou o protocolo de transmissão. estou sem tempo de analisar mas vc experimento usar o wireshark? 2012/10/21 Aureliano Guedes > MD5 diferente, ate o tamanho do arquivo é diferente, baixei o original > pelo FF e a musica esta normal, alem, de que tem o tamanho de 6,16MB. > Em contrapartida o arquivo obtido pelo script fica com 6,19MB. > > Ja tentei baixar denovo, continua o mesmo problema. > ------------------------------ > From: tiago.peczenyj em gmail.com > Date: Sun, 21 Oct 2012 17:25:59 -0200 > > To: rio-pm em pm.org > Subject: Re: [Rio-pm] print() on closed filehandle > > analise o arquivo original e o que vc esta salvando, vc pode ter > corrompido algum byte. se o md5 dos dois for igual o problema é outro, se > for diferente analise o que o ffmpeg -i diz do arquivo (ele vai analisar o > cabeçalho do mp3). > > 2012/10/21 Aureliano Guedes > > Realmente, um erro por falta de atenção. Agora deu certo. > > Contudo, os arquivos chegam com algum problema que não sei o que é. > > As musicas não tocam normalmente, elas ficam com um barulho estranho e > quase não da para reconhecer a musica, é como se estivesse acelerado. > > Será que é problemas calsado devido a forma que estou manipulando esse > tipo de arquivo? > > ------------------------------ > From: tiago.peczenyj em gmail.com > Date: Sun, 21 Oct 2012 16:57:12 -0200 > To: rio-pm em pm.org > Subject: Re: [Rio-pm] print() on closed filehandle > > > sem falar que esta usando open com 2 argumentos. tente usar com 3 > argumentos separando o modo de abrir do nome do arquivo com uma virgula ao > inves de um ponto para concatenar. alias vc pode interpolar assim > > open my $fh,">","$nome.mp3"; > > ou > > open my $fh,">","${nome}.mp3"; > > On Sun, Oct 21, 2012 at 4:54 PM, Ole Peter Smith wrote: > > espacos no nome do arquivo? (sempre, como letras acentuadas, abominavel...) > 0le > Send via Android > On Oct 21, 2012 3:38 PM, "Aureliano Guedes" > wrote: > > Ola monges. > > Estou com problema para salvar arquivos *.mp3 recebidos via download. > > Ao salvar a mensagem retornada é 'print () on closed filehandle FH at > C:\User\AG\Desktop\mes.pl line 31.'. > > O sistema so retorna 'Invalid argument' quando uso o $!. > > Então usei o autodie para ver o que me retornava: > "Can't open '>Thaeme e Thiago - Ai que do.mp3' for writing: at 'Invalid > argument' C:\User\AG\Desktop\mes.pl line 19." > > Enfim, não estou entendendo o erro retornado. > > http://pastebin.com/qxCMLv1V > > #!/usr/bin/env perl > > use common::sense; > use WWW::Mechanize; > use autodie; > > > sub parse { > my ($self) = shift; > $self =~ s/\s+/\+/g; > chomp $self; > print "Now --> " . $self . "\n\n"; > return ("http://www.buscamp3.org/busca/" . $self); > } > > sub gd { > my ($self, $name) = @_; > print $self . " == " . $name . "\n\n"; > open my $fh,">". $name . ".mp3"; > my $m = WWW::Mechanize->new(); > my $p = $m->get($self); > $p = $p->decoded_content; > $m->max_redirect(1); > my @Links = $m->links(); > my $w = 0; > SWU: foreach my $link(@Links){ > my @a = split ("/", $link->url()); > if ($a[1] =~ m/dl/gi){ > print "OK!\n"; > my $c = $m->get("http://www.buscamp3.org" . $link->url()); > print $fh $c->decoded_content; > close $fh; > $w = 1; > } > last SWU if ($w == 1); > } > undef $m; > } > > > open IN, $ARGV[0] or die; > > foreach (){ > print "Search for: " . $_ . "\n"; > my $a = parse($_); > gd($a, $_); > print "\n\n"; > } > > _______________________________________________ > Rio-pm mailing list > Rio-pm em pm.org > http://mail.pm.org/mailman/listinfo/rio-pm > > > _______________________________________________ > Rio-pm mailing list > Rio-pm em pm.org > http://mail.pm.org/mailman/listinfo/rio-pm > > > > > -- > Tiago B. Peczenyj > Linux User #405772 > > http://pacman.blog.br > > _______________________________________________ Rio-pm mailing list > Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm > > _______________________________________________ > Rio-pm mailing list > Rio-pm em pm.org > http://mail.pm.org/mailman/listinfo/rio-pm > > > > > -- > Tiago B. Peczenyj > Linux User #405772 > > http://pacman.blog.br > > _______________________________________________ Rio-pm mailing list > Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm > > _______________________________________________ > Rio-pm mailing list > Rio-pm em pm.org > http://mail.pm.org/mailman/listinfo/rio-pm > -- Tiago B. Peczenyj Linux User #405772 http://pacman.blog.br -------------- Próxima Parte ---------- Um anexo em HTML foi limpo... URL: From guedes_1000 em hotmail.com Sun Oct 21 12:59:17 2012 From: guedes_1000 em hotmail.com (Aureliano Guedes) Date: Sun, 21 Oct 2012 19:59:17 +0000 Subject: [Rio-pm] print() on closed filehandle In-Reply-To: References: , , , , , , Message-ID: Não ainda, vou experimentar e volto com os resultados. From: tiago.peczenyj em gmail.com Date: Sun, 21 Oct 2012 17:54:30 -0200 To: rio-pm em pm.org Subject: Re: [Rio-pm] print() on closed filehandle então alguma coisa acontece durante o transporte ou o protocolo de transmissão. estou sem tempo de analisar mas vc experimento usar o wireshark? 2012/10/21 Aureliano Guedes MD5 diferente, ate o tamanho do arquivo é diferente, baixei o original pelo FF e a musica esta normal, alem, de que tem o tamanho de 6,16MB. Em contrapartida o arquivo obtido pelo script fica com 6,19MB. Ja tentei baixar denovo, continua o mesmo problema. From: tiago.peczenyj em gmail.com Date: Sun, 21 Oct 2012 17:25:59 -0200 To: rio-pm em pm.org Subject: Re: [Rio-pm] print() on closed filehandle analise o arquivo original e o que vc esta salvando, vc pode ter corrompido algum byte. se o md5 dos dois for igual o problema é outro, se for diferente analise o que o ffmpeg -i diz do arquivo (ele vai analisar o cabeçalho do mp3). 2012/10/21 Aureliano Guedes Realmente, um erro por falta de atenção. Agora deu certo. Contudo, os arquivos chegam com algum problema que não sei o que é. As musicas não tocam normalmente, elas ficam com um barulho estranho e quase não da para reconhecer a musica, é como se estivesse acelerado. Será que é problemas calsado devido a forma que estou manipulando esse tipo de arquivo? From: tiago.peczenyj em gmail.com Date: Sun, 21 Oct 2012 16:57:12 -0200 To: rio-pm em pm.org Subject: Re: [Rio-pm] print() on closed filehandle sem falar que esta usando open com 2 argumentos. tente usar com 3 argumentos separando o modo de abrir do nome do arquivo com uma virgula ao inves de um ponto para concatenar. alias vc pode interpolar assim open my $fh,">","$nome.mp3"; ou open my $fh,">","${nome}.mp3"; On Sun, Oct 21, 2012 at 4:54 PM, Ole Peter Smith wrote: espacos no nome do arquivo? (sempre, como letras acentuadas, abominavel...) 0le Send via Android On Oct 21, 2012 3:38 PM, "Aureliano Guedes" wrote: Ola monges. Estou com problema para salvar arquivos *.mp3 recebidos via download. Ao salvar a mensagem retornada é 'print () on closed filehandle FH at C:\User\AG\Desktop\mes.pl line 31.'. O sistema so retorna 'Invalid argument' quando uso o $!. Então usei o autodie para ver o que me retornava: "Can't open '>Thaeme e Thiago - Ai que do.mp3' for writing: at 'Invalid argument' C:\User\AG\Desktop\mes.pl line 19." Enfim, não estou entendendo o erro retornado. http://pastebin.com/qxCMLv1V #!/usr/bin/env perl use common::sense; use WWW::Mechanize; use autodie; sub parse { my ($self) = shift; $self =~ s/\s+/\+/g; chomp $self; print "Now --> " . $self . "\n\n"; return ("http://www.buscamp3.org/busca/" . $self); } sub gd { my ($self, $name) = @_; print $self . " == " . $name . "\n\n"; open my $fh,">". $name . ".mp3"; my $m = WWW::Mechanize->new(); my $p = $m->get($self); $p = $p->decoded_content; $m->max_redirect(1); my @Links = $m->links(); my $w = 0; SWU: foreach my $link(@Links){ my @a = split ("/", $link->url()); if ($a[1] =~ m/dl/gi){ print "OK!\n"; my $c = $m->get("http://www.buscamp3.org" . $link->url()); print $fh $c->decoded_content; close $fh; $w = 1; } last SWU if ($w == 1); } undef $m; } open IN, $ARGV[0] or die; foreach (){ print "Search for: " . $_ . "\n"; my $a = parse($_); gd($a, $_); print "\n\n"; } _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm -- Tiago B. Peczenyj Linux User #405772 http://pacman.blog.br _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm -- Tiago B. Peczenyj Linux User #405772 http://pacman.blog.br _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm -- Tiago B. Peczenyj Linux User #405772 http://pacman.blog.br _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm -------------- Próxima Parte ---------- Um anexo em HTML foi limpo... URL: From creaktive em gmail.com Sun Oct 21 13:17:21 2012 From: creaktive em gmail.com (Stanislaw Pusep) Date: Sun, 21 Oct 2012 18:17:21 -0200 Subject: [Rio-pm] print() on closed filehandle In-Reply-To: References: Message-ID: Você usa Windows, não? Neste caso, precisa dar um binmode($fh) logo após o open($fh, ...). Ou então abrir o handle como open($fh, '>:raw', 'nome.mp3'). O erro acontece por que o Perl do Windows substitui byte \x0A pela sequencia \x0D\x0A em arquivos "texto". Em arquivo não-"texto", isso não é nada bom. ABS() 2012/10/21 Aureliano Guedes > Não ainda, vou experimentar e volto com os resultados. > > ------------------------------ > From: tiago.peczenyj em gmail.com > Date: Sun, 21 Oct 2012 17:54:30 -0200 > > To: rio-pm em pm.org > Subject: Re: [Rio-pm] print() on closed filehandle > > então alguma coisa acontece durante o transporte ou o protocolo de > transmissão. estou sem tempo de analisar mas vc experimento usar o > wireshark? > > 2012/10/21 Aureliano Guedes > > MD5 diferente, ate o tamanho do arquivo é diferente, baixei o original > pelo FF e a musica esta normal, alem, de que tem o tamanho de 6,16MB. > Em contrapartida o arquivo obtido pelo script fica com 6,19MB. > > Ja tentei baixar denovo, continua o mesmo problema. > ------------------------------ > From: tiago.peczenyj em gmail.com > Date: Sun, 21 Oct 2012 17:25:59 -0200 > > To: rio-pm em pm.org > Subject: Re: [Rio-pm] print() on closed filehandle > > analise o arquivo original e o que vc esta salvando, vc pode ter > corrompido algum byte. se o md5 dos dois for igual o problema é outro, se > for diferente analise o que o ffmpeg -i diz do arquivo (ele vai analisar o > cabeçalho do mp3). > > 2012/10/21 Aureliano Guedes > > Realmente, um erro por falta de atenção. Agora deu certo. > > Contudo, os arquivos chegam com algum problema que não sei o que é. > > As musicas não tocam normalmente, elas ficam com um barulho estranho e > quase não da para reconhecer a musica, é como se estivesse acelerado. > > Será que é problemas calsado devido a forma que estou manipulando esse > tipo de arquivo? > > ------------------------------ > From: tiago.peczenyj em gmail.com > Date: Sun, 21 Oct 2012 16:57:12 -0200 > To: rio-pm em pm.org > Subject: Re: [Rio-pm] print() on closed filehandle > > > sem falar que esta usando open com 2 argumentos. tente usar com 3 > argumentos separando o modo de abrir do nome do arquivo com uma virgula ao > inves de um ponto para concatenar. alias vc pode interpolar assim > > open my $fh,">","$nome.mp3"; > > ou > > open my $fh,">","${nome}.mp3"; > > On Sun, Oct 21, 2012 at 4:54 PM, Ole Peter Smith wrote: > > espacos no nome do arquivo? (sempre, como letras acentuadas, abominavel...) > 0le > Send via Android > On Oct 21, 2012 3:38 PM, "Aureliano Guedes" > wrote: > > Ola monges. > > Estou com problema para salvar arquivos *.mp3 recebidos via download. > > Ao salvar a mensagem retornada é 'print () on closed filehandle FH at > C:\User\AG\Desktop\mes.pl line 31.'. > > O sistema so retorna 'Invalid argument' quando uso o $!. > > Então usei o autodie para ver o que me retornava: > "Can't open '>Thaeme e Thiago - Ai que do.mp3' for writing: at 'Invalid > argument' C:\User\AG\Desktop\mes.pl line 19." > > Enfim, não estou entendendo o erro retornado. > > http://pastebin.com/qxCMLv1V > > #!/usr/bin/env perl > > use common::sense; > use WWW::Mechanize; > use autodie; > > > sub parse { > my ($self) = shift; > $self =~ s/\s+/\+/g; > chomp $self; > print "Now --> " . $self . "\n\n"; > return ("http://www.buscamp3.org/busca/" . $self); > } > > sub gd { > my ($self, $name) = @_; > print $self . " == " . $name . "\n\n"; > open my $fh,">". $name . ".mp3"; > my $m = WWW::Mechanize->new(); > my $p = $m->get($self); > $p = $p->decoded_content; > $m->max_redirect(1); > my @Links = $m->links(); > my $w = 0; > SWU: foreach my $link(@Links){ > my @a = split ("/", $link->url()); > if ($a[1] =~ m/dl/gi){ > print "OK!\n"; > my $c = $m->get("http://www.buscamp3.org" . $link->url()); > print $fh $c->decoded_content; > close $fh; > $w = 1; > } > last SWU if ($w == 1); > } > undef $m; > } > > > open IN, $ARGV[0] or die; > > foreach (){ > print "Search for: " . $_ . "\n"; > my $a = parse($_); > gd($a, $_); > print "\n\n"; > } > > _______________________________________________ > Rio-pm mailing list > Rio-pm em pm.org > http://mail.pm.org/mailman/listinfo/rio-pm > > > _______________________________________________ > Rio-pm mailing list > Rio-pm em pm.org > http://mail.pm.org/mailman/listinfo/rio-pm > > > > > -- > Tiago B. Peczenyj > Linux User #405772 > > http://pacman.blog.br > > _______________________________________________ Rio-pm mailing list > Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm > > _______________________________________________ > Rio-pm mailing list > Rio-pm em pm.org > http://mail.pm.org/mailman/listinfo/rio-pm > > > > > -- > Tiago B. Peczenyj > Linux User #405772 > > http://pacman.blog.br > > _______________________________________________ Rio-pm mailing list > Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm > > _______________________________________________ > Rio-pm mailing list > Rio-pm em pm.org > http://mail.pm.org/mailman/listinfo/rio-pm > > > > > -- > Tiago B. Peczenyj > Linux User #405772 > > http://pacman.blog.br > > _______________________________________________ Rio-pm mailing list > Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm > > _______________________________________________ > Rio-pm mailing list > Rio-pm em pm.org > http://mail.pm.org/mailman/listinfo/rio-pm > -------------- Próxima Parte ---------- Um anexo em HTML foi limpo... URL: From tiago.peczenyj em gmail.com Sun Oct 21 13:21:37 2012 From: tiago.peczenyj em gmail.com (Tiago Peczenyj) Date: Sun, 21 Oct 2012 18:21:37 -0200 Subject: [Rio-pm] print() on closed filehandle In-Reply-To: References: Message-ID: mas isso nao explica o tamanho do video ser tão diferente... 2012/10/21 Stanislaw Pusep > Você usa Windows, não? > Neste caso, precisa dar um binmode($fh) logo após o open($fh, ...). Ou > então abrir o handle como open($fh, '>:raw', 'nome.mp3'). > O erro acontece por que o Perl do Windows substitui byte \x0A pela > sequencia \x0D\x0A em arquivos "texto". > Em arquivo não-"texto", isso não é nada bom. > > ABS() > > > > > 2012/10/21 Aureliano Guedes > >> Não ainda, vou experimentar e volto com os resultados. >> >> ------------------------------ >> From: tiago.peczenyj em gmail.com >> Date: Sun, 21 Oct 2012 17:54:30 -0200 >> >> To: rio-pm em pm.org >> Subject: Re: [Rio-pm] print() on closed filehandle >> >> então alguma coisa acontece durante o transporte ou o protocolo de >> transmissão. estou sem tempo de analisar mas vc experimento usar o >> wireshark? >> >> 2012/10/21 Aureliano Guedes >> >> MD5 diferente, ate o tamanho do arquivo é diferente, baixei o original >> pelo FF e a musica esta normal, alem, de que tem o tamanho de 6,16MB. >> Em contrapartida o arquivo obtido pelo script fica com 6,19MB. >> >> Ja tentei baixar denovo, continua o mesmo problema. >> ------------------------------ >> From: tiago.peczenyj em gmail.com >> Date: Sun, 21 Oct 2012 17:25:59 -0200 >> >> To: rio-pm em pm.org >> Subject: Re: [Rio-pm] print() on closed filehandle >> >> analise o arquivo original e o que vc esta salvando, vc pode ter >> corrompido algum byte. se o md5 dos dois for igual o problema é outro, se >> for diferente analise o que o ffmpeg -i diz do arquivo (ele vai analisar o >> cabeçalho do mp3). >> >> 2012/10/21 Aureliano Guedes >> >> Realmente, um erro por falta de atenção. Agora deu certo. >> >> Contudo, os arquivos chegam com algum problema que não sei o que é. >> >> As musicas não tocam normalmente, elas ficam com um barulho estranho e >> quase não da para reconhecer a musica, é como se estivesse acelerado. >> >> Será que é problemas calsado devido a forma que estou manipulando esse >> tipo de arquivo? >> >> ------------------------------ >> From: tiago.peczenyj em gmail.com >> Date: Sun, 21 Oct 2012 16:57:12 -0200 >> To: rio-pm em pm.org >> Subject: Re: [Rio-pm] print() on closed filehandle >> >> >> sem falar que esta usando open com 2 argumentos. tente usar com 3 >> argumentos separando o modo de abrir do nome do arquivo com uma virgula ao >> inves de um ponto para concatenar. alias vc pode interpolar assim >> >> open my $fh,">","$nome.mp3"; >> >> ou >> >> open my $fh,">","${nome}.mp3"; >> >> On Sun, Oct 21, 2012 at 4:54 PM, Ole Peter Smith wrote: >> >> espacos no nome do arquivo? (sempre, como letras acentuadas, >> abominavel...) >> 0le >> Send via Android >> On Oct 21, 2012 3:38 PM, "Aureliano Guedes" >> wrote: >> >> Ola monges. >> >> Estou com problema para salvar arquivos *.mp3 recebidos via download. >> >> Ao salvar a mensagem retornada é 'print () on closed filehandle FH at >> C:\User\AG\Desktop\mes.pl line 31.'. >> >> O sistema so retorna 'Invalid argument' quando uso o $!. >> >> Então usei o autodie para ver o que me retornava: >> "Can't open '>Thaeme e Thiago - Ai que do.mp3' for writing: at 'Invalid >> argument' C:\User\AG\Desktop\mes.pl line 19." >> >> Enfim, não estou entendendo o erro retornado. >> >> http://pastebin.com/qxCMLv1V >> >> #!/usr/bin/env perl >> >> use common::sense; >> use WWW::Mechanize; >> use autodie; >> >> >> sub parse { >> my ($self) = shift; >> $self =~ s/\s+/\+/g; >> chomp $self; >> print "Now --> " . $self . "\n\n"; >> return ("http://www.buscamp3.org/busca/" . $self); >> } >> >> sub gd { >> my ($self, $name) = @_; >> print $self . " == " . $name . "\n\n"; >> open my $fh,">". $name . ".mp3"; >> my $m = WWW::Mechanize->new(); >> my $p = $m->get($self); >> $p = $p->decoded_content; >> $m->max_redirect(1); >> my @Links = $m->links(); >> my $w = 0; >> SWU: foreach my $link(@Links){ >> my @a = split ("/", $link->url()); >> if ($a[1] =~ m/dl/gi){ >> print "OK!\n"; >> my $c = $m->get("http://www.buscamp3.org" . $link->url()); >> print $fh $c->decoded_content; >> close $fh; >> $w = 1; >> } >> last SWU if ($w == 1); >> } >> undef $m; >> } >> >> >> open IN, $ARGV[0] or die; >> >> foreach (){ >> print "Search for: " . $_ . "\n"; >> my $a = parse($_); >> gd($a, $_); >> print "\n\n"; >> } >> >> _______________________________________________ >> Rio-pm mailing list >> Rio-pm em pm.org >> http://mail.pm.org/mailman/listinfo/rio-pm >> >> >> _______________________________________________ >> Rio-pm mailing list >> Rio-pm em pm.org >> http://mail.pm.org/mailman/listinfo/rio-pm >> >> >> >> >> -- >> Tiago B. Peczenyj >> Linux User #405772 >> >> http://pacman.blog.br >> >> _______________________________________________ Rio-pm mailing list >> Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm >> >> _______________________________________________ >> Rio-pm mailing list >> Rio-pm em pm.org >> http://mail.pm.org/mailman/listinfo/rio-pm >> >> >> >> >> -- >> Tiago B. Peczenyj >> Linux User #405772 >> >> http://pacman.blog.br >> >> _______________________________________________ Rio-pm mailing list >> Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm >> >> _______________________________________________ >> Rio-pm mailing list >> Rio-pm em pm.org >> http://mail.pm.org/mailman/listinfo/rio-pm >> >> >> >> >> -- >> Tiago B. Peczenyj >> Linux User #405772 >> >> http://pacman.blog.br >> >> _______________________________________________ Rio-pm mailing list >> Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm >> >> _______________________________________________ >> Rio-pm mailing list >> Rio-pm em pm.org >> http://mail.pm.org/mailman/listinfo/rio-pm >> > > > _______________________________________________ > Rio-pm mailing list > Rio-pm em pm.org > http://mail.pm.org/mailman/listinfo/rio-pm > -- Tiago B. Peczenyj Linux User #405772 http://pacman.blog.br -------------- Próxima Parte ---------- Um anexo em HTML foi limpo... URL: From guedes_1000 em hotmail.com Sun Oct 21 13:32:17 2012 From: guedes_1000 em hotmail.com (Aureliano Guedes) Date: Sun, 21 Oct 2012 20:32:17 +0000 Subject: [Rio-pm] print() on closed filehandle In-Reply-To: References: , , , , , , , , , Message-ID: Stanislaw, segui seu conselho e deu certo. MD5 e tamanho de arquivos ficaram iguais, e as musicas normais. Obrigado. From: tiago.peczenyj em gmail.com Date: Sun, 21 Oct 2012 18:21:37 -0200 To: rio-pm em pm.org Subject: Re: [Rio-pm] print() on closed filehandle mas isso nao explica o tamanho do video ser tão diferente... 2012/10/21 Stanislaw Pusep Você usa Windows, não?Neste caso, precisa dar um binmode($fh) logo após o open($fh, ...). Ou então abrir o handle como open($fh, '>:raw', 'nome.mp3'). O erro acontece por que o Perl do Windows substitui byte \x0A pela sequencia \x0D\x0A em arquivos "texto". Em arquivo não-"texto", isso não é nada bom. ABS() 2012/10/21 Aureliano Guedes Não ainda, vou experimentar e volto com os resultados. From: tiago.peczenyj em gmail.com Date: Sun, 21 Oct 2012 17:54:30 -0200 To: rio-pm em pm.org Subject: Re: [Rio-pm] print() on closed filehandle então alguma coisa acontece durante o transporte ou o protocolo de transmissão. estou sem tempo de analisar mas vc experimento usar o wireshark? 2012/10/21 Aureliano Guedes MD5 diferente, ate o tamanho do arquivo é diferente, baixei o original pelo FF e a musica esta normal, alem, de que tem o tamanho de 6,16MB. Em contrapartida o arquivo obtido pelo script fica com 6,19MB. Ja tentei baixar denovo, continua o mesmo problema. From: tiago.peczenyj em gmail.com Date: Sun, 21 Oct 2012 17:25:59 -0200 To: rio-pm em pm.org Subject: Re: [Rio-pm] print() on closed filehandle analise o arquivo original e o que vc esta salvando, vc pode ter corrompido algum byte. se o md5 dos dois for igual o problema é outro, se for diferente analise o que o ffmpeg -i diz do arquivo (ele vai analisar o cabeçalho do mp3). 2012/10/21 Aureliano Guedes Realmente, um erro por falta de atenção. Agora deu certo. Contudo, os arquivos chegam com algum problema que não sei o que é. As musicas não tocam normalmente, elas ficam com um barulho estranho e quase não da para reconhecer a musica, é como se estivesse acelerado. Será que é problemas calsado devido a forma que estou manipulando esse tipo de arquivo? From: tiago.peczenyj em gmail.com Date: Sun, 21 Oct 2012 16:57:12 -0200 To: rio-pm em pm.org Subject: Re: [Rio-pm] print() on closed filehandle sem falar que esta usando open com 2 argumentos. tente usar com 3 argumentos separando o modo de abrir do nome do arquivo com uma virgula ao inves de um ponto para concatenar. alias vc pode interpolar assim open my $fh,">","$nome.mp3"; ou open my $fh,">","${nome}.mp3"; On Sun, Oct 21, 2012 at 4:54 PM, Ole Peter Smith wrote: espacos no nome do arquivo? (sempre, como letras acentuadas, abominavel...) 0le Send via Android On Oct 21, 2012 3:38 PM, "Aureliano Guedes" wrote: Ola monges. Estou com problema para salvar arquivos *.mp3 recebidos via download. Ao salvar a mensagem retornada é 'print () on closed filehandle FH at C:\User\AG\Desktop\mes.pl line 31.'. O sistema so retorna 'Invalid argument' quando uso o $!. Então usei o autodie para ver o que me retornava: "Can't open '>Thaeme e Thiago - Ai que do.mp3' for writing: at 'Invalid argument' C:\User\AG\Desktop\mes.pl line 19." Enfim, não estou entendendo o erro retornado. http://pastebin.com/qxCMLv1V #!/usr/bin/env perl use common::sense; use WWW::Mechanize; use autodie; sub parse { my ($self) = shift; $self =~ s/\s+/\+/g; chomp $self; print "Now --> " . $self . "\n\n"; return ("http://www.buscamp3.org/busca/" . $self); } sub gd { my ($self, $name) = @_; print $self . " == " . $name . "\n\n"; open my $fh,">". $name . ".mp3"; my $m = WWW::Mechanize->new(); my $p = $m->get($self); $p = $p->decoded_content; $m->max_redirect(1); my @Links = $m->links(); my $w = 0; SWU: foreach my $link(@Links){ my @a = split ("/", $link->url()); if ($a[1] =~ m/dl/gi){ print "OK!\n"; my $c = $m->get("http://www.buscamp3.org" . $link->url()); print $fh $c->decoded_content; close $fh; $w = 1; } last SWU if ($w == 1); } undef $m; } open IN, $ARGV[0] or die; foreach (){ print "Search for: " . $_ . "\n"; my $a = parse($_); gd($a, $_); print "\n\n"; } _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm -- Tiago B. Peczenyj Linux User #405772 http://pacman.blog.br _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm -- Tiago B. Peczenyj Linux User #405772 http://pacman.blog.br _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm -- Tiago B. Peczenyj Linux User #405772 http://pacman.blog.br _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm -- Tiago B. Peczenyj Linux User #405772 http://pacman.blog.br _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm -------------- Próxima Parte ---------- Um anexo em HTML foi limpo... URL: From creaktive em gmail.com Sun Oct 21 13:44:16 2012 From: creaktive em gmail.com (Stanislaw Pusep) Date: Sun, 21 Oct 2012 18:44:16 -0200 Subject: [Rio-pm] print() on closed filehandle In-Reply-To: References: Message-ID: Assumindo que o MP3 tenha uma entropia próxima de 8 bits por byte (algo que definitivamente não vale para um arquivo .pl, por mais que nos caçoem), um arquivo de 6,16MB poderá ter cerca de 25 mil ocorrências de \x0A. Mapeando CR => CRLF, pode crescer em cerca de 50KB. Acho que 6,19MB está dentro da faixa :) ABS() 2012/10/21 Tiago Peczenyj > mas isso nao explica o tamanho do video ser tão diferente... > > > 2012/10/21 Stanislaw Pusep > >> Você usa Windows, não? >> Neste caso, precisa dar um binmode($fh) logo após o open($fh, ...). Ou >> então abrir o handle como open($fh, '>:raw', 'nome.mp3'). >> O erro acontece por que o Perl do Windows substitui byte \x0A pela >> sequencia \x0D\x0A em arquivos "texto". >> Em arquivo não-"texto", isso não é nada bom. >> >> ABS() >> >> >> >> >> 2012/10/21 Aureliano Guedes >> >>> Não ainda, vou experimentar e volto com os resultados. >>> >>> ------------------------------ >>> From: tiago.peczenyj em gmail.com >>> Date: Sun, 21 Oct 2012 17:54:30 -0200 >>> >>> To: rio-pm em pm.org >>> Subject: Re: [Rio-pm] print() on closed filehandle >>> >>> então alguma coisa acontece durante o transporte ou o protocolo de >>> transmissão. estou sem tempo de analisar mas vc experimento usar o >>> wireshark? >>> >>> 2012/10/21 Aureliano Guedes >>> >>> MD5 diferente, ate o tamanho do arquivo é diferente, baixei o original >>> pelo FF e a musica esta normal, alem, de que tem o tamanho de 6,16MB. >>> Em contrapartida o arquivo obtido pelo script fica com 6,19MB. >>> >>> Ja tentei baixar denovo, continua o mesmo problema. >>> ------------------------------ >>> From: tiago.peczenyj em gmail.com >>> Date: Sun, 21 Oct 2012 17:25:59 -0200 >>> >>> To: rio-pm em pm.org >>> Subject: Re: [Rio-pm] print() on closed filehandle >>> >>> analise o arquivo original e o que vc esta salvando, vc pode ter >>> corrompido algum byte. se o md5 dos dois for igual o problema é outro, se >>> for diferente analise o que o ffmpeg -i diz do arquivo (ele vai analisar o >>> cabeçalho do mp3). >>> >>> 2012/10/21 Aureliano Guedes >>> >>> Realmente, um erro por falta de atenção. Agora deu certo. >>> >>> Contudo, os arquivos chegam com algum problema que não sei o que é. >>> >>> As musicas não tocam normalmente, elas ficam com um barulho estranho e >>> quase não da para reconhecer a musica, é como se estivesse acelerado. >>> >>> Será que é problemas calsado devido a forma que estou manipulando esse >>> tipo de arquivo? >>> >>> ------------------------------ >>> From: tiago.peczenyj em gmail.com >>> Date: Sun, 21 Oct 2012 16:57:12 -0200 >>> To: rio-pm em pm.org >>> Subject: Re: [Rio-pm] print() on closed filehandle >>> >>> >>> sem falar que esta usando open com 2 argumentos. tente usar com 3 >>> argumentos separando o modo de abrir do nome do arquivo com uma virgula ao >>> inves de um ponto para concatenar. alias vc pode interpolar assim >>> >>> open my $fh,">","$nome.mp3"; >>> >>> ou >>> >>> open my $fh,">","${nome}.mp3"; >>> >>> On Sun, Oct 21, 2012 at 4:54 PM, Ole Peter Smith wrote: >>> >>> espacos no nome do arquivo? (sempre, como letras acentuadas, >>> abominavel...) >>> 0le >>> Send via Android >>> On Oct 21, 2012 3:38 PM, "Aureliano Guedes" >>> wrote: >>> >>> Ola monges. >>> >>> Estou com problema para salvar arquivos *.mp3 recebidos via download. >>> >>> Ao salvar a mensagem retornada é 'print () on closed filehandle FH at >>> C:\User\AG\Desktop\mes.pl line 31.'. >>> >>> O sistema so retorna 'Invalid argument' quando uso o $!. >>> >>> Então usei o autodie para ver o que me retornava: >>> "Can't open '>Thaeme e Thiago - Ai que do.mp3' for writing: at 'Invalid >>> argument' C:\User\AG\Desktop\mes.pl line 19." >>> >>> Enfim, não estou entendendo o erro retornado. >>> >>> http://pastebin.com/qxCMLv1V >>> >>> #!/usr/bin/env perl >>> >>> use common::sense; >>> use WWW::Mechanize; >>> use autodie; >>> >>> >>> sub parse { >>> my ($self) = shift; >>> $self =~ s/\s+/\+/g; >>> chomp $self; >>> print "Now --> " . $self . "\n\n"; >>> return ("http://www.buscamp3.org/busca/" . $self); >>> } >>> >>> sub gd { >>> my ($self, $name) = @_; >>> print $self . " == " . $name . "\n\n"; >>> open my $fh,">". $name . ".mp3"; >>> my $m = WWW::Mechanize->new(); >>> my $p = $m->get($self); >>> $p = $p->decoded_content; >>> $m->max_redirect(1); >>> my @Links = $m->links(); >>> my $w = 0; >>> SWU: foreach my $link(@Links){ >>> my @a = split ("/", $link->url()); >>> if ($a[1] =~ m/dl/gi){ >>> print "OK!\n"; >>> my $c = $m->get("http://www.buscamp3.org" . $link->url()); >>> print $fh $c->decoded_content; >>> close $fh; >>> $w = 1; >>> } >>> last SWU if ($w == 1); >>> } >>> undef $m; >>> } >>> >>> >>> open IN, $ARGV[0] or die; >>> >>> foreach (){ >>> print "Search for: " . $_ . "\n"; >>> my $a = parse($_); >>> gd($a, $_); >>> print "\n\n"; >>> } >>> >>> _______________________________________________ >>> Rio-pm mailing list >>> Rio-pm em pm.org >>> http://mail.pm.org/mailman/listinfo/rio-pm >>> >>> >>> _______________________________________________ >>> Rio-pm mailing list >>> Rio-pm em pm.org >>> http://mail.pm.org/mailman/listinfo/rio-pm >>> >>> >>> >>> >>> -- >>> Tiago B. Peczenyj >>> Linux User #405772 >>> >>> http://pacman.blog.br >>> >>> _______________________________________________ Rio-pm mailing list >>> Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm >>> >>> _______________________________________________ >>> Rio-pm mailing list >>> Rio-pm em pm.org >>> http://mail.pm.org/mailman/listinfo/rio-pm >>> >>> >>> >>> >>> -- >>> Tiago B. Peczenyj >>> Linux User #405772 >>> >>> http://pacman.blog.br >>> >>> _______________________________________________ Rio-pm mailing list >>> Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm >>> >>> _______________________________________________ >>> Rio-pm mailing list >>> Rio-pm em pm.org >>> http://mail.pm.org/mailman/listinfo/rio-pm >>> >>> >>> >>> >>> -- >>> Tiago B. Peczenyj >>> Linux User #405772 >>> >>> http://pacman.blog.br >>> >>> _______________________________________________ Rio-pm mailing list >>> Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm >>> >>> _______________________________________________ >>> Rio-pm mailing list >>> Rio-pm em pm.org >>> http://mail.pm.org/mailman/listinfo/rio-pm >>> >> >> >> _______________________________________________ >> Rio-pm mailing list >> Rio-pm em pm.org >> http://mail.pm.org/mailman/listinfo/rio-pm >> > > > > -- > Tiago B. Peczenyj > Linux User #405772 > > http://pacman.blog.br > > _______________________________________________ > Rio-pm mailing list > Rio-pm em pm.org > http://mail.pm.org/mailman/listinfo/rio-pm > -------------- Próxima Parte ---------- Um anexo em HTML foi limpo... URL: From tiago.peczenyj em gmail.com Sun Oct 21 13:45:15 2012 From: tiago.peczenyj em gmail.com (Tiago Peczenyj) Date: Sun, 21 Oct 2012 18:45:15 -0200 Subject: [Rio-pm] print() on closed filehandle In-Reply-To: References: Message-ID: um beijo pra vc também 2012/10/21 Stanislaw Pusep > Assumindo que o MP3 tenha uma entropia próxima de 8 bits por byte (algo > que definitivamente não vale para um arquivo .pl, por mais que nos caçoem), > um arquivo de 6,16MB poderá ter cerca de 25 mil ocorrências de \x0A. > Mapeando CR => CRLF, pode crescer em cerca de 50KB. Acho que 6,19MB está > dentro da faixa :) > > ABS() > > > > > 2012/10/21 Tiago Peczenyj > >> mas isso nao explica o tamanho do video ser tão diferente... >> >> >> 2012/10/21 Stanislaw Pusep >> >>> Você usa Windows, não? >>> Neste caso, precisa dar um binmode($fh) logo após o open($fh, ...). Ou >>> então abrir o handle como open($fh, '>:raw', 'nome.mp3'). >>> O erro acontece por que o Perl do Windows substitui byte \x0A pela >>> sequencia \x0D\x0A em arquivos "texto". >>> Em arquivo não-"texto", isso não é nada bom. >>> >>> ABS() >>> >>> >>> >>> >>> 2012/10/21 Aureliano Guedes >>> >>>> Não ainda, vou experimentar e volto com os resultados. >>>> >>>> ------------------------------ >>>> From: tiago.peczenyj em gmail.com >>>> Date: Sun, 21 Oct 2012 17:54:30 -0200 >>>> >>>> To: rio-pm em pm.org >>>> Subject: Re: [Rio-pm] print() on closed filehandle >>>> >>>> então alguma coisa acontece durante o transporte ou o protocolo de >>>> transmissão. estou sem tempo de analisar mas vc experimento usar o >>>> wireshark? >>>> >>>> 2012/10/21 Aureliano Guedes >>>> >>>> MD5 diferente, ate o tamanho do arquivo é diferente, baixei o original >>>> pelo FF e a musica esta normal, alem, de que tem o tamanho de 6,16MB. >>>> Em contrapartida o arquivo obtido pelo script fica com 6,19MB. >>>> >>>> Ja tentei baixar denovo, continua o mesmo problema. >>>> ------------------------------ >>>> From: tiago.peczenyj em gmail.com >>>> Date: Sun, 21 Oct 2012 17:25:59 -0200 >>>> >>>> To: rio-pm em pm.org >>>> Subject: Re: [Rio-pm] print() on closed filehandle >>>> >>>> analise o arquivo original e o que vc esta salvando, vc pode ter >>>> corrompido algum byte. se o md5 dos dois for igual o problema é outro, se >>>> for diferente analise o que o ffmpeg -i diz do arquivo (ele vai analisar o >>>> cabeçalho do mp3). >>>> >>>> 2012/10/21 Aureliano Guedes >>>> >>>> Realmente, um erro por falta de atenção. Agora deu certo. >>>> >>>> Contudo, os arquivos chegam com algum problema que não sei o que é. >>>> >>>> As musicas não tocam normalmente, elas ficam com um barulho estranho e >>>> quase não da para reconhecer a musica, é como se estivesse acelerado. >>>> >>>> Será que é problemas calsado devido a forma que estou manipulando esse >>>> tipo de arquivo? >>>> >>>> ------------------------------ >>>> From: tiago.peczenyj em gmail.com >>>> Date: Sun, 21 Oct 2012 16:57:12 -0200 >>>> To: rio-pm em pm.org >>>> Subject: Re: [Rio-pm] print() on closed filehandle >>>> >>>> >>>> sem falar que esta usando open com 2 argumentos. tente usar com 3 >>>> argumentos separando o modo de abrir do nome do arquivo com uma virgula ao >>>> inves de um ponto para concatenar. alias vc pode interpolar assim >>>> >>>> open my $fh,">","$nome.mp3"; >>>> >>>> ou >>>> >>>> open my $fh,">","${nome}.mp3"; >>>> >>>> On Sun, Oct 21, 2012 at 4:54 PM, Ole Peter Smith wrote: >>>> >>>> espacos no nome do arquivo? (sempre, como letras acentuadas, >>>> abominavel...) >>>> 0le >>>> Send via Android >>>> On Oct 21, 2012 3:38 PM, "Aureliano Guedes" >>>> wrote: >>>> >>>> Ola monges. >>>> >>>> Estou com problema para salvar arquivos *.mp3 recebidos via download. >>>> >>>> Ao salvar a mensagem retornada é 'print () on closed filehandle FH at >>>> C:\User\AG\Desktop\mes.pl line 31.'. >>>> >>>> O sistema so retorna 'Invalid argument' quando uso o $!. >>>> >>>> Então usei o autodie para ver o que me retornava: >>>> "Can't open '>Thaeme e Thiago - Ai que do.mp3' for writing: at 'Invalid >>>> argument' C:\User\AG\Desktop\mes.pl line 19." >>>> >>>> Enfim, não estou entendendo o erro retornado. >>>> >>>> http://pastebin.com/qxCMLv1V >>>> >>>> #!/usr/bin/env perl >>>> >>>> use common::sense; >>>> use WWW::Mechanize; >>>> use autodie; >>>> >>>> >>>> sub parse { >>>> my ($self) = shift; >>>> $self =~ s/\s+/\+/g; >>>> chomp $self; >>>> print "Now --> " . $self . "\n\n"; >>>> return ("http://www.buscamp3.org/busca/" . $self); >>>> } >>>> >>>> sub gd { >>>> my ($self, $name) = @_; >>>> print $self . " == " . $name . "\n\n"; >>>> open my $fh,">". $name . ".mp3"; >>>> my $m = WWW::Mechanize->new(); >>>> my $p = $m->get($self); >>>> $p = $p->decoded_content; >>>> $m->max_redirect(1); >>>> my @Links = $m->links(); >>>> my $w = 0; >>>> SWU: foreach my $link(@Links){ >>>> my @a = split ("/", $link->url()); >>>> if ($a[1] =~ m/dl/gi){ >>>> print "OK!\n"; >>>> my $c = $m->get("http://www.buscamp3.org" . $link->url()); >>>> print $fh $c->decoded_content; >>>> close $fh; >>>> $w = 1; >>>> } >>>> last SWU if ($w == 1); >>>> } >>>> undef $m; >>>> } >>>> >>>> >>>> open IN, $ARGV[0] or die; >>>> >>>> foreach (){ >>>> print "Search for: " . $_ . "\n"; >>>> my $a = parse($_); >>>> gd($a, $_); >>>> print "\n\n"; >>>> } >>>> >>>> _______________________________________________ >>>> Rio-pm mailing list >>>> Rio-pm em pm.org >>>> http://mail.pm.org/mailman/listinfo/rio-pm >>>> >>>> >>>> _______________________________________________ >>>> Rio-pm mailing list >>>> Rio-pm em pm.org >>>> http://mail.pm.org/mailman/listinfo/rio-pm >>>> >>>> >>>> >>>> >>>> -- >>>> Tiago B. Peczenyj >>>> Linux User #405772 >>>> >>>> http://pacman.blog.br >>>> >>>> _______________________________________________ Rio-pm mailing list >>>> Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm >>>> >>>> _______________________________________________ >>>> Rio-pm mailing list >>>> Rio-pm em pm.org >>>> http://mail.pm.org/mailman/listinfo/rio-pm >>>> >>>> >>>> >>>> >>>> -- >>>> Tiago B. Peczenyj >>>> Linux User #405772 >>>> >>>> http://pacman.blog.br >>>> >>>> _______________________________________________ Rio-pm mailing list >>>> Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm >>>> >>>> _______________________________________________ >>>> Rio-pm mailing list >>>> Rio-pm em pm.org >>>> http://mail.pm.org/mailman/listinfo/rio-pm >>>> >>>> >>>> >>>> >>>> -- >>>> Tiago B. Peczenyj >>>> Linux User #405772 >>>> >>>> http://pacman.blog.br >>>> >>>> _______________________________________________ Rio-pm mailing list >>>> Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm >>>> >>>> _______________________________________________ >>>> Rio-pm mailing list >>>> Rio-pm em pm.org >>>> http://mail.pm.org/mailman/listinfo/rio-pm >>>> >>> >>> >>> _______________________________________________ >>> Rio-pm mailing list >>> Rio-pm em pm.org >>> http://mail.pm.org/mailman/listinfo/rio-pm >>> >> >> >> >> -- >> Tiago B. Peczenyj >> Linux User #405772 >> >> http://pacman.blog.br >> >> _______________________________________________ >> Rio-pm mailing list >> Rio-pm em pm.org >> http://mail.pm.org/mailman/listinfo/rio-pm >> > > > _______________________________________________ > Rio-pm mailing list > Rio-pm em pm.org > http://mail.pm.org/mailman/listinfo/rio-pm > -- Tiago B. Peczenyj Linux User #405772 http://pacman.blog.br -------------- Próxima Parte ---------- Um anexo em HTML foi limpo... URL: From guedes_1000 em hotmail.com Sun Oct 21 16:41:08 2012 From: guedes_1000 em hotmail.com (Aureliano Guedes) Date: Sun, 21 Oct 2012 23:41:08 +0000 Subject: [Rio-pm] print() on closed filehandle In-Reply-To: References: , , , , , , , , , , , Message-ID: Isso é que é sacar do assunto. From: tiago.peczenyj em gmail.com Date: Sun, 21 Oct 2012 18:45:15 -0200 To: rio-pm em pm.org Subject: Re: [Rio-pm] print() on closed filehandle um beijo pra vc também 2012/10/21 Stanislaw Pusep Assumindo que o MP3 tenha uma entropia próxima de 8 bits por byte (algo que definitivamente não vale para um arquivo .pl, por mais que nos caçoem), um arquivo de 6,16MB poderá ter cerca de 25 mil ocorrências de \x0A. Mapeando CR => CRLF, pode crescer em cerca de 50KB. Acho que 6,19MB está dentro da faixa :) ABS() 2012/10/21 Tiago Peczenyj mas isso nao explica o tamanho do video ser tão diferente... 2012/10/21 Stanislaw Pusep Você usa Windows, não?Neste caso, precisa dar um binmode($fh) logo após o open($fh, ...). Ou então abrir o handle como open($fh, '>:raw', 'nome.mp3'). O erro acontece por que o Perl do Windows substitui byte \x0A pela sequencia \x0D\x0A em arquivos "texto". Em arquivo não-"texto", isso não é nada bom. ABS() 2012/10/21 Aureliano Guedes Não ainda, vou experimentar e volto com os resultados. From: tiago.peczenyj em gmail.com Date: Sun, 21 Oct 2012 17:54:30 -0200 To: rio-pm em pm.org Subject: Re: [Rio-pm] print() on closed filehandle então alguma coisa acontece durante o transporte ou o protocolo de transmissão. estou sem tempo de analisar mas vc experimento usar o wireshark? 2012/10/21 Aureliano Guedes MD5 diferente, ate o tamanho do arquivo é diferente, baixei o original pelo FF e a musica esta normal, alem, de que tem o tamanho de 6,16MB. Em contrapartida o arquivo obtido pelo script fica com 6,19MB. Ja tentei baixar denovo, continua o mesmo problema. From: tiago.peczenyj em gmail.com Date: Sun, 21 Oct 2012 17:25:59 -0200 To: rio-pm em pm.org Subject: Re: [Rio-pm] print() on closed filehandle analise o arquivo original e o que vc esta salvando, vc pode ter corrompido algum byte. se o md5 dos dois for igual o problema é outro, se for diferente analise o que o ffmpeg -i diz do arquivo (ele vai analisar o cabeçalho do mp3). 2012/10/21 Aureliano Guedes Realmente, um erro por falta de atenção. Agora deu certo. Contudo, os arquivos chegam com algum problema que não sei o que é. As musicas não tocam normalmente, elas ficam com um barulho estranho e quase não da para reconhecer a musica, é como se estivesse acelerado. Será que é problemas calsado devido a forma que estou manipulando esse tipo de arquivo? From: tiago.peczenyj em gmail.com Date: Sun, 21 Oct 2012 16:57:12 -0200 To: rio-pm em pm.org Subject: Re: [Rio-pm] print() on closed filehandle sem falar que esta usando open com 2 argumentos. tente usar com 3 argumentos separando o modo de abrir do nome do arquivo com uma virgula ao inves de um ponto para concatenar. alias vc pode interpolar assim open my $fh,">","$nome.mp3"; ou open my $fh,">","${nome}.mp3"; On Sun, Oct 21, 2012 at 4:54 PM, Ole Peter Smith wrote: espacos no nome do arquivo? (sempre, como letras acentuadas, abominavel...) 0le Send via Android On Oct 21, 2012 3:38 PM, "Aureliano Guedes" wrote: Ola monges. Estou com problema para salvar arquivos *.mp3 recebidos via download. Ao salvar a mensagem retornada é 'print () on closed filehandle FH at C:\User\AG\Desktop\mes.pl line 31.'. O sistema so retorna 'Invalid argument' quando uso o $!. Então usei o autodie para ver o que me retornava: "Can't open '>Thaeme e Thiago - Ai que do.mp3' for writing: at 'Invalid argument' C:\User\AG\Desktop\mes.pl line 19." Enfim, não estou entendendo o erro retornado. http://pastebin.com/qxCMLv1V #!/usr/bin/env perl use common::sense; use WWW::Mechanize; use autodie; sub parse { my ($self) = shift; $self =~ s/\s+/\+/g; chomp $self; print "Now --> " . $self . "\n\n"; return ("http://www.buscamp3.org/busca/" . $self); } sub gd { my ($self, $name) = @_; print $self . " == " . $name . "\n\n"; open my $fh,">". $name . ".mp3"; my $m = WWW::Mechanize->new(); my $p = $m->get($self); $p = $p->decoded_content; $m->max_redirect(1); my @Links = $m->links(); my $w = 0; SWU: foreach my $link(@Links){ my @a = split ("/", $link->url()); if ($a[1] =~ m/dl/gi){ print "OK!\n"; my $c = $m->get("http://www.buscamp3.org" . $link->url()); print $fh $c->decoded_content; close $fh; $w = 1; } last SWU if ($w == 1); } undef $m; } open IN, $ARGV[0] or die; foreach (){ print "Search for: " . $_ . "\n"; my $a = parse($_); gd($a, $_); print "\n\n"; } _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm -- Tiago B. Peczenyj Linux User #405772 http://pacman.blog.br _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm -- Tiago B. Peczenyj Linux User #405772 http://pacman.blog.br _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm -- Tiago B. Peczenyj Linux User #405772 http://pacman.blog.br _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm -- Tiago B. Peczenyj Linux User #405772 http://pacman.blog.br _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm -- Tiago B. Peczenyj Linux User #405772 http://pacman.blog.br _______________________________________________ Rio-pm mailing list Rio-pm em pm.org http://mail.pm.org/mailman/listinfo/rio-pm -------------- Próxima Parte ---------- Um anexo em HTML foi limpo... URL: From cleysinhonv em gmail.com Thu Oct 25 05:11:38 2012 From: cleysinhonv em gmail.com (Cleysinho) Date: Thu, 25 Oct 2012 10:11:38 -0200 Subject: [Rio-pm] GD::Graph: Como posso organizar as "labels"? Message-ID: Bom dia, Estou plotando alguns gráficos no modelo barras e pizza utilizando o módulo GD::Graph, os gráficos que possuem um data set menor deixam os gráficos com as "labels" legíveis e mais agradáveis. Estou com um problema com data set maiores que por sua vez deixam as "labels" desorganizadas ou amontoadas uma sobre as outras e consequentemente requerem que o tamanho da imagem seja maior (imagens em anexo). Preciso de retirar as "labels" do interior do gráfico em pizza e organizá-los do lado externo. Alguém poderia dar uma sugestão? -- ** .: Inteligência Coletiva :. Uma inteligência distribuída por toda parte: tal é o nosso axioma inicial. Ninguém sabe tudo, todos sabem alguma coisa, todo o saber está na humanidade?. (Pierre Lévy) José Cleydson F. da Silva *O**pen Source Bioinformatics Community* http://opensourcebioinformatics.com -------------- Próxima Parte ---------- Um anexo em HTML foi limpo... URL: -------------- Próxima Parte ---------- Um anexo não-texto foi limpo... Nome: Bars_ChartCountry.png Tipo: image/png Tamanho: 9288 bytes Descrição: não disponível URL: -------------- Próxima Parte ---------- Um anexo não-texto foi limpo... Nome: PieChartCountry.png Tipo: image/png Tamanho: 18337 bytes Descrição: não disponível URL: From viniciusmiasato em gmail.com Thu Oct 25 07:37:07 2012 From: viniciusmiasato em gmail.com (=?ISO-8859-1?Q?Vin=EDcius_Miasato?=) Date: Thu, 25 Oct 2012 12:37:07 -0200 Subject: [Rio-pm] GD::Graph: Como posso organizar as "labels"? In-Reply-To: References: Message-ID: Olá Cleysinho, eu nunca trabalhei com o GD::Graph, mas já trabalhei com o Chart::Clicker, que é um módulo com uma api simples e é muito bom para gráficos do tipo que você perguntou. em anexo os gráficos de barras e pizza como exemplo, retirados da própria documentação. para posicionar a legenda o módulo possui o método "legend_position" além de outros métodos para manipulação de layout que também podem ser úteis e possam te ajudar, abs. Japa Em 25 de outubro de 2012 10:11, Cleysinho escreveu: > Bom dia, > > Estou plotando alguns gráficos no modelo barras e pizza utilizando o módulo > GD::Graph, os gráficos que possuem um data set menor deixam os gráficos com > as "labels" legíveis e mais agradáveis. Estou com um problema com data set > maiores que por sua vez deixam as "labels" desorganizadas ou amontoadas uma > sobre as outras e consequentemente requerem que o tamanho da imagem seja > maior (imagens em anexo). > > Preciso de retirar as "labels" do interior do gráfico em pizza e > organizá-los do lado externo. Alguém poderia dar uma sugestão? > > -- > .: Inteligência Coletiva :. > Uma inteligência distribuída por toda parte: tal é o nosso axioma inicial. > Ninguém sabe tudo, todos sabem alguma coisa, todo o saber está na > humanidade?. (Pierre Lévy) > > José Cleydson F. da Silva > Open Source Bioinformatics Community > http://opensourcebioinformatics.com > > > _______________________________________________ > Rio-pm mailing list > Rio-pm em pm.org > http://mail.pm.org/mailman/listinfo/rio-pm From viniciusmiasato em gmail.com Thu Oct 25 07:38:23 2012 From: viniciusmiasato em gmail.com (=?ISO-8859-1?Q?Vin=EDcius_Miasato?=) Date: Thu, 25 Oct 2012 12:38:23 -0200 Subject: [Rio-pm] GD::Graph: Como posso organizar as "labels"? In-Reply-To: References: Message-ID: claro que esqueci os anexos e o link pra documentação ... Link pra API https://metacpan.org/module/Chart::Clicker#legend_position abs. Japa Em 25 de outubro de 2012 12:37, Vinícius Miasato escreveu: > Olá Cleysinho, > > eu nunca trabalhei com o GD::Graph, mas já trabalhei com o > Chart::Clicker, que é um módulo com uma api simples e é muito bom para > gráficos do tipo que você perguntou. em anexo os gráficos de barras e > pizza como exemplo, retirados da própria documentação. > > para posicionar a legenda o módulo possui o método "legend_position" > além de outros métodos para manipulação de layout que também podem ser > úteis e possam te ajudar, > > abs. > Japa > > Em 25 de outubro de 2012 10:11, Cleysinho escreveu: >> Bom dia, >> >> Estou plotando alguns gráficos no modelo barras e pizza utilizando o módulo >> GD::Graph, os gráficos que possuem um data set menor deixam os gráficos com >> as "labels" legíveis e mais agradáveis. Estou com um problema com data set >> maiores que por sua vez deixam as "labels" desorganizadas ou amontoadas uma >> sobre as outras e consequentemente requerem que o tamanho da imagem seja >> maior (imagens em anexo). >> >> Preciso de retirar as "labels" do interior do gráfico em pizza e >> organizá-los do lado externo. Alguém poderia dar uma sugestão? >> >> -- >> .: Inteligência Coletiva :. >> Uma inteligência distribuída por toda parte: tal é o nosso axioma inicial. >> Ninguém sabe tudo, todos sabem alguma coisa, todo o saber está na >> humanidade?. (Pierre Lévy) >> >> José Cleydson F. da Silva >> Open Source Bioinformatics Community >> http://opensourcebioinformatics.com >> >> >> _______________________________________________ >> Rio-pm mailing list >> Rio-pm em pm.org >> http://mail.pm.org/mailman/listinfo/rio-pm -------------- Próxima Parte ---------- Um anexo não-texto foi limpo... Nome: bar.png Tipo: image/png Tamanho: 11395 bytes Descrição: não disponível URL: -------------- Próxima Parte ---------- Um anexo não-texto foi limpo... Nome: pie.png Tipo: image/png Tamanho: 10782 bytes Descrição: não disponível URL: From breno em rio.pm.org Thu Oct 25 08:06:40 2012 From: breno em rio.pm.org (breno) Date: Thu, 25 Oct 2012 13:06:40 -0200 Subject: [Rio-pm] HTML::Parse In-Reply-To: References: <439E1D4A5AD44A31A2AC2A1C51053B7E@aware.com.br> <1350603924.20168.140661142604705.79EC4CA7@webmail.messagingengine.com> <1350675988.79169.YahooMailNeo@web125202.mail.ne1.yahoo.com> Message-ID: 2012/10/21 Aureliano Guedes > > Ola. > > Eu estoiu tentando usar o WWW::Mechanize, mas não estou entendendo uma coisa. > Eu tenho um botão: > > > Baixar Fernando E Sorocaba Tenso > > > Como eu faço para clicar nele usando o metodo click_button? Como faço para setar esse botão? > Eu tentei: > $m->click_button(value=>/dl/347357664b655256724e/554545485125135/Fernando+E+Sorocaba+++++Tenso.mp3); > Mas não da certo. > O seu botão não é um botão (