my $epsilon = 0.00000001; my $a = ....; # irgendein errechneter float wert my $b = ....; # noch irgendein errechneter float wert if (abs($a - $b) < $epsilon) # In dem Fall 'sieht man es als 0 an' else my $differenz = $a - $b;