my $retail_rate = $self->{'TOUR'}->{'RATE'}{$rateid}{'retail_rate'}; my $coupon = $self->{COUPONAMOUNT}; my $discounted_rate = $retail_rate - $coupon; print "$retail_rate $coupon $discounted_rate\n"; #### my $retail_rate = $self->{'TOUR'}->{'RATE'}{$rateid}{'retail_rate'}; my $coupon = $self->{COUPONAMOUNT}; $retail_rate += 0; $coupon += 0; my $discounted_rate = $retail_rate - $coupon; print "$retail_rate $coupon $discounted_rate\n"; #### my $retail_rate = $self->{'TOUR'}->{'RATE'}{$rateid}{'retail_rate'}; my $coupon = $self->{COUPONAMOUNT}; $retail_rate += 0; $coupon += 0; my $discounted_rate = $retail_rate + 1; print "$retail_rate $coupon $discounted_rate\n"; #### my $retail_rate = $self->{'TOUR'}->{'RATE'}{$rateid}{'retail_rate'}; my $coupon = $self->{COUPONAMOUNT}; $retail_rate += 0; $coupon += 0; my $discounted_rate = $retail_rate; $discounted_rate++; print "$retail_rate $coupon $discounted_rate\n";