- or download this
my $value1 = 14.4;
print "value1 = $value1\n";
...
} else {
print "value 1 does not equal value2\n";
}
- or download this
value1 = 14.4
value2 = 14.4
value 1 does not equal value2
- or download this
$number = 1.80;
$premium = $number * ( 1 + 10/100 );
...
print "Number 2 : $expected \n";
print "Not" if $expected != $premium;
print "Equal !! ";
- or download this
Number 1 : 1.98
Number 2 : 1.98
NotEqual !!
- or download this
my $value2 = 10 + 14.4 - 10; # wrong evaluated
- or download this
my $value2 = 14.4 + 10 - 10; # wrong evaluated
- or download this
my $value2 = 10 - 10 + 14.4; # right evaluated
- or download this
my $value2 = eval (10 + 14.4 - 10); # right evaluated
- or download this
$number = 1.80;
$premium = eval ($number * ( 1 + 10/100 ));
...
print "Number 2 : $expected \n";
print "Not" if $expected != $premium;
print "Equal !! ";
- or download this
Number 1 : 1.98
Number 2 : 1.98
Equal !!