[SP-pm] Coletar dados de um site

Rafael Prenzier rafaelprenzier at gmail.com
Thu Jan 27 11:03:50 PST 2011


Se for pra acessar os Dados do HTML
Sugiro o WWW::Mechanize que simplifica do uso do LWP

abraços

2011/1/27 Stanislaw Pusep <creaktive em gmail.com>

> Pra que complicar processando o HTML? O site atualiza esse "chart" a partir
> de um JSON:
>
> http://cotacoes.economia.uol.com.br/ws/asset/687/intraday?size=50&callback=uolfinancecallback0&page=1
> A estrutura é:
>
> uolfinancecallback0({
>   "data": [
>     {
>       "date": 1296149460000,
>       "price": 52.1,
>       "low": 51.96,
>       "high": 52.82,
>       "var": -0.36,
>       "varpct": -0.69,
>       "vol": 6194139.0
>     },
> (...)
>     {
>       "date": 1296146520000,
>       "price": 52.07,
>       "low": 51.96,
>       "high": 52.82,
>       "var": -0.39,
>       "varpct": -0.74,
>       "vol": 5584075.0
>     }
>   ],
>   "total": 265,
>   "lastUpdate": 1296149460000,
>   "type": "stock",
>   "timeOffSet": -7200000,
>   "today": 1296150408637
> });
>
> Para processar JSON com Perl:
> http://search.cpan.org/~mlehmann/JSON-XS-2.3/XS.pm
>
> ABS()
>
>
>
> 2011/1/27 Gabriel Andrade <gabiruh em gmail.com>
>
>
>> On Jan 27, 2011, at 2:11 PM, Jose Roberto Aquino wrote:
>>
>> > Pessoal, alguém pode me ajudar na orientação de como capturar dados
>> desse site:
>> >
>> http://economia.uol.com.br/cotacoes/bolsas/acoes/bvsp-bovespa/vale5-sa/tabela-intraday.jhtm?size=700
>> >
>> > Após capturar objetivo é guardá-los no mysql.
>>
>> Alguém já teve mesma necessidade que a sua e fez o grande favor de
>> disponibilizar no CPAN.
>> E aposto que a solução pra 90% dos seus outros futuros problemas pode ser
>> econtrada lá, excetuando-se gravidez indesejada, conjuntivite e nome sujo no
>> SPC.
>>
>> http://search.cpan.org/perldoc?Finance::YahooQuote
>>
>> Dá uma olhada na subrotina getcustomquote pra poder especificar quais
>> campos você deseja obter informação.
>>
>> $ curl -L cpanmin.us | perl - Finance::YahooQuote
>> $ perl -MFinance::YahooQuote=getquote -MData::Dumper=Dumper -E 'say Dumper
>> getquote(qw/VALE5.SA/) <http://VALE5.SA/%29>;'
>>
>>
>> =begin disclaimer
>>   Sao Paulo Perl Mongers: http://sao-paulo.pm.org/
>>  SaoPaulo-pm mailing list: SaoPaulo-pm em pm.org
>>  L<http://mail.pm.org/mailman/listinfo/saopaulo-pm>
>> =end disclaimer
>>
>
>
> =begin disclaimer
>   Sao Paulo Perl Mongers: http://sao-paulo.pm.org/
>  SaoPaulo-pm mailing list: SaoPaulo-pm em pm.org
>  L<http://mail.pm.org/mailman/listinfo/saopaulo-pm>
> =end disclaimer
>
>


-- 
Rafael Prenzier dos Santos
rafaelprenzier em gmail.com
Cel: (13) 8131-8212
-------------- Pr?xima Parte ----------
Um anexo em HTML foi limpo...
URL: <http://mail.pm.org/pipermail/saopaulo-pm/attachments/20110127/f4a4bde1/attachment-0001.html>


More information about the SaoPaulo-pm mailing list