The following module was proposed for inclusion in the Module List:
modid: Finance::Loan DSLIP: bdpOp description: Allows calculations for standard loans userid: ZAKZ (Zachary Zebrowski) chapterid: 23 (Miscellaneous_Modules) communities: modules mailing list similar: rationale: NAME Finance::Loan - Calculates monthly payment, interest paid, and unpaid balance on a loan. SYNOPSIS use Finance::Loan; my $loan = new Finance::Loan(principle=>1000,interest_rate=>.07,number_of_ months=>36); # 7% interest rate my $monthlyPayment = $loan->getMonthlyPayment(); my $interestPaid=$loan->getInterestPaid(); my $balanceAfterPaymentn = $loan->balanceAfterPayementn(n); DESCRIPTION new Finance::Loan(principle=>1000,interest_rate=>.07,number_of_months=>36) Creates a new loan object. Ensure that interest_rate is a decimal. So, a 7 percent interest rate is .07 while a 14 percent interest rate is .14 $loan->getMonthlyPayment() Returns the monthly payment on the loan. $loan->getIntrestPaid() Returns the total amount of interest that needs to be paid on the loan. $loan->balanceAfterPaymentn(n) Returns the unpaid balance on the account after payment n, if no additional principle payment on the loan is received. EXPORT None by default. BUGS None known. DISCLAIMER Calculations are presumed to be reliable, but not guaranteed. AUTHOR Zachary Zebrowski [EMAIL PROTECTED] SEE ALSO Nickell, Daniel - Forecasting With Your Microcomputer, Tab Books (C) 1983. enteredby: ZAKZ (Zachary Zebrowski) enteredon: Mon Mar 11 16:22:38 2002 GMT The resulting entry would be: Finance:: ::Loan bdpOp Allows calculations for standard loans ZAKZ Thanks for registering, The Pause Team PS: The following links are only valid for module list maintainers: Registration form with editing capabilities: https://pause.perl.org/pause/authenquery?ACTION=add_mod&USERID=bd000000_aae51c58fa101160&SUBMIT_pause99_add_mod_preview=1 Immediate (one click) registration: https://pause.perl.org/pause/authenquery?ACTION=add_mod&USERID=bd000000_aae51c58fa101160&SUBMIT_pause99_add_mod_insertit=1