note
lin0
<p>when comparing numbers, I tend to avoid using <b>==</b> to go for something like:</p>
<code>
sub equality{
my ($a, $b, $eps) = @_;
abs( $a-$b ) < $eps ? return 1: return 0;
}
</code>
<p>where <b>$eps</b> is the desired precision</p>
<p>Cheers,</p>
[lin0]
626343
626347