Skip Menu |
 

This queue is for tickets about the Finance-Quote CPAN distribution.

Report information
The Basics
Id: 97551
Status: resolved
Priority: 0/
Queue: Finance-Quote

People
Owner: eco [...] ecocode.net
Requestors: mauriceh [...] bigpond.net.au
Cc:
AdminCc:

Bug Information
Severity: (no value)
Broken in: (no value)
Fixed in: (no value)



Subject: Finance::Quote::ASX
Date: Mon, 28 Jul 2014 11:09:53 +0800
To: <bug-Finance-Quote [...] rt.cpan.org>
From: "Maurice Height" <mauriceh [...] bigpond.net.au>
Download (untitled) / with headers
text/plain 1.7k
Finance::Quote::ASX v1.35 seems to return incorrect values in the following program. I am using Strawberry Perl v5.20.0 on Windows 7. # t_Finance_Quote.pl use 5.020; use strict; use warnings FATAL => 'all'; use Data::Dump; use Finance::Quote; $|=1; my @codes = qw(ANZ BHP); my $q = Finance::Quote->new; my %info = $q->fetch("ASX",@codes); ddx(\%info); Output. C:\strawberry\perl\bin\perl.exe E:\WWW\ASX_Monitor\programs\t_Finance_Quote.pl Process started >>> # t_Finance_Quote.pl:12: { # "ANZ\34bid" => "-0.24%", # "ANZ\34currency" => "AUD", # "ANZ\34exchange" => "Australian Stock Exchange", # "ANZ\34high" => "33.610", # "ANZ\34last" => "33.670", # "ANZ\34low" => 33.695, # "ANZ\34method" => "asx", # "ANZ\34offer" => "33.660", # "ANZ\34open" => "33.670", # "ANZ\34p_change" => -0.24, # "ANZ\34price" => "33.670", # "ANZ\34success" => 1, # "ANZ\34symbol" => "ANZ", # "ANZ\34volume" => "33.530", # "BHP\34bid" => "-0.08%", # "BHP\34currency" => "AUD", # "BHP\34exchange" => "Australian Stock Exchange", # "BHP\34high" => "38.830", # "BHP\34last" => "38.970", # "BHP\34low" => "39.040", # "BHP\34method" => "asx", # "BHP\34offer" => "38.970", # "BHP\34open" => "38.980", # "BHP\34p_change" => -0.08, # "BHP\34price" => "38.970", # "BHP\34success" => 1, # "BHP\34symbol" => "BHP", # "BHP\34volume" => "38.740", # } <<< Process finished. (Exit code 0) At line 120 in module Finance::Quote::ASX, each $row does not contain data in the order it is processed. I think the next item after 'p_change' is missing - it appears to be "percentage change in price". 120 foreach my $label (qw/last p_change bid offer open high low volume/) { Thanks Maurice Height
Subject: [rt.cpan.org #97551] Finance::Quote::ASX v1.35 seems to return incorrect values
Date: Sun, 21 Aug 2016 14:15:34 +1000
To: <bug-Perl-Dist-Strawberry [...] rt.cpan.org>
From: "Chris Good" <chris.good [...] ozemail.com.au>
Download (untitled) / with headers
text/plain 220b
Hi, I've fixed this problem and created pull request https://github.com/finance-quote/finance-quote/pull/41 so hopefully this will be fixed in the next release of Finance::Quote (1.39?). Regards, Chris Good
Download smime.p7s
application/pkcs7-signature 4.7k

Message body not shown because it is not plain text.

Subject: [rt.cpan.org #97551] Finance::Quote::ASX v1.35 seems to return incorrect values
Date: Wed, 10 May 2017 18:34:50 +1000
To: <bug-Perl-Dist-Strawberry [...] rt.cpan.org>
From: "Chris Good" <chris.good [...] ozemail.com.au>
Download (untitled) / with headers
text/plain 596b
As PR 41 https://github.com/finance-quote/finance-quote/pull/41 has not yet been merged into Finance::Quote and Issue 46 https://github.com/finance-quote/finance-quote/issues/46 needed a considerable rewrite of ASX.pm, PR 41 has been cancelled and the fix for Bug 97551 is now included in the fix for Issue 46 which is PR 47 https://github.com/finance-quote/finance-quote/pull/47 Is anybody still maintaining Finance::Quote? Last release was 1.38 on 22 Aug 2015. It would be great if there was a new release as there are 12 pull requests. Thanks for your help. Regards, Chris Good
Download smime.p7s
application/pkcs7-signature 6.3k

Message body not shown because it is not plain text.

Hello Chris This bug is now closed and we continue on PR46. best -- Erik


This service is sponsored and maintained by Best Practical Solutions and runs on Perl.org infrastructure.

Please report any issues with rt.cpan.org to rt-cpan-admin@bestpractical.com.