Yet Another CPAN Grep

Grizzly ( N/NO/NOBUNAGA/Grizzly-0.111.tar.gz, NOBUNAGA, 2022; MetaCPAN )

Grizzly/lib/Grizzly/Data/StockInfo.pm ( view source; MetaCPAN )

r @EXPORT = qw(stock_info);

my $q = Finance::Quote->new("YahooJSON");

sub stock_info {
    my ($symbol) = @_;

    return $q->yahoo_json($symbol);
}

1;

__END__

=pod

=encoding UTF-8

=head1 NAME