> $ perl -MData::Dumper -e 'print Dumper( (8.8-1.95) == 6.85 )' > $VAR1 = ''; > $ perl -MData::Dumper -e 'print Dumper( (8.5-1.65) == 6.85 )' > $VAR1 = 1; > > Как правильно сделать простую арифметику? Использовать sprintf "%.2f" или сравнения вида abs($float1-$float2) < $epsilon. Если это деньги, то их просто надо считать в копейках, целыми.