[SP-pm] Yahoo Finance
Alexei Znamensky
russoz at gmail.com
Tue May 10 15:26:35 PDT 2011
Zé,
Se quiser usar o DataFlow[1] para isso, ele também serve. E a parte de CSV
dele está (praticamente :-) pronta.
[]s,
Alexei
[1] http://search.cpan.org/dist/DataFlow/
2011/5/10 Jose Roberto Aquino <josef.aquino em gmail.com>
> Pessoal, aproveito para dar os parabéns pelo evento, foi show. O que falar
> do L. Wall e sua esposa, fantástica lição de vida. Não menos encantador foi
> a palestra do André da Estante Virtual.
> Dando início ao meu projeto de banco de dados do mercado financeiro,
> preciso de uma ajuda para dar meus primeiros passos...
>
> Necessidades
> 1. usar uma lista de 500 papeis(txt e csv), não apenas os papeis descritos
> a seguir;
> 2. após baixar quero salvá-los em formato CSV
> Obs.: desde já esse projeto será OPEN SOURCE, meu objetivo é criar uma base
> usando Yahoo e Google Finance.
>
> Tenho o seguinte código:
>
> #!/usr/bin/perl
> use Finance::QuoteHist;
> $q = Finance::QuoteHist->new
> (
> symbols => [qw(MSFT IBM GOOG VALE PBR)],
> start_date => '01/01/2010',
> end_date => 'today',
> );
>
> print "Quotes:\n";
> foreach $row ($q->quotes()) {
> ($date, $open, $high, $low, $close) = @$row;
> print "$date $open $high $low $close\n";
> }
>
> Obrigado
> Zé
>
> =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
>
>
--
Alexei "RUSSOZ" Znamensky
[russoz_gmail_com] [russoz.wordpress.com] [www.flickr.com/photos/alexeiz] [
https://github.com/russoz]
Only love / Can bring the rain / That makes you yearn to the sky
-------------- Pr�xima Parte ----------
Um anexo em HTML foi limpo...
URL: <http://mail.pm.org/pipermail/saopaulo-pm/attachments/20110510/7cd67b84/attachment-0001.html>
More information about the SaoPaulo-pm
mailing list