Perl: что я не нак делаю?
Форум — Development
Добрый день! Помогите разобрать эту непрятность.
$br должно ровняться 0.7 Почему это не так?
my ($val)= "070";
my ($br) = $val * 0.01;
print "\$br=$br \n"; # выводит $br=0.7
if ($br == 0.7) { print "$br == 0.7 OKey \n"; }
else { print "$br != 0.7 Pl_splash \n"; }