$interest_accrued = $interest_accrued + ($month_value*$monthly_interest);
if (($month == 12) || ($month_value <= 0)){
print "End of year ", pack("A5",$year);
$interest_accrued = $interest_accrued + ($month_value*$monthly_interest);
if (($month == 12) || ($month_value <= 0)){
print "End of year ", pack("A5",$year);