Finance::TW::EmergingQuote - Check stock quotes from Taiwan Emerging Stock

    use Finance::TW::EmergingQuote;

    my $quote = Finance::TW::EmergingQuote->new('3481');

    while (1) { print $quote->get->{MatchPrice}.$/; sleep 30 }

This module provides interface to Emerging Stock price information available from Taiwan's OTC(over-the-counter market). You could get the real time quote.

new

    Create a stock quote object. Resolve the name to symbol
    if the argument is not a symbol.

resolve

    Resolve the company name to stock symbol.

get

    Get the real time stock information.
    Return a hash containing stock information. The keys are:

DQty

    current volume

MatchPrice

    current price

HighPrice

    daily high

LowPrice

    daily low

Chia-liang Kao <clkao@clkao.org>

Copyright 2006 by Chia-liang Kao <clkao@clkao.org>.

This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself.

See http://www.perl.com/perl/misc/Artistic.html