#!/usr/local/bin/perl
$value1 = 14.3;
$value2 = 100 + 14.3 - 100;
if ($value1 == $value2) {
	print("value 1 =",$value1, " equals value 2=",$value2,"\n");
} else {
	print("value 1 =",$value1, " does not equal value 2=",$value2,"\n");
}
print ('press ENTER to EXIT');
$in = <STDIN>;