Fiance::NikkeiQuote 0.5.1

Fiance::NikkeiQuote can get a stock quote from Nihon Keizai Shimbun, Inc. (Nikkei).

SYNOPSIS

use Finance::NikkeiQuote;
# For example, it's a sony ;-)
my $sony = Finance::NikkeiQuote->new(6758);
# Set proxy, if you need
$sony->proxy('http://proxy.foo.co.jp:8080');
print "Name : ",($sony->getinfo)[1],"n";
print "Current Price: ",($sony->gettoday)[3],"n";
# 25days Range of stock prices;
map{map{print $_,','}@$_;print "n"}@{$sony->getrange25};

This module gets stock quote from Nikkei. The new constructor will return a Finance::NikkeiQuote object, while the proxy method to use proxy server. The return value of getinfo method is an array, with the following elements:

0 company name in Japanese
1 company name in English

The return value of gettoday method is an array, with the following elements:

0 Open Price
1 High Price
2 Low Price
3 Current Price
4 Volume

The getrange25 method returns an array of pointers to arryas with the following elements:

0 Date
1 Open Price
2 High Price
3 Low Price
4 Close Price
5 Volume

Product's homepage

Requirements:

· Perl