view release on metacpan or  search on metacpan

lib/Finance/Quant.pm  view on Meta::CPAN

       $self->{config}->{'sector-data'}         = 1;
       $self->{config}->{'markets'}             = 1;
       $self->{config}->{'yahoo-charts'}        = 1;
       $self->{config}->{'nasdaq-user-rating'}  = 1;
       $self->{config}->{'nasdaq-guru-rating'}  = 1;
       $self->{config}->{'sources'}  = $sources;
    $self->createDataDir();
    $self->_init();
    return $self;
}
sub updateSymbols {
    my $self = shift;
    $self->getNasdaqSymbols(File::Spec->tmpdir(),$self->{config}->{sources}->{NASDAQ_SYMBOLS});
}
sub _init{
    my $self = shift;
    $self->{config}->{sources} = $sources;
    my $syms = Finance::Quant::Symbols->new();
    my @DATA = @{$syms->{symbols}};
    
    foreach(@DATA){