We help IT Professionals succeed at work.

# Calculations coming out wrong

on
181 Views
I am working on making a car calculator for loans, I have:

#!/usr/bin/perl
print "Content-type:text/html \n\n";
use CGI qw(:standard);

my \$cost       =    param('cost')     || '0.00';
my \$payment    =    param('payment')  || '0.00';
my \$interest   =    param('interest') || '0.10';
my \$down       =    param('down')     || (\$cost * 0.20);
my \$loan       =    param('loan')     || '5.00';

my \$due        =    (\$cost - \$down) * (1 + \$loan * \$interest / 100);

my \$month      =    \$due / (12 * \$loan);

# if nothing default values below

# print output of all entered values

my \$output = <<_END_;

<b>Cost:</b> \$cost <br />
<b>Payment:</b> \$payment <br />
<b>Interest:</b> \$interest <br />
<b>Down:</b> \$down <br />
<b>Loan:</b> \$loan <br />
<br /><br />
<b>Amount due each month:</b> \$month

_END_
print \$output;

And I am getting the wrong output for the monthly amount due. Any suggestions on what I can do to fix the output, it is coming out very large.

Thanks,

Ryan
Comment
Watch Question

## View Solution Only

CERTIFIED EXPERT
Top Expert 2007

Commented:
Given that this is an assignment question, we can only offer pointers.

My tip is for you to read through perlop

perldoc perlop

CERTIFIED EXPERT
Most Valuable Expert 2014
Top Expert 2015

Commented:
If you are getting the wrong output, what would be the correct output?
What is the relationship between \$month and \$loan?

Commented:
This isnt an assignment one, it is being hosted on the Champlains server, I did read that you can only handle pointers for assignment questions and that is perfectly fine with me. This is an extra case study I am doing out of the book, the class is kicking my butt, haha.

I will take a look at that, what you said above.

\$month is how much you are going to pay a month
\$loan is how many years you want a loan for

Sorry, I should have made that clear for you guys.

Thanks,

Ryan
CERTIFIED EXPERT

Commented:

Commented:
I am using what is given the extra case study I am doing for the heck of it. That is what they gave me for it.

Ryan

Commented:
Have a look at my last post to your other question {http://Q_22868164}
Commented:
Unlock this solution and get a sample of our free trial.
(No credit card required)
Unlock the solution to this question.