libfinance-quote-perl 1.51-1 (i386 binary) in ubuntu kinetic

 Finance::Quote gets stock quotes from various internet sources all over the
 world. Quotes are obtained by constructing a quoter object and using the
 fetch method to gather data, which is returned as a two-dimensional hash (or
 a reference to such a hash, if called in a scalar context). For example:
 .
  $q = Finance::Quote->new;
  %info = $q->fetch("australia", "CML");
  print "The price of CML is ".$info{"CML", "price"};
 .
 The first part of the hash (eg, "CML") is referred to as the stock.
 The second part (in this case, "price") is referred to as the label.