my $x = 1.1 - 1.0; 
print(qq[$x <= 0.1 ? ] . ($x <= 0.1 ? q[yes] : q[no] ));