When comparing floating point numbers, you should either round them both to the same precision and compare or subtract one from the other and see if the abs of the result is small:

if ( abs( $number1 - $number2 ) < $something_tiny ) {
    print "all is well.\n";
}
[download]

Numerical analysts usually prefer the latter many programmers prefer the former.

Phil