I've noticed that no one has replied to your post. Here are some things that you could do that would make it easier for someone to help without us having to spend several hours:

• You didn't  use strict;  so I suspect that you didn't run the program using  perl -w  either. This might generate some meaningful messages from what you think is "correct" code. Using strict will force you to scope your variables with my, our, or local.
• Your code relies on giving a good deal of input which most people are unfamiliar with. You might consider eliminating the STDIN portions and just use pre-initialized variables (scalars, arrays, hashes).
• We don't have any idea what the calculations should be, so we can't tell if the precedence of your operators are correct or not. You can remedy this by providing us with input (as explained above) and then showing us what the correct results would be so that we can compare it to what we get when your code is run.

You might want to modify your code and then reply to your original post. It may be that in following the advice given above that you might solve the problem yourself. Either way it would cut the time needed for any of us to attempt a solution. Good luck,

Jim

"If a man does his best, what else is there?" -- General George S. Patton

---

---

Posts are HTML formatted. Put <p> </p> tags around your paragraphs. Put <code> </code> tags around your code and data!

Titles consisting of a single word are discouraged, and in most cases are disallowed outright.

Read Where should I post X? if you're not absolutely sure you're posting in the right place.

Please read these before you post! —

• How do I compose an effective node title?
• How do I post a question effectively?
• Markup in the Monastery

Posts may use any of the Perl Monks Approved HTML tags:

a, abbr, b, big, blockquote, br, caption, center, col, colgroup, dd, del, details, div, dl, dt, em, font, h1, h2, h3, h4, h5, h6, hr, i, ins, li, ol, p, pre, readmore, small, span, spoiler, strike, strong, sub, summary, sup, table, tbody, td, tfoot, th, thead, tr, tt, u, ul, wbr

You may need to use entities for some characters, as follows. (Exception: Within code tags, you can put the characters literally.)

	For:		Use:
	&		&
	<		&lt;
	>		&gt;
	[		&#91;
	]		&#93;

Link using PerlMonks shortcuts! What shortcuts can I use for linking?

See Writeup Formatting Tips and other pages linked from there for more info.