App::Chart::Series::Derived::Adjust -- series adjustments for dividends, splits, etc
use App::Chart::Series::Derived::Adjust; my $adj_series = App::Chart::Series::Derived::Adjust->derive ($series, adjust_splits => 1);
App::Chart::Series::Derived::Adjust series applies adjustments to an underlying database series for stock splits, dividend reinvestment, etc. The split information etc is obtained from the database.
- App::Chart::Series::Derived::Adjust->derive ($series, key=>value,...)
Create a new series which applies adjustments to
$series, for some or all of dividends, splits, capital returns, etc.
$seriesmust be a
App::Chart::Series::Databaseobject. The adjustments are controlled by the following options arguments taken in key/value style
adjust_splits adjust for stock splits adjust_dividends adjust for dividends (as reinvested) adjust_imputation include imputation credits in dividends
my $db_series = App::Chart::Series::Database->new ('BHP.AX'); my $adj_series = App::Chart::Series::Derived::Adjust->derive ($db_series, adjust_splits => 1, adjust_dividends => 1);
If the options ask for no adjustments at all, or there's no splits etc in the database for the
$seriesis simply returned.
Copyright 2007, 2008, 2009, 2010, 2011, 2016 Kevin Ryde
Chart is free software; you can redistribute it and/or modify it under the terms of the GNU General Public License as published by the Free Software Foundation; either version 3, or (at your option) any later version.
Chart is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for more details.
You should have received a copy of the GNU General Public License along with Chart; see the file COPYING. Failing that, see http://www.gnu.org/licenses/.